Bonjour, avec ce code j'arrive à supprimer 1 enregistrement dans ma base,mais comment faire pour supprimer plusieurs enregistrement dans ma base en sélectionnant plusieurs ligne de ma listview ? If res = 6 Then Set RS = New ADODB.Recordset RS.Open "Delete * from centre_aéré where Num_ctr=" & Codepsa, Db, adOpen... Lire la suite
Salut à tous ! Je ne comprends pas pourquoi j'ai un gros problème de calcul : Private Sub Text1_LostFocus()Text1 = Format(Text1, "Standard")End SubPrivate Sub Text2_LostFocus()Text2 = Format(Text2, "Standard")End SubPrivate Sub Text3_LostFocus()Text3 = Format(Text3, "Standard")End SubPrivate Sub Timer1_Timer()Total = Val(Text1) + Val(... Lire la suite
Bonjour, dans ma combobox je récupère des données de ma base, quand je clic sur une donnée comme celle la pas de problème : Bouche coupe-feu 2H Ø 125 mais quand il y a une apostrophe comme cette donnée : Bouteille d'injection 12 litres j'ai une erreur de syntaxe y à t'il moyen de contourner ce probleme ? voila le code : Private ... Lire la suite
Bonjour, j'ai créer un code pour exporter les données d'une listview vers EXCEL. Sur une dés feuille j'ai mis un CommandButton1 avec un code. Peut on au lancement de mon code VB6 agir sur l'évènement Click du CommandButton1 par contre je ne veut pas mettre le code du CommandButton1 dans Workbook_Open mais dans mon code VB6. Sub e... Lire la suite
bonjour, Je récupère des données dans une listview qui viennes de ma base. mais le problème c'est quand je modifie cette listview c'est à dire si je retire ou j'ajoute une ligne la modif ne se fait pas dans ma base. voila le code : Private Sub ReyCommand2_Click() 'modif On Error GoTo err Call Connect 'enregistrement Sql = ... Lire la suite
bonjour, j'utilise un CommonDialog pour sauvegarder ma base. est il possible d'écrire en dur dans filename pour ne pas changer le nom de la base ? voila le code Private Sub Label17_Click()CommonDialog.filename = "Base1"CommonDialog.CancelError = TrueOn Error GoTo erreur CommonDialog.ShowSave FileCopy App.Path & "\Base1.mdb", Common... Lire la suite