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
A voir également:
- Requête sql
- Logiciel sql - Télécharger - Bases de données
- Requête sql pour afficher uniquement les fleurs dont le prix est strictement inférieur à 10 euros ✓ - Forum DS
- Sql (+) - Forum Programmation
- Jointure sql ✓ - Forum MySQL
- Quelle requête écrire pour demander au moteur de recherche de présenter de préférence les pages web traitant de tennis mais pas de tennis de table ✓ - Forum Android
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
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) & "'"
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) & "'"
