Bonjour,
Globale.Initialiser()
Merci de votre aide
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 'CREATION DE LA REQUETTE 3 Dim SQLAjouterOEU As String SQLAjouterOEU = "INSERT INTO oeuvre (oeu_nom,oeu_date,oeu_type,oeu_support,oeu_nature,oeu_photo) VALUES ('" & TxtBoxNomOeu.Text & "','" & TxtDateOeuvre.Text & "','" & CboBoxTYpe.Text & "','" & CboBoxSupport.Text & "','" & CboBoxNature.Text & "','" & PBoxOeuvre1.ImageLocation & "')" 'LA COMMANDE Dim maCommande2 As OleDbCommand maCommande2 = New OleDbCommand() maCommande2.Connection = Globale.connexion maCommande2.CommandType = CommandType.Text maCommande2.CommandText = SQLAjouterOEU 'EXECUTION maCommande2.ExecuteNonQuery()
Partager