[VB6] Scrittura database MySQL e operazione non consentita quando l'oggetto è chiuso

[Fenix'89]

utilizzo questa stringa per scrivere su un database MySQL


Dim userstatus As New ADODB.Recordset
userstatus.Open "UPDATE users SET status = 1 WHERE user = '" + user.Text + "';", conn
userstatus.Close


Il fatto è che mi genera un errore e più precisamente mi dice:

Errore di run-time '3704':
L'operazione non è consentita se l'oggetto è chiuso.


Ma la cosa buffa è che se poi vado a controllare il database la scrittura l'ha eseguita.

[michele79]

userstatus.Open "UPDATE users SET status = 1 WHERE user = '" + user.Text + "';", conn

Prova sostituendo i + con le &

userstatus.Open "UPDATE users SET status = 1 WHERE user = '" & user.Text & "';", conn

[Fenix'89]

già provato e mi da lo stesso tipo di errore
però se uso questo codice non mi da nessun errore:

Dim userstatus As New ADODB.Recordset
userstatus.Open "UPDATE users SET status = 1 WHERE user = '" + user.Text + "';", conn


(non chiudo userstatus)

perchè l'errore me lo da nella riga: userstatus.Close



Avrei un'idea
ottengo lo stesso risultato utilizzando conn Execute???