Questo script, permette di eseguire una query al volo. Utile, ad esempio, per contare i records presenti in una determinata tabella.
<%
‘CONNESSIONE AL DATABASE
Set Conn = server.createobject(“ADODB.connection”)
Conn.ConnectionString = “DRIVER={Microsoft Access Driver (*.mdb)};DBQ=” & server.MapPath(“/db/DATABASE.mdb”)
Conn.open
‘CONNESSIONE AL DATABASE
Set Conn = server.createobject(“ADODB.connection”)
Conn.ConnectionString = “DRIVER={Microsoft Access Driver (*.mdb)};DBQ=” & server.MapPath(“/db/DATABASE.mdb”)
Conn.open
‘QUERY DA ESEGUIRE
strsql = “SELECT Count(*) as Tot from TABELLA”
‘ESEGUO LA QUERY
set rs = conn.execute(strsql)
‘STAMPO IL RISULTATO
response.write rs(“tot”)
Conn.close
Set Conn = Nothing
%>
DB – Query al voloultima modifica: 2009-12-11T21:41:00+01:00da
Reposta per primo quest’articolo