1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. Visual Basic 6
Sujet Précédent Sujet Suivant

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

                                                    

                        
                            


        
        

        

                        Réponse 1 / 2
        

                    
                

                

        

                            
                    

                    

        
    


        

                

                
    
        

                            
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)                        
                
                

    
            

                            

                        

    
    
    


                    

                        

                    

        

    

        

            
        

    

    

    

        


        
        

        

                        Réponse 2 / 2
        

                    
                    

                

        

                            
                    

                    

    


        

                

                
    
        

                            
Messages postés

                

                                51
                

                                        
Date d'inscription

                
vendredi  1 juin 2007

                                        
Statut

                
Membre

                                        
Dernière intervention

                
13 octobre 2012

                    

    

                    

                    
                        

    


    

                        
                    merci bien sa marche                        
                
                

    
            

                            

                        

    
    
    


                    

                        

                    

        

    

        

            
        

    

    

    

                


                
    
    
                    

                    

                                                            
            Répondre        
                                        
            Posez votre question