cs_Frank33
Messages postés5Date d'inscriptionjeudi 1 mai 2003StatutMembreDernière intervention 8 septembre 2004
-
6 sept. 2004 à 04:23
cs_Frank33
Messages postés5Date d'inscriptionjeudi 1 mai 2003StatutMembreDernière intervention 8 septembre 2004
-
8 sept. 2004 à 00:58
Bonjour à tous,
j'ai un probeleme d'instabilité dans mon project access 2000
voila des que je clique sur le bouton "imgImp"-
un message apparait : Run-time error '13': Type mismatch
je ne comprend pas d'ou s'execute le probleme
J'y comprend rien !
Que faire ?
A l'aide
Merci pour toutes vos suggestions
Voici mon code:
--------------------------------------------
Private Sub imgImp_Click()
Dim db As Database
Dim rsin As Recordset
Dim rsout As Recordset
Dim Codigo
Dim Filtre As String
Dim RetVal As Long
Set db = CodeDb
Set rsin = db.OpenRecordset("Query_Final") <<<<ERRO
Call db.Execute("DELETE FROM TB_Temp_Export;", dbFailOnError)
Set rsout = db.OpenRecordset("TB_Temp_Export")
cs_DARKSIDIOUS
Messages postés15814Date d'inscriptionjeudi 8 août 2002StatutMembreDernière intervention 4 mars 2013130 6 sept. 2004 à 09:19
Les erreurs numéro 13 correspondent à un type qui n'est pas le bon : par exemple, un integer alors qu'il faut un string, un string alors qu'il faut un integer, un picturebox alors qu'il faut un textbox, etc.
cs_frop01
Messages postés1352Date d'inscriptionlundi 27 octobre 2003StatutMembreDernière intervention19 novembre 20082 6 sept. 2004 à 14:00
salut
- dans la première partie du code, tu veux ajouter une seule ligne à rsout à partir du rsin ou c'est repeat qui manque ?
- si c'est le cas pourquoi rsin.movenext ?
- ya pas un repeat ou un teste de validité du curseur ?- Codigo rsin.Fields("Id_Distrito")> if not rsin.eof then Codigo = rsin.Fields("Id_Distrito")
- autre forme rsout.Fields("champs") === rsout!champs ou rsout("champs")
cs_Frank33
Messages postés5Date d'inscriptionjeudi 1 mai 2003StatutMembreDernière intervention 8 septembre 2004 7 sept. 2004 à 01:21
Salut
la première partie du code, je veux ajouter une seule ligne ;
voila un exemple :
Distrito Concelho Localidad Cliente Lugar Observação
AVEIRO Águeda Águeda Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
BRAGA Amares Amares Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Barcelos Agrela Cliente Lugar Observação
Barcelos Barcelos Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Cliente Lugar Observação
Barcelos Carvalhal Cliente Lugar Observação
Cliente Lugar Observação
les modifications a été effectuée l'ereur celle-ci à continuer
J'espère que vous pourrez m'aider!
Merci d'avance.
A l'aide A l'aide A l'aide A l'aide A l'aide A l'aide A l'aide
Vous n’avez pas trouvé la réponse que vous recherchez ?
cs_Frank33
Messages postés5Date d'inscriptionjeudi 1 mai 2003StatutMembreDernière intervention 8 septembre 2004 7 sept. 2004 à 01:26
Salut
la première partie du code, je veux ajouter une seule ligne ;
voila un exemple :
Distrito Concelho Localidad Cliente Lugar Observação
AVEIRO Águeda Águeda Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------
Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
BRAGA Amares Amares..Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
Barcelos Agrela.............Cliente Lugar Observação
Barcelos Barcelos...........Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
Barcelos Carvalhal.........Cliente Lugar Observação
-------------------------------Cliente Lugar Observação
les modifications a été effectuée l'ereur celle-ci à continuer
J'espère que vous pourrez m'aider!
Merci d'avance.
A l'aide A l'aide A l'aide A l'aide A l'aide A l'aide A l'aide
cs_Frank33
Messages postés5Date d'inscriptionjeudi 1 mai 2003StatutMembreDernière intervention 8 septembre 2004 7 sept. 2004 à 19:42
Salut,
Je vais essayer d'expliquer mon objectif. Je veux exporter les registres de la base de données d'Access pour une feuille d'Excel. Il doit placer dans la première Ligne les registres : "District, Commune, Localité, Client, Place, Commentaire". Il passe dans la deuxième Ligne confirme si le registre actuel et égale a l'ancien si oui n'écrit rien passe dans le registre suivant "Commune" effectue la même procédure pour se registre "Localité? et les autres registres passe normalement dans la feuille.
Voila un exemple :
cs_frop01
Messages postés1352Date d'inscriptionlundi 27 octobre 2003StatutMembreDernière intervention19 novembre 20082 7 sept. 2004 à 20:18
Juste une petite remarque avant de continuer l'analyse.
Assures toi que les champs District, Commune, Localité, Client, Place, Commentaire sont de type texte et Chaine vide autorisé = Oui et ya pas de clé primaire et unique .