Schemerige sSQL3 als Koord
Schemerige oRST3 als ADODB.Recordset
Vastgesteld oRST3 = Nieuwe ADODB.Recordset
Schemerige oConnect3 als ADODB.Connection
Vastgesteld oConnect3 = Nieuwe ADODB.Connection
sSQL3 _
= „UPDATE [Quantité_distribuée]“ _
& „VAN [Inventaire]“ _
& „WAAR Période = „“ & ComDateDisponible.Text & „“ „_
& „EN Description_du_produit = „“ & Des_prod.Text & „“ „
oConnect3.Open „Provider=Microsoft.ACE.OLEDB.12.0; “ & _
„Gegevens Source=“ & Form4.txt BaseDe.Text &“; „
oConnect3.execute sSQL3