Ciao a tutti. E' da due ore che mi sono bloccato sul seguente codice:
url_DB = "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/DB_sito.mdb")
Set Conn = Server.CreateObject("ADODB.Connection")
conn.Open url_DB
Set RecSet = Server.CreateObject("ADODB.Recordset")
Select Case Settore
Case "Componente_GdA"
SQL = "SELECT * FROM Componente_GdA where id_gruppo = " & idgruppo &""
End Select
RecSet.Open SQL, Conn, adOpenStatic, adLockOptimistic
RecordTotali = RecSet.RecordCount
IF RecordTotali >= maxutentipergruppo Then
troppirecord = True
Else
troppirecord = False
End IF
RecSet.Close
Set RecSet = Nothing
If not troppirecord then
Set RecSet = Server.CreateObject("ADODB.Recordset")
Select Case Settore
Case "Componente_GdA"
SQL = "SELECT * FROM Componente_GdA where ivafisc = '"& ivafisc &"' or email = '"& email1 &"'"
End Select
RecSet.Open SQL, Conn, adOpenStatic, adLockOptimistic
....
....
mi da errore sull'ultima select.
Ho verificato tutti gli apici e sembrano corretti.
Le variabili ivafisc e email1 non sono vuote.
Entrambe sono di tipo testo.
Cosa potrebbe essere ?
Grazie
Marco

Rispondi quotando