Bonjour
Voila je cherche a faire d'une façon auto l'opération suivante :
je cherche a faire ça avec une boucle ou autre, mais je n'ai aucune idée.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23 Dim MyConnexion31 As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data source=" & Application.StartupPath & "\Spectateur.mdb;Jet OLEDB:Database Password=philguio;") Dim Mycommand31 As OleDbCommand = MyConnexion31.CreateCommand() Dim a, b, c, d, f, g, h As String a = Me.T19.Text b = Me.T20.Text c = Me.T21.Text d = Me.T22.Text f = Me.T23.Text g = Me.T24.Text h = Me.T25.Text MyConnexion31.Open() Mycommand31.CommandText = " UPDATE T_Archive SET place19 = '" & a & "', place20 = '" & b & "', place21 = '" & c & "' WHERE Rencontre = '" & strIdentifiant2 & "'" Dim myReader31 As OleDbDataReader = Mycommand31.ExecuteReader() MyConnexion31.Close()
Que ce soit pour la partie vb ou SQL
quelqu'un pourrait il m'aider
merci par avance
Philippe
Partager