IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Discussion :

Problème Line Input sur csv


Sujet :

VBA

  1. #1
    Membre confirmé
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    297
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 297
    Points : 542
    Points
    542
    Par défaut Problème Line Input sur csv
    Bonjour à tous, j'utilise un code pour me permettre de lire un csv afin de déterminer si je dois réécrire une ligne ou non. Bref la n'est pas le probleme, quand je fais tourner en pas à pas ca fonctionne correctement le fichier se lit, mais une fois que je lance le programme ca ne fonctionne plus, il ne lit plus.

    Voici le morceau en question :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    'Duplicate test
    ReWrite = False
    Open CSVfile1 For Input As #1
    Do While Not EOF(1)
        Line Input #1, ligne
        ID = Mid(ligne, 1, InStr(1, ligne, ",") - 1)
        If ID = IDcode Then
            ReWrite = True
        End If
     Loop
    Close #1
    Lors du pas à pas la variable "ligne" est correctement remplie avec les lignes du csv mais une fois que je passe en mode auto ca ne fonctionne plus la variable est vide....

    Donc je comprends pas vraiment ce qui cloche

  2. #2
    Expert confirmé
    Avatar de jurassic pork
    Homme Profil pro
    Bidouilleur
    Inscrit en
    décembre 2008
    Messages
    2 230
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Bidouilleur
    Secteur : Industrie

    Informations forums :
    Inscription : décembre 2008
    Messages : 2 230
    Points : 5 607
    Points
    5 607
    Par défaut
    hello,
    que se passe-t-il avec ce code ? :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Dim I As Integer
    ReWrite = False
    I = 1
    Open CSVFile1 For Input As #1
    Do While Not EOF(1)
        Line Input #1, ligne
        ID = Mid(ligne, 1, InStr(1, ligne, ",") - 1)
        Debug.Print I, " : ", ID
        I = I + 1
        If ID = IDcode Then
            ReWrite = True
        End If
     Loop
    Close #1
    Ami calmant, J.P
    Jurassic computer : Sinclair ZX81 - Zilog Z80A à 3,25 MHz - RAM 1 Ko - ROM 8 Ko

  3. #3
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    juin 2019
    Messages
    693
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : juin 2019
    Messages : 693
    Points : 1 066
    Points
    1 066
    Par défaut
    Bonjour,
    Lors du pas à pas la variable "ligne" est correctement remplie avec les lignes du csv mais une fois que je passe en mode auto ca ne fonctionne plus la variable est vide....
    Le pas à pas je comprends ce que ça veut dire mais le mode auto ????

    Ou et comment le code est exécuté ?

  4. #4
    Membre confirmé
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    297
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 297
    Points : 542
    Points
    542
    Par défaut
    Salut, je voulais dire en exécutant le code.

    Alors c'est exécuté sur solidworks. Un programme qui sert a extraire des information concernant la géométrie d'une pièce et d'enregistrer ces paramètres dans un fichier CSV.

    Ici je cherche simplement à savoir si l"IDcode" est déjà présent dans mon fichier pour savoir si je dois remplacer la ligne ou non. En mode pas à pas détaillé la variable "ligne" se remplit bien avec les infos du fichier CSV mais quand je passe à l’exécution du code, ça plante sur le instr() car la variable "ligne" est vide. Et je précise que ça s’arrête des la première ligne lue.

    C'est bizarre d'avoir une différence en pas à pas détaillé et en exécution classique.

  5. #5
    Responsable
    Office & Excel


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    novembre 2003
    Messages
    18 219
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : novembre 2003
    Messages : 18 219
    Points : 52 605
    Points
    52 605
    Billets dans le blog
    114
    Par défaut
    Salut.

    Comment vérifies-tu que ta variable est vide lorsque tu n'es pas en "pas à pas"?

    On n'a qu'une partie du code, donc on ne sait pas voir:
    • comment tes variables sont valorisées;
    • si tes variables sont déclarées (présence de Option Explicit?);
    • si elles sont valorisées;
    • ce qui est exécuté avant ce morceau de code;
    • ...



    Perso, je créerais une fonction "qui ne fait que ça", c'est-à-dire dont le rôle serait de tester la présence de l'ID. Ca permet de la tester à l'aise hors de tout déroulement applicatif. après, tu l'insères dans ton code comme une fonction native de VBA. Je ne sais pas si cela résoudra ton problème, mais cette découpe en fonctions courtes qui n'ont qu'une seule responsabilité te permet de tester plus facilement "des bouts de code" indépendamment les uns des autres et de circonscrire les problèmes à des blocs de code qui sont courts, compréhensibles rapidement et surtout indépendants d'un contexte qui pourrait altérer leur fonctionnement. Ici, j'ai en outre modifié ta boucle pour lui éviter de tourner pour rien lorsque tu as trouvé l'ID.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    Function IdIsOk(Filename As String, ID As String) As Boolean
      Dim Temp As String
      Dim Ligne As String
      Dim Channel As Long
     
      Channel = FreeFile
      Open Filename For Input As Channel
      Do While Not EOF(Channel) And IdIsOk = False
        Line Input #Channel, Ligne
        If InStr(1, Ligne, ",") > 0 Then Temp = Mid(Ligne, 1, InStr(1, Ligne, ",") - 1)
        IdIsOk = (ID = Temp)
      Loop
    Close Channel
    End Function
     
    Sub Test1()
      Debug.Print IdIsOk("c:\data\temp\christianbosch.txt", "manon")
    End Sub
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

  6. #6
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    juin 2019
    Messages
    693
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : juin 2019
    Messages : 693
    Points : 1 066
    Points
    1 066
    Par défaut
    bonjour,
    le séparateur de champ de ton CSV est un virgule InStr(1, Ligne, ",") - 1
    vue que tu cherche une valeur l'utilisation d'ADO peut s'avéré judicieux!

    si tu pouvais nous fournir 2 3 ligne du fichier CSV pour exemple!

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    Function IdIsOk(Server As String, CSV As String, ID As String) As Boolean
    With CreateObject("AdoDb.connection")
       .Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Server & ";Extended Properties=""Text;HDR=No;FMT=Delimited;"""
        IdIsOk = Not .Execute("Select * from [" & CSV & "] Where [F1]='" & Replace(ID, "'", "''") & "'").EOF
       .Close
    End With
    End Function
    Sub test()
    Const Server As String = "C:\Myrep", CSV As String = "Test#csv"
    Debug.Print IdIsOk(Server, CSV, "toto")
    End Sub

  7. #7
    Membre confirmé
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    297
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 297
    Points : 542
    Points
    542
    Par défaut
    Salut, oui voila je vous joint le fichier :


    CSV test.txt

  8. #8
    Membre confirmé
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    297
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 297
    Points : 542
    Points
    542
    Par défaut
    Citation Envoyé par jurassic pork Voir le message
    hello,
    que se passe-t-il avec ce code ? :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Dim I As Integer
    ReWrite = False
    I = 1
    Open CSVFile1 For Input As #1
    Do While Not EOF(1)
        Line Input #1, ligne
        ID = Mid(ligne, 1, InStr(1, ligne, ",") - 1)
        Debug.Print I, " : ", ID
        I = I + 1
        If ID = IDcode Then
            ReWrite = True
        End If
     Loop
    Close #1
    Ami calmant, J.P
    Salut JP, ça bloque à I=27 et la variable "ligne" est vide.

    Le code s’arrête donc sur la ligne oui il y a "Mid"

    Je pense que la lecture a la fin du CSV se fait quand même sur des lignes vides car je n'ai que 25 lignes de données + 1 ligne pour les entetes

  9. #9
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    juin 2019
    Messages
    693
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : juin 2019
    Messages : 693
    Points : 1 066
    Points
    1 066
    Par défaut
    Vola j'ai fais un test avec ton fichier!
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Sub test()
    Const Server As String = "C:\Myrep", CSV As String = "CSV test#txt"
    Debug.Print IdIsOk(Server, CSV, "0WDWAM4J_DR_B33225522")
    End Sub
    Function IdIsOk(Server As String, CSV As String, ID As String) As Boolean
    With CreateObject("AdoDb.connection")
       .Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Server & ";Extended Properties=""Text;HDR=Yes;FMT=Delimited;"""
        IdIsOk = Not .Execute("Select * from [" & CSV & "] Where [numero identification unique]='" & Replace(ID, "'", "''") & "'").EOF
     
     
       .Close
    End With
    End Function

  10. #10
    Membre confirmé
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    297
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 297
    Points : 542
    Points
    542
    Par défaut
    Je pense qu"il devait y avoir une ligne vide à la fin c'est ce qui faisait planter le code au niveau de l'analyse du texte.

    Je pense avoir résolu le problème. Merci

    Par contre j'en ai un autre, quand je fais une simple écriture (dans le cas d'un nouvel ID), mon fichier se vide completement pour y inserer la nouvelle ligne :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    Function AddCSVLine(Filename As String, Line As String)
    Dim channel As Long
    channel = FreeFile
    Open Filename For Output As channel
        Print #channel, Line
    Close channel
    End Function
    Je sais pas trop si je m'y prends bien, je ne sais pas si la commande "Print" est adaptée pour écrire une ligne supplémentaire

  11. #11
    Membre éprouvé
    Homme Profil pro
    Retraité
    Inscrit en
    juin 2019
    Messages
    693
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : juin 2019
    Messages : 693
    Points : 1 066
    Points
    1 066
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Sub test()
    AddCSVLine "C:\Myrep\CSV test.txt", "toto"
    End Sub
     
    Function AddCSVLine(Filename As String, Line As String)
    Dim FSO, Newf As Integer
    If Dir(Filename) = "" Then Newf = 2 Else Newf = 8
    Set FSO = CreateObject("Scripting.FileSystemObject")
    Set Fichier = FSO.OpenTextFile(Filename, Newf, True)
    Fichier.Write Line
    Fichier.Close
    Set Fichier = Nothing
    Set FSO = Nothing
    End Function

  12. #12
    Responsable
    Office & Excel


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    novembre 2003
    Messages
    18 219
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : novembre 2003
    Messages : 18 219
    Points : 52 605
    Points
    52 605
    Billets dans le blog
    114
    Par défaut
    Citation Envoyé par ChristianBosch Voir le message
    ...
    Tu dois l'écrire For Append et pas For Output. Si le fichier n'existe pas, il sera créé. S'il existe, la ligne sera ajoutée après la dernière du fichier

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Sub AddLine(Filename As String, Line As String)
      Dim Channel As Long
     
      Channel = FreeFile
      Open Filename For Append As Channel
      Print #Channel, Line
      Close Channel
    End Sub
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

  13. #13
    Membre confirmé
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    297
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 297
    Points : 542
    Points
    542
    Par défaut
    Merci pour vos deux codes c'est parfait.

    CB

  14. #14
    Responsable
    Office & Excel


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    novembre 2003
    Messages
    18 219
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : novembre 2003
    Messages : 18 219
    Points : 52 605
    Points
    52 605
    Billets dans le blog
    114
    Par défaut
    Salut.

    Pour ceux que cela intéresse, j'ai écrit un billet sur le sujet...
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

  15. #15
    Membre confirmé
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    297
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 297
    Points : 542
    Points
    542
    Par défaut
    Salut Pierre, merci pour le billet il est génial !

    Concernant l'acquisition d'un canal dispo, tu utilises "Freefile", est il possible de l'utiliser deux fois dans le même programme. Exemple :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
    sub testCSV
    dim channel1 as long
    dim channel2 as long
     
    channel1 = Freefile
    channel2 = Freefile
     
    open CSV1 as channel1 for input
    open CSV2 as channel2 for output
     
     
     
    .....
    Ou alors il faut ouvrir les canaux avant. Exemple :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
     
    sub testCSV
    dim channel1 as long
    dim channel2 as long
     
    channel1 = Freefile
    open CSV1 as channel1 for input
     
    channel2 = Freefile
    open CSV2 as channel2 for output
     
     
    .....

  16. #16
    Responsable
    Office & Excel


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    novembre 2003
    Messages
    18 219
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : novembre 2003
    Messages : 18 219
    Points : 52 605
    Points
    52 605
    Billets dans le blog
    114
    Par défaut
    Salut Christian

    FreeFile donne le prochain numéro disponible. Tu dois donc ouvrir le canal avant de récupérer le nouveau Freefile.

    FreeFile ne fait que dire quel est le premier canal dispo, mais c'est Open qui "prend le ticket" et Close qui le libère. C'est particulièrement intéressant lorsque tu dois ouvrir un fichier en lecture pour repousser ses données dans un autre en écriture.
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

  17. #17
    Responsable
    Office & Excel


    Homme Profil pro
    Formateur et développeur chez EXCELLEZ.net
    Inscrit en
    novembre 2003
    Messages
    18 219
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 54
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur et développeur chez EXCELLEZ.net
    Secteur : Enseignement

    Informations forums :
    Inscription : novembre 2003
    Messages : 18 219
    Points : 52 605
    Points
    52 605
    Billets dans le blog
    114
    Par défaut
    Pour qui est intéressé, j'ai formalisé l'utilisation d'un fichier de log utilisant Open & Cie au sein d'une fonction générique dans ce billet de blog
    "Plus les hommes seront éclairés, plus ils seront libres" (Voltaire)
    ---------------
    Mes billets de blog sur DVP
    Mes remarques et critiques sont purement techniques. Ne les prenez jamais pour des attaques personnelles...
    Pensez à utiliser les tableaux structurés. Ils vous simplifieront la vie, tant en Excel qu'en VBA ==> mon tuto
    Le VBA ne palliera jamais une mauvaise conception de classeur ou un manque de connaissances des outils natifs d'Excel...
    Ce ne sont pas des bonnes pratiques parce que ce sont les miennes, ce sont les miennes parce que ce sont des bonnes pratiques
    VBA pour Excel? Pensez D'ABORD en EXCEL avant de penser en VBA...
    ---------------

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. problème d'accent sur le fichier csv
    Par olikhvar dans le forum Langage
    Réponses: 1
    Dernier message: 05/02/2011, 07h04
  2. [Conception] problème avec firefox sur les champs input type="file"
    Par maverick56 dans le forum EDI, CMS, Outils, Scripts et API
    Réponses: 9
    Dernier message: 11/05/2007, 10h57
  3. Problème avec Line Input
    Par Scepti-K dans le forum VB 6 et antérieur
    Réponses: 3
    Dernier message: 25/10/2006, 22h42
  4. Petit problème avec Line Input
    Par GrosQuicK dans le forum VB 6 et antérieur
    Réponses: 2
    Dernier message: 14/09/2005, 12h47

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo