problemi odbc

[max00]

Ciao a tutti,
un pò di tempo fa gestivo un server NT e non avevo problemi.
Ora ho installato windows 2000 ed ho installato anche l'IIS per testare le pagine dinamiche in locale prima di uploadarle sul server.
le pagine asp mi girano tranquillamente, però ho dei problemi con l'interfacciamento ai DB.
Ho creato un un file .mdb; ho creato una connessione odbc di nome "geo"; ho creato una pagina index.asp dove ho inserito il seguente codice:
<%
' Open Database Connection
Set connessione = Server.CreateObject( "ADODB.Connection" )
connessione.Open "Geo"
%>

Non so perchè ma mi da questo errore:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Driver Manager] Nome origine dati non trovato e driver predefinito non specificato.
/provadb.asp, line 7

Eppure i driver sono installati perchè se faccio una query da excel la vede.

Sapreste quale può essere il problema.
Grazie

[Ultramarine]

Prova con questo codice:

<%
set DBConn = Server.CreateObject("ADODB.Connection")

DBConn.ConnectionTimeout = 25
DBConn.CommandTimeout = 30
DBConn.CursorLocation = 3

DBConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("/miadirectory/miodatabase.mdb") & ";Persist Security Info=False"

set cmdTmp = Server.CreateObject("ADODB.Command")
set rsTmp = Server.CreateObject("ADODB.Recordset")
cmdTmp.ActiveConnection = DBConn
cmdTmp.CommandType = 1
cmdTmp.CommandTimeout = 15cmdTmp.CommandText = "mia SELECT"; "

rsTmp.CacheSize = 10
rsTmp.CursorType = 3
rsTmp.CursorLocation = 3
rsTmp.LockType = 3
rsTmp.Open cmdTmp, , 1, 1
%>

[max00]

mi da questo errore:

Errore di compilazione di Microsoft VBScript (0x800A0401)
Prevista fine istruzione
/provadb2.asp, line 17, column 26
cmdTmp.CommandTimeout = 15cmdTmp.CommandText = "mia SELECT";

[Ultramarine]

scusa ma intendevo che al posto di "mai SELECT"
dovresti inserire ad esempio "SELECT * FROM mia tabella WHERE (utente LIKE 'pippo')";

* vuol dire estrai tutto

dove mia tabella è la tabella del tuo database da cui vuoi estrarre i dati

e quello che c' è tra parentesi dopo WHERE è la condizione, esempio estrai tutto(*) dalla tabella miatabella (FROM miatabella) dove(WHERE) utente è similie(LIKE)a pippo ('pippo').
Ciao, e se hai problemi non ti fare scrupoli.

[max00]

hai ragione sono cotto, comunque mi bastava vedere se si connetteva con il DB.
In ogni caso ho una tabella che si chiama regioni ed un campo che si chiama regione.
Ho inserito questa stringa............
cmdTmp.CommandTimeout = 15cmdTmp.CommandText = "SELECT regione FROM regioni ";
mi da questo errore
Tipo di errore:
Errore di compilazione di Microsoft VBScript (0x800A0401)
Prevista fine istruzione
/provadb2.asp, line 17, column 26
cmdTmp.CommandTimeout = 15cmdTmp.CommandText = "SELECT regione FROM regioni ";

[Ultramarine]

scusa, ma mi sono accorto di aver saltato un accapo
ho scritto
cmdTmp.CommandTimeout = 15cmdTmp.CommandText = "mia SELECT";
invece di cmdTmp.CommandTimeout = 15
cmdTmp.CommandText = "mia SELECT";
sorry

[Ultramarine]

mi devi scusare, ma quello fuso mi sa tanto che sono io;
alla fine della stringa devi invertire gli apicetti ed il punto e virgola
così ;"
anzichè ";

[Ultramarine]

TANTO PER NON FARE ULTERIORI ERRORI

<%
set DBConn = Server.CreateObject("ADODB.Connection")

DBConn.ConnectionTimeout = 25
DBConn.CommandTimeout = 30
DBConn.CursorLocation = 3

DBConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("/miadirectory/miodatabase.mdb") & ";Persist Security Info=False"

set cmdTmp = Server.CreateObject("ADODB.Command")
set rsTmp = Server.CreateObject("ADODB.Recordset")
cmdTmp.ActiveConnection = DBConn
cmdTmp.CommandType = 1
cmdTmp.CommandTimeout = 15
CommandText = "SELECT regione FROM regioni ;"


rsTmp.CacheSize = 10
rsTmp.CursorType = 3
rsTmp.CursorLocation = 3
rsTmp.LockType = 3
rsTmp.Open cmdTmp, , 1, 1
%>

[Ultramarine]

se ti dovesse dare errori prova con questo che ho appena testato ricreando un database simile al tuo

<%
set DBConn = Server.CreateObject("ADODB.Connection")

DBConn.ConnectionTimeout = 25
DBConn.CommandTimeout = 30
DBConn.CursorLocation = 3

DBConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath("/miadirectory/miodatabase.mdb") & ";Persist Security Info=False"

set cmdTmp = Server.CreateObject("ADODB.Command")
set rsTmp = Server.CreateObject("ADODB.Recordset")
cmdTmp.ActiveConnection = DBConn
cmdTmp.CommandType = 1
cmdTmp.CommandTimeout = 15

cmdTmp.CommandText = "SELECT * FROM regione"

rsTmp.Open cmdTmp, , 1, 1
%>

[max00]

Così non mi da errori però non mi stampa i record sulla pagina