CONVERTISSEUR DE FICHIERS ACCESS/EXCEL/TEXTE

Commentaire de asem67 le 16/06/2005 21:08:39

Salut Yoyo2b
err lors de l'ouverture du projet
" Impossible de créer cette reference : C:\prog file ......\msADOX.dll "
alors qu'il est bien present
et ensuite lors de l'execution err suivante :
" err de compilation: projet ou biblioteque introuvable "
a+

Commentaire de asem67 le 19/06/2005 01:06:22

non je suis sous W2kpro
et je pense que le MDAC doit etre bon
la plupart de mes dev sont avec les BD
la premiere err on repond OK vb s'ouvre
lors que je lance le prog (F5)j'ai la dexieme err
a la fonction suivant :
**********
'------------------------------------------------------------------------------
'Cette fonction lit dans les fichiers ini
'------------------------------------------------------------------------------
Public Function LectFile(ByVal Key As String, ByVal Section As eSection) As String

Dim retour As Long  'retour de la fonction API : gere ces erreurs
Dim sDefault As String  'Phrase de retour par default
Dim strRetour As String 'la réponse de l'API
Dim sSection As String 'La section du fichier à lire
Dim sFile As String 'Le fichier à lire
    
    sDefault = "Erreur"
'    strRetour = String$(gSize, 0) 'SUPER IMPORTANT sinon plante l'API et VB
*********** >>>> ICI >>>>   strRetour = Space(gSize)
    'Select qui transforme l'enum en string
    sSection = TransformeSection(Section)
    'Utilisation de l'API
    retour = GetPrivateProfileString(sSection, Key, sDefault, strRetour, gSize, App.Path & PathFile)
    LectFile = Left(Trim$(strRetour), Len(Trim$(strRetour)) - 1)
End Function
********************

Commentaire de asem67 le 20/06/2005 00:47:46

effectivement j'ai changer
MS exel 11.0 obj. par le 9.0
mais probleme pour MS activX data obj. 2.8
le dernier que j'ai c'est 2.7 marche pas avec

voila ou ça deconne:
*************
Private Function EcritBaseAccess() As Boolean
'------------------------------------------'
'---   ECRITURE DE LA BASE DE DONNEES   ---'
'------------------------------------------'
    On Error GoTo Err_EcritBaseAccess
    Dim MyConnection As ADODB.Connection
    Dim Rst As ADODB.Recordset
>>>>>>>>>>>>>> ici >>>>>>>>>>>>>><   Dim connCat As ADOX.Catalog
    Dim strTmpSQL As String
    Dim Fso
    
    Dim NumTable As Integer, NumChamp As Integer
    Dim TabRec As Variant, NumRec As Integer
    Dim TabValeurs As Variant
    Dim NumVal  As Integer
    Dim stringConnection As String
    Set MyConnection = New ADODB.Connection
   >>>>>>>> ici >>>>>>>> Set connCat = New ADOX.Catalog
    Set Rst = New ADODB.Recordset
'---    si on a demandé à écraser, on crée la base
*****************************

je ne trouve pas ce que c'est ce ADOX.catalog ?????????????????

Commentaire de Yoyo2B le 20/06/2005 10:30:10

voilà , petite modif pr enlever la rééférence d'excel. la seule différence, c qu'on est obligé, lors de la lecture du classeur, de calculer le nombre de lignes et de colonnes à lire ... c tout.

:)

Commentaire de Yoyo2B le 21/06/2005 11:56:35

ouais, je disais "Microsoft ADO Ext. 2.8 for dll security"
mais ça marche aussi avec les version précédente, vu que j'utilise ça que pr créer la base de données.

je vais bientôt rajouter 2-3 nouvelle fonctiopnnalités (essentiellement pouvoir choisir les champs à exporter et pouvoir enregistrer ça dans un fichier de config...)

voilà :)

Commentaire de Yoyo2B le 04/08/2005 09:40:07

salut,

si le problème se situe là, ça ne peut venir que du MDAC (Ms Data Access Component). Il est possibl de le télécharger indépendament sur le site de microsoft (tape MDAC en téléchargement).
Est-ce que dans les références de ton projet il y en a une définie sur "manquante" ?

Commentaire de Zoubidoubidam le 15/05/2007 13:20:55

HI! Moi aussi je nage un peu niveau base de données. Je voudrais juste savoir Où on la mets ta source pour que ça fonctionne??!! Comment ça marche, quoi.. Je veux juste convertir une table access en texte.
Merci d'avance.

Réponse Pour TechnoMaxi.............
Pour importer un fichier texte en base de donnée c'est assez simple, tu n'a pas necessairement besoin du convertisseur de Yoyo2B.
Je m'explique:
Pour récupérer un fichier texte dans Excel il faut aller dans l'onglet "Données" puis "Données externes --> importer le fichier texte". Tu tombe sur un petit Assistant, y a plus qu'a cocher quelques cases pour indiquer le format de ton fichier txt et le tour est joué!
Sous Access t'as exactement la même fonction dans l'onglet "Fichier" puis "Données externes --> importer". Une fenêtre "Importer" s'ouvre. Sélectionne fichier txt dans la case type de fichier, clique sur ton fichier texte et tu retrouvera le fameux assistant!
Voli, voilou !
Bonne continuation

Commentaire de samsterom le 21/03/2008 10:43:53

Bonjour,

est-ce que je suis le seul à ne pas avoir accès au .exe dans le zip?

merci.

Commentaire de samsterom le 25/03/2008 10:44:07

Merci pour ta réponse, je dois avouer que ce n'est pas trop mon domaine et je cherche à apprendre quelquechose de nouveau...donc je suis un débutant pas très douer pour le moment ( j'espère que çà ne durera pas!!).

Est-ce que tu pourrais m'expliquer la démarche pour compiler car lorsque j'importe mes fichiers dans VBA certains ne peuvent être chargés (.frm par exemple) et je n'arrive donc pas à compiler pour avoir le code source.

Merci encore
Bonne journée

Commentaire de samsterom le 27/03/2008 10:26:50

Merci pour cette information très importante qui ne m'a pas sauté aux yeux!!

Je vais me documenter un peu plus.

Bonne journée

@+

Commentaire de dahbia le 11/08/2008 09:19:00

Bonjour,
Super ton code je l'ai utilisé selon mes besoin, ça marche impeccable merci.
Bon courage.

Commentaire de sniperdd le 13/09/2008 14:27:42

Je n'arrive pas à ouvrir cette application en visual studio 2005 et je suis besoin de cette application qq. me aider de dire comment ouvrir cette application par quel logiciel c urgent