Visual Basic 6 - ricerca ed eliminazione dato in DB

Forum - Visual Basic 6 - ricerca ed eliminazione dato in DB

moet (Normal User)
Pro

Messaggi: 185
Iscritto: 13/11/2007

Postato alle 21:29
Venerdì, 23/01/2009

cosa sbaglio ? grazie

Codice sorgente - presumibilmente VB.NET

Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
 
stringa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
stringa = stringa & App.Path & "\clienti.mdb"
 
cn.Open stringa
rs.Open "Tabella1", cn, 3, 3
 
nome = Combo1.Text
 
cn.Execute "DELETE * FROM Tabella1 WHERE Nomecognome=" & nome
 
rs.Close
    Set cn = Nothing
    Set rs = Nothing

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 11:53
Sabato, 24/01/2009

premetto che con i db nn sn per niente bravo...
comunque prova a mettere gli apici in questo modo...
cn.Execute "DELETE * FROM Tabella1 WHERE Nomecognome='" & nome & "'"

e prova a metterli anke qua:

stringa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source='" & App.Path & "\clienti.mdb'"

Ultima modifica effettuata da GrG il 24/01/2009 alle 11:54

moet (Normal User)
Pro

Messaggi: 185
Iscritto: 13/11/2007

Postato alle 12:56
Sabato, 24/01/2009

Grazie mille... perfetto!

bastava sistemare gli apici nella execute.

Anche se sinceramente non ho ancora capito perchè in un altro programma cosi come li avevo messi funzionava. Qui no

i misteri di vb !

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 13:21
Sabato, 24/01/2009

secondo me ti funzionava perchè il nome era un'unica parola del tipo: Giacomo invece adesso nn ti funziona perchè il nome comprende uno spazio del tipo: Giacomo 2