|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Sep 2004
Messaggi: 3967
|
[mysql] problema con un update
Codice:
ssql = ""
ssql = ssql & "UPDATE tblrubrica" & vbCrLf
ssql = ssql & "SET Cognome = '" & TextBox(0).Text & "', Nome = '" & TextBox(1).Text & "' ," & _
"Azienda = '" & TextBox(2).Text & "', Occupazione = '" & TextBox(3).Text & "' ," & _
"Indirizzo = '" & TextBox(4).Text & "', Citta = '" & TextBox(5).Text & "' ," & _
"CAP = '" & TextBox(6).Text & "', prov = '" & TextBox(7).Text & "' ," & _
"mail = '" & TextBox(8).Text & "', Web = '" & TextBox(9).Text & "' ," & _
"Ufficio = '" & TextBox(10).Text & "', Casa = '" & TextBox(11).Text & "' ," & _
"Cellulare = '" & TextBox(12).Text & "', Fax = '" & TextBox(13).Text & "' ," & _
"Note = '" & TextBox(14).Text & "' " & vbCrLf
ssql = ssql & "WHERE Cognome = '" & TextBox(0).Text & "'"
__________________
Dai wafer di silicio nasce: LoHacker... il primo biscotto Geek
|
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Jan 2001
Città: Milano
Messaggi: 5707
|
se cambi il campo che contiene il cognome cambi pure il ramo nella WHERE e non trova nessuna riga, perche' la cerca col nuovo cognome
|
|
|
|
|
|
#3 | |
|
Senior Member
Iscritto dal: Sep 2004
Messaggi: 3967
|
Quote:
Confesso che non ho capito come risolvere questo problema
__________________
Dai wafer di silicio nasce: LoHacker... il primo biscotto Geek
|
|
|
|
|
|
|
#4 | |
|
Senior Member
Iscritto dal: Jan 2001
Città: Milano
Messaggi: 5707
|
Quote:
|
|
|
|
|
|
|
#5 | |
|
Senior Member
Iscritto dal: Sep 2004
Messaggi: 3967
|
Quote:
Quando poi me le suggerite, mi sento così scemo!! Grazie Mille!!
__________________
Dai wafer di silicio nasce: LoHacker... il primo biscotto Geek
|
|
|
|
|
|
|
#6 | |
|
Senior Member
Iscritto dal: Sep 2004
Messaggi: 3967
|
Quote:
Codice:
Dim stemp As String
stemp = TextBox(0).Text
For x = 0 To 14
If InStr(TextBox(x).Text, "'") Then
TextBox(x).Text = Replace(TextBox(x).Text, "'", "\'")
End If
Next x
ssql = ""
ssql = ssql & "UPDATE tblrubrica" & vbCrLf
ssql = ssql & "SET Cognome = '" & stemp & "', Nome = '" & TextBox(1).Text & "' ," & _
"Azienda = '" & TextBox(2).Text & "', Occupazione = '" & TextBox(3).Text & "' ," & _
"Indirizzo = '" & TextBox(4).Text & "', Citta = '" & TextBox(5).Text & "' ," & _
"CAP = '" & TextBox(6).Text & "', prov = '" & TextBox(7).Text & "' ," & _
"mail = '" & TextBox(8).Text & "', Web = '" & TextBox(9).Text & "' ," & _
"Ufficio = '" & TextBox(10).Text & "', Casa = '" & TextBox(11).Text & "' ," & _
"Cellulare = '" & TextBox(12).Text & "', Fax = '" & TextBox(13).Text & "' ," & _
"Note = '" & TextBox(14).Text & "' " & vbCrLf
ssql = ssql & "WHERE Cognome = '" & TextBox(0).Text & "'"
Set rs = cn.Execute(ssql)
__________________
Dai wafer di silicio nasce: LoHacker... il primo biscotto Geek
|
|
|
|
|
|
|
#7 |
|
Senior Member
Iscritto dal: Jan 2001
Città: Milano
Messaggi: 5707
|
ma il valore del campo cognome devi salvarlo prima di arrivare a questo codice, ovvero prmia che l'utente modifichi il valore dentro al textfield e cerchi di aggiornare il database!
altrimenti non cambia nulla e sia "stemp" che il textfield contengono il medesimo valore |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 15:14.



















