Requête sql
monik
-
monik -
monik -
Bonjour,
voulez vous me corriger cette requête dans ce code
Protected Sub Valider4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Valider4.Click
Dim requete As String = "delete from Action_DAB where Num_arret=" & Val(N_Arret.Text) And " Num_action=" & Val(N_Action.Text)
Dim connex As New Data.OleDb.OleDbConnection
connex.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrateur\Mes documents\Visual Studio 2005\WebSites\suivi des DAB\DAB.mdb"
connex.Open()
Dim cmd As Data.OleDb.OleDbCommand = New Data.OleDb.OleDbCommand(requete, connex)
cmd.CommandText = requete
cmd.ExecuteNonQuery()
End Sub
merci d'avance
voulez vous me corriger cette requête dans ce code
Protected Sub Valider4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Valider4.Click
Dim requete As String = "delete from Action_DAB where Num_arret=" & Val(N_Arret.Text) And " Num_action=" & Val(N_Action.Text)
Dim connex As New Data.OleDb.OleDbConnection
connex.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrateur\Mes documents\Visual Studio 2005\WebSites\suivi des DAB\DAB.mdb"
connex.Open()
Dim cmd As Data.OleDb.OleDbCommand = New Data.OleDb.OleDbCommand(requete, connex)
cmd.CommandText = requete
cmd.ExecuteNonQuery()
End Sub
merci d'avance
Configuration: Windows XP / Safari 532.5
3 réponses
-
Bonsoir,
Dim requete As String = "delete from Action_DAB where Num_arret=" & Val(N_Arret.Text) " And " Num_action=" & Val(N_Action.Text)
je pense qu'il te manque un " avant le And -
aussi un &
Dim requete As String = "delete from Action_DAB where Num_arret=" & Val(N_Arret.Text) & "And Num_action=" & Val(N_Action.Text)
et si les champs sont de type varchar ca donnerait qqc comme ca:
Dim requete As String = "delete from Action_DAB where Num_arret='" & Val(N_Arret.Text) & "' And Num_action='" & Val(N_Action.Text) & "'"
-
