Suppression ça marche pas!!
Lana
-
Lana -
Lana -
Bonjour,
j'utilise ce code pour supprimer une ligne selectionner dans un dataGrid mais ça marche pas!!
voila mon code:
merci d'avancer
j'utilise ce code pour supprimer une ligne selectionner dans un dataGrid mais ça marche pas!!
voila mon code:
Set Baseaccess = New ADODB.Connection
Baseaccess.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source= basededonnes.mdb;"
Baseaccess.CursorLocation = adUseServer
Baseaccess.Open
Set myrecset = Baseaccess.Execute("delete from fiche where Secteur = '" & DataGrid1.Row & "' ")
Dim rs As ADODB.Recordset
Dim sSQL As String
sSQL = "SELECT * FROM fiche"
Set rs = New ADODB.Recordset
rs.Open sSQL, Baseaccess, adOpenKeyset, adLockOptimistic, adCmdText
Set DataGrid1.DataSource = rs
merci d'avancer
1 réponse
-
Bonjour,
Set myrecset = Baseaccess.Execute("delete from fiche where Secteur = '" & DataGrid1.Row & "' ") ca ne peut pas marcher, il faut mettre la colonne du datagrid1 qui correspond au champ Secteur ex: datagird1.col(4)-
-
-
Re,
j'ai un DataGrid1 consiste 7 colonne(secteur, poste de charge, ect)
et 7 zones des texts
si je cherche des donnes. je sélectionne cmd recherche le DataGrid1 affiche les donnes cherche.
mais les zones des texts restent vide .
je besoin d'un code permet de remplir les zones des textes si je sélectionner une ligne
merci d'avancer -
-
-
