Erreur d'exécution '3001' [Résolu]

Signaler
Messages postés
51
Date d'inscription
vendredi 1 juin 2007
Statut
Membre
Dernière intervention
13 octobre 2012
-
Messages postés
51
Date d'inscription
vendredi 1 juin 2007
Statut
Membre
Dernière intervention
13 octobre 2012
-
si le champs tu table type de service contient un apostrophe exemple "d'une".
il y a une erreur d’exécution '3001':les argument sont de type incorrecte,en dehors des limites autorisés ou en conflits les uns avec les autres.

voici le code:







Set rsservice = New ADODB.Recordset
Set con = New ADODB.Connection
con.Provider = "microsoft.jet.oledb.4.0"
con.Open "C:\personnel\GCP.mdb"
Dim str5 As Integer

rsservice.Source = "select * from type_service"
rsservice.Open "type_service", con, , , adCmdTable
rsservice.MoveFirst
rsservice.Find "type_service = '"&DataCombo5_
& "'", , adSearchForward, 1
str5 = rsservice!idts

            
                
A voir également:

2 réponses

Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
76
Pas bonjour non plus

Si le contenu du champ comporte un ' ou un ", il suffit de le doubler avant de l'envoyer.
Voir fonction Replace

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage (Socrate)
Messages postés
51
Date d'inscription
vendredi 1 juin 2007
Statut
Membre
Dernière intervention
13 octobre 2012

merci bien sa marche