dxcoco2
11-11-2008, 17:21
:mc: Ciao ragazzi...ho un problemino...non mi ricordo piu come si fà ad eliminare un record tramite sql da vb.net posto il codice:
Dim objconn As OleDbConnection
Dim stringaconn As String
Dim stringasql As String
Dim stringasql2 As String
Dim objcomm As OleDbCommand
stringaconn = "Provider=Microsoft.JET.OLEDB.4.0;Data Source="
stringaconn = stringaconn & Application.StartupPath + "\db.mdb"
objconn = New OleDbConnection(stringaconn)
objconn.Open()
Dim conf_del = MsgBox("Eliminare il Cliente Selezionato?", MsgBoxStyle.YesNo, "Conferma Eliminazione")
If conf_del = vbYes Then
stringasql2 = "delete from cliente where cod'=" + Label2.Text + "'"
objcomm = New OleDbCommand(stringasql, objconn)
objcomm.ExecuteNonQuery()
objconn.Close()
End If
il programma non da errore ma è come se non gli avessi dato alcun comando....mi pare (ma non sono sicuro) che dipenda da objcomm.ExecuteNonQuery()
grazie ragazzi per il vostro aiuto.
Dim objconn As OleDbConnection
Dim stringaconn As String
Dim stringasql As String
Dim stringasql2 As String
Dim objcomm As OleDbCommand
stringaconn = "Provider=Microsoft.JET.OLEDB.4.0;Data Source="
stringaconn = stringaconn & Application.StartupPath + "\db.mdb"
objconn = New OleDbConnection(stringaconn)
objconn.Open()
Dim conf_del = MsgBox("Eliminare il Cliente Selezionato?", MsgBoxStyle.YesNo, "Conferma Eliminazione")
If conf_del = vbYes Then
stringasql2 = "delete from cliente where cod'=" + Label2.Text + "'"
objcomm = New OleDbCommand(stringasql, objconn)
objcomm.ExecuteNonQuery()
objconn.Close()
End If
il programma non da errore ma è come se non gli avessi dato alcun comando....mi pare (ma non sono sicuro) che dipenda da objcomm.ExecuteNonQuery()
grazie ragazzi per il vostro aiuto.