Update un enregistrement oracle avec vb.net
NOUNOU
-
NOUNOU -
NOUNOU -
slt j'ai une base de donnée oracle et je bosse avec vb.net je veux faire les modification ca marche pas j'ai violation de contraine quelqu'un peut m'aider
voila le code que j'ai ecris
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim s As String = ""
If (TextBox1.Text <> "") Then
s = "update agences set refag= '" & Me.TextBox1.Text & "'"
Form2.GetData(s)
ElseIf (TextBox2.Text <> "") Then
s = "update agences set designation= '" & Me.TextBox2.Text & "'"
Form2.GetData(s)
ElseIf (TextBox3.Text <> "") Then
s = "update agences set ville= '" & Me.TextBox3.Text & "'"
Form2.GetData(s)
ElseIf (TextBox4.Text <> "") Then
s = "update agences set capital= " & Me.TextBox4.Text
Form2.GetData(s)
End If
MsgBox("La modification est effectuer")
End Sub
voila le code que j'ai ecris
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim s As String = ""
If (TextBox1.Text <> "") Then
s = "update agences set refag= '" & Me.TextBox1.Text & "'"
Form2.GetData(s)
ElseIf (TextBox2.Text <> "") Then
s = "update agences set designation= '" & Me.TextBox2.Text & "'"
Form2.GetData(s)
ElseIf (TextBox3.Text <> "") Then
s = "update agences set ville= '" & Me.TextBox3.Text & "'"
Form2.GetData(s)
ElseIf (TextBox4.Text <> "") Then
s = "update agences set capital= " & Me.TextBox4.Text
Form2.GetData(s)
End If
MsgBox("La modification est effectuer")
End Sub
A voir également:
- Update un enregistrement oracle avec vb.net
- Windows update bloqué - Guide
- Winget update - Guide
- Asus live update - Télécharger - Utilitaires
- Enregistrement mp3 gratuit - Télécharger - Streaming audio
- Comment couper un enregistrement audio - Guide