[ASP] Problema connessione MySQL

[Petra]

Innanzitutto voglio dirvi che ho provato a cercare una soluzione a questo problema in tutta la rete, ma non sono riuscito a trovare nulla.

Questo è il codice:

Set Conn = Server.CreateObject("ADODB.Connection")
Set Comm = Server.CreateObject("ADODB.Command")
Set Rs = Server.CreateObject("ADODB.Recordset")
 
Conn.CommandTimeout = 40
Conn.CursorLocation = 1
Conn.ConnectionString = "driver={MySQL};db=milanodance;uid=root;pwd="
Conn.Open
 
Comm.ActiveConnection = Conn
Comm.CommandType = 1
 
Comm.CommandText = "Select * From Utenti Where NomeAccount = '" & NomeAccount & "' Limit 1"
 
Rs.Open Comm, , 1, 1

Mi genera quest'errore sulla riga rossa:

Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
Il driver ODBC non supporta le proprietà richieste.

Sto impazzendo!!!

[Petra]

La mia collega dice che i driver mysql non sono stati installati correttamente!!! Io non penso dato che l'errore si verifica sull'apertura del recordset!! Che ne pensate ? ?

[DarioN1]

La connessione è giusta , secondo me i driver Sql
non supportano le opzioni che gli hai dato . . .



Prova a fare così e vedi che succede una volta aperta la connessione al DB :

Sql = "Select * From Utenti Where NomeAccount = '" & NomeAccount & "' Limit 1"

rs.open Sql , conn

Se così funzio son le opzioni che non son supportate

[Petra]

Ho provato così...

strSql = "Select * From Utenti Where NomeAccount = '" & NomeAccount & "' Limit 1"
  
Rs.Open strSql, Conn, 3, 3

...e mi genera quest'errore...

Microsoft OLE DB Provider for ODBC Drivers (0x80040E21)
Il driver ODBC non supporta le proprietà richieste.

Ho seri dubbi che ho installato un driver del ca...voi che driver avete su ? Come faccio a vedere che driver ho su ? ? Come faccio ad adattare il mio driver al codice con l'oggetto command ? ?

[DarioN1]

Tira via le opzioni

Prova SOLO così :

rs.open strSql, conn

[Petra]

Ti rigrazio...sembra che funzioni!!! Ma cosa serve inserire la clusola Limit ? ?

[DarioN1]

Limit ti permette di scegliere QUANTI record vuoi che la
query restituisca . . .

LIMIT 1 ne restituisce solamente uno ...

Claro ???

[Petra]

E se voglio che me li restituisce tutti emetto la clausola Limit, giusto ? ?

Comunque ho un altro problema...mi dice che Rs.AddNew non è supportato dall'oggetto o dal provider.

Mi genera l'errore sulla riga Rs.AddNew...

ADODB.Recordset (0x800A0CB3)
L'operazione richiesta non è supportata dall'oggetto o dal provider.

[DarioN1]

Se li vuoi tutti togli la clausola limit LIMIT . . .

Per l'errore prova a postare il codice . . .

[Petra]

Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
 
Conn.ConnectionString = "driver={mySQL};server=localhost;database=nomedb;uid=root"
Conn.Open

strSql = "Select * From Utenti Where Nome = '" & Nome & "' Limit 1"

Rs.Open strSql, Conn
 
If (Rs.Eof) Then
 Rs.AddNew
 Rs("Nome") = Nome
 Rs("Cognome") = Cognome
 Rs("EMail") = EMail
 Rs.Update
End If