Problema con database

[Diddlina]

Ciao a tutti!

Mi esce questo errore:

Tipo di errore:
Active Server Pages, ASP 0126 (0x80004005)
Impossibile trovare il file di inclusione "C:\Inetpub\wwwroot\include\adovbs.inc".
/form/ct.asp, line 6



La linea in questione è contrassegnata con ==>

SUBOpenConn

Dim ObjRS, StrSql
	Set ObjRS = Server.CreateObject("ADODB.Recordset") 
	StrSql = "SELECT * FROM MailsAlberghi WHERE Mail = '"&Mail&"'"
	ObjRS.Open StrSQL, ObjConn, adOpenStatic, adLockReadOnly, adCmdText
	If Not ObjRS.EOF Then
           .........

SUBOpenConn :

Sub SUBOpenConn
Dim ObjConn
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
"DBQ=C:\Inetpub\wwwroot\form\MailsAlberghi.mdb ;"
End Sub

Che devo fare??

[maximum]

Quando apri il recordset usi:

ObjRS.Open StrSQL, ObjConn, adOpenStatic, adLockReadOnly, adCmdText

le 3 parole in grassetto sono costanti ADO e sono definite in quel file .inc che lui ti richiede.

Basta fare ad inizio pagina:



Domanda: hai questo file?

[Diddlina]

ALT!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!


Scusate, ho scritto una grandissima c****...

L'errore è il seguente:
Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A01F4)
Variabile non definita: 'ObjConn'

La riga in questione è sempre:

SUBOpenConn

Dim ObjRS, StrSql
	Set ObjRS = Server.CreateObject("ADODB.Recordset") 
	StrSql = "SELECT * FROM MailsAlberghi WHERE Mail = '"&Mail&"'"
	ObjRS.Open StrSQL, ObjConn, adOpenStatic, adLockReadOnly, adCmdText 
	If Not ObjRS.EOF Then
           .........

e la sub è:

Sub SUBOpenConn
Dim ObjConn
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
" DBQ=C:\Inetpub\wwwroot\form\MailsAlbergh
i.mdb;"
End Sub

[Diddlina]

Originariamente inviato da maximum
Quando apri il recordset usi:

ObjRS.Open StrSQL, ObjConn, adOpenStatic, adLockReadOnly, adCmdText

le 3 parole in grassetto sono costanti ADO e sono definite in quel file .inc che lui ti richiede.

Basta fare ad inizio pagina:



Domanda: hai questo file?

L'include l'ho messo:

[maximum]

La sub dove dichiari la connessione è messa prima nel codice di quella dove fai la query?

(...la butto lì...)

[Diddlina]

Originariamente inviato da maximum
La sub dove dichiari la connessione è messa prima nel codice di quella dove fai la query?

(...la butto lì...)

Certo

[Diddlina]

Non sarà mica un problema di permessi??? (Uso xp pro)

La butto lì anch'io...

[maximum]

No, non trova la variabile objConn....
Ma, domanda, perchè non fai un'include generica con la stringa di connessione?
Secondo me è meglio, visto che comunque potrebbe essere richiamata da più pagine.

Magari risolvi anche questo tipo di problema.

[michele.santoro]

Tanto per non essere da meno la butto lì anch'io.
prova a mettere
Dim ObjRS, StrSql, ObjConn