ciao a tutti. è un pò che seguo il vostro forum ed ho trovato spunti interessanti per il lavoro che sto svolgendo. in pratica devo creare un piccolo sito in asp che permetta di relazionarsi col mio Db. seguendo diversi tutorial, discussioni ed un libro sono riuscito a creare un piccolo motore di ricerca per cercare un valore stabilito da un utente all'interno di una tabella del database. il tutto funziona ma ora ho un piccolo problema: vorrei che i valori che visualizzo a video siano inseriti in una tabella in modo da ottimizzare la grafica. sono 3 giorni che ci lavoro sopra ma niente..non riesco ad inserirceli. mi potreste aiutare? ho utilizzato query sql e un pò di codice java (che non conosco molto bene). sto cercando di capire passo passo quello che sto facendo perchè questo lavoro mi serve come tirocinio universitario...
vi posto il codice della mia pagina:
<%@LANGUAGE = JScript%>
<html>
<head>
<title>Cerca nel sito</title>
</head>
<body>
<h3>Cerca nel sito</h3>
<form method="POST" action="ricercaditta.asp?cerca=OK">
<input type="text" name="stringa">
<input type="submit" value="Cerca">
</form>
<table border="1">
<tr>
<td><b>Ditta:</b></td>
<td><b>Consorzio:</b></td>
<td><b>Ambito:</b></td><BR>
</tr>
<%
var cerca = new String(Request.QueryString("cerca"));
var testo = new String(Request.Form("stringa"));
var apice = testo.replace(/'/g,"''");
var stringa = apice.split(" ");
if (cerca == "OK")
{
if (testo == "" || testo == "undefined")
{
Response.Write("<p>Inserire almeno una parola per effettuare una ricerca</p>");
}
else
{
var Cn = new ActiveXObject("ADODB.Connection");
Cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" + Server.MapPath("database/Verifichedisistema.mdb"));
var sql = "SELECT * FROM Ditte WHERE";
for (var i=0; i<stringa.length; i++)
{
if (i > 0)
{
sql += " AND";
}
sql += " Ditta LIKE '%" + stringa[i] + "%'";
}
var Mostra = Cn.Execute(sql);
%>
<tr>
<td> <% Response.Write(Mostra("Ditta"))%></td>
<td> <% Response.Write(Mostra("Consorzio"))%></td>
<td> <% Response.Write(Mostra("Ambito"))%></td>
</tr>
<%
Mostra.MoveNext()
Wend
End If
%>
</table>
</body>
</html>
<%
' Chiudo la connessione
cn.Close
Set cn = Nothing
%>
un grazie in anticipo a tutti coloro che mi sapranno aiutare..Alessandro
