Comment changer le delimiter

slak Messages postés 10 Date d'inscription vendredi 18 juin 2004 Statut Membre Dernière intervention 20 mars 2006 - 17 févr. 2006 à 23:23
cs_Stephane33 Messages postés 630 Date d'inscription samedi 15 février 2003 Statut Modérateur Dernière intervention 9 octobre 2011 - 23 févr. 2006 à 12:52
bonjour les amis
je veux importer un fichier log en base de donnees en utilisant access j'ai trouve ce code la

' importation d'un fichier texte délimité par des ';'
obj_Access.DoCmd.TransferText acImportDelim, ";", Nom_Table, Nom_Fichier, False

mais mon pb c que mon log est delimite par des espaces et pas par des point virgule
aidez moi svp
merci d'avance

4 réponses

slak Messages postés 10 Date d'inscription vendredi 18 juin 2004 Statut Membre Dernière intervention 20 mars 2006
18 févr. 2006 à 00:41
j 'ai oublie de vous dire que je travail sur vb6 et pas sur vba access, je voudrai bien travaille avec une specification d'import mais je crois que ca marche pas sur vb
merci de votre aide
0
cs_Stephane33 Messages postés 630 Date d'inscription samedi 15 février 2003 Statut Modérateur Dernière intervention 9 octobre 2011 1
18 févr. 2006 à 10:48
obj_Access.DoCmd.TransferText acImportDelim, ";", Nom_Table, Nom_Fichier, False
en fait tu utilise access.(en objet)
0
slak Messages postés 10 Date d'inscription vendredi 18 juin 2004 Statut Membre Dernière intervention 20 mars 2006
23 févr. 2006 à 04:34
evidement, j'utilise access.object et voila mon code:
Private Sub Command1_Click()
Dim obj_Access As Access.Application
Dim Nom_Base_Access As String
Dim Nom_Fichier As String
Dim Nom_Table As String

Spec = "c:\temp\schema.ini"
Nom_Fichier = "c:\temp\essai1.txt"
Nom_Base_Access = "c:\temp\bd3.mdb"
Nom_Table = "Table1"


' Création d'un objet Access
Set obj_Access = New Access.Application


' Ouverture de la base Access
obj_Access.OpenCurrentDatabase Nom_Base_Access


'obj_Access.NewCurrentDatabase Nom_Base_Access


' Si mot de passe
'SendKeys MotDePasse & "~"


' destruction de la table de réception sinon ça ajoute dans la table
On Error Resume Next
obj_Access.DoCmd.DeleteObject acTable, Nom_Table
On Error GoTo 0


' importation d'un fichier texte délimité par des ';'
obj_Access.DoCmd.TransferText acImportDelim, ";", Nom_Table, Nom_Fichier, False
' Fermeture de la base
obj_Access.Quit


' Libération de la mémoire
Set obj_Access = Nothing
End
End Sub

mon probleme c'est que mon text a importer est delimite par des espaces et pas par des virgules.
je ne sais pas comment faire
aidez moi svp
0
cs_Stephane33 Messages postés 630 Date d'inscription samedi 15 février 2003 Statut Modérateur Dernière intervention 9 octobre 2011 1
23 févr. 2006 à 12:52
la constante sous Vb c'est pas vbTab, car le délimiteur c'est rarement un espace, mais plutôt une tabulation
0