Zuviel Werbung? - > Hier kostenlos beim SPS-Forum registrieren

Ergebnis 1 bis 3 von 3

Thema: VBScript ProTool/Pro csv

  1. #1
    Registriert seit
    05.10.2005
    Beiträge
    11
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Hi Leute,

    ich habe ein Problem beim Einlesen von Daten aus eine csv Datei. Ich versuche aus der csv Datei die erste Spalte einzulesen. Das klappt auch soweit ganz gut. Wenn allerdings in dem Feld ein Komma vorkommt, wird alles was dahinter steht abgeschnitten.

    Beispiel
    In der csv Datei steht:
    Connection, established:

    In ProTool/Pro kommt dann nur noch:
    Connection

    Mein Code sieht so aus:

    Set CV_BW = CreateObject("excel.application")

    CV_BW.workbooks.open "c:\Temp\test.csv"

    CV_Inhalt = CV_BW.cells(1,1).value



    Woran kann das liegen ?

    Grüße,
    Bryan
    Zitieren Zitieren VBScript ProTool/Pro csv  

  2. #2
    Registriert seit
    18.05.2005
    Beiträge
    12
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard

    Hallo

    Mit der Methode "OpenText" kann man das Trennzeichen beim Import von Textdateien umstellen (die "1" nach den sieben Kommas). Leider scheint Excel die Angabe bei csv-Dateien zu ignorieren. Es funktioniert aber, wenn man die Datei umbenennt oder kopiert:

    Set fs = CreateObject("Scripting.FileSystemObject")

    fs.CopyFile "c:\Temp\test.csv", "c:\Temp\test.txt", True

    Set fs = Nothing

    Set CV_BW = CreateObject("excel.application")

    CV_BW.workbooks.OpenText "c:\Temp\test.txt", , , , , , , 1

    WScript.Echo CV_BW.cells(1,1).value

    CV_BW.workbooks.Close

    Set CV_BW = Nothing

    mfg

    Ulf

  3. #3
    RyanB ist offline Neuer Benutzer
    Themenstarter
    Registriert seit
    05.10.2005
    Beiträge
    11
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Hallo Ulri,

    danke für deine Antwort. Ich habe das Problem auf einem ähnlichen Weg jetzt gelöst. Und zwar öffne ich die csv Datei direkt als Textdatei und lese dann die Daten Zeile für Zeile. Das klappt wunderbar.

    Für all die, die vieleicht mal das selbe Problem haben hier ein Teil des Quellcodes:

    Set CV_BW = CreateObject("scripting.FileSystemObject")
    Set CV_BW1 = CV_BW.OpenTextFile("c:\Temp\MELDUNGEN0.csv") '****** Dateiname CSV

    Do
    'Daten aus CSV Datei lesen
    CV_Inhalt = CV_BW1.ReadLine
    Loop Until CV_BW1.AtEndOfStream

    Grüße,
    Bryan

Ähnliche Themen

  1. Protool VBScript Prozess aktiv
    Von demmy86 im Forum HMI
    Antworten: 2
    Letzter Beitrag: 18.01.2011, 17:33
  2. VBScript in WinCC
    Von cracks87 im Forum HMI
    Antworten: 0
    Letzter Beitrag: 19.05.2010, 13:43
  3. Antworten: 3
    Letzter Beitrag: 13.12.2004, 12:45
  4. drucken mit VBScript
    Von volker im Forum HMI
    Antworten: 6
    Letzter Beitrag: 14.06.2004, 12:43
  5. protool + vbscript
    Von volker im Forum HMI
    Antworten: 0
    Letzter Beitrag: 07.08.2003, 12:46

Lesezeichen

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •