Hilfe VBS Umstellung

  • VBScript

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von Eierlein.

    Hilfe VBS Umstellung

    Hallo zusammen,

    ich habe leider keine Ahnung vom Programmieren, trotzdem nutze ich täglich ein VBS Scrip, nur leider muss ich die Export Datei die ich als Datenquelle nutze immer wieder umstellen.

    Die Datenquelle muss nämlich momentan so aussehen, dass immer eine ID und dann ein Text in der nächsten Zeile steht. Nur leider erhalte ich aus einem Export in Tabellenform (ID und Text) als Spalte.

    Kann mir jeden helfen, das Script so umzustellen, dass ich eine Spalte für die ID und eine 2. Spalte als Text für Datenquelle in der gleichen Zeile nutzen kann?

    Ich hoffe, dass ich den richtigen Bereich für die Datenübertragung ausgewählt habe:


    Visual Basic-Quellcode

    1. Do While f.AtEndOfStream <> True
    2. x = x+1
    3. ReDim Preserve ID(x)
    4. ReDim Preserve Text(x)
    5. org_zeile = f.Readline
    6. if x mod 2 = 1 then
    7. x2=(x+1)-(x+1)/2
    8. Text(x2)= org_zeile
    9. else
    10. ID(x-x/2)= org_zeile
    11. end if
    12. Loop



    Vielen Dank im Voraus
    Peter

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „EaranMaleasi“ ()

    Nur leider erhalte ich aus einem Export in Tabellenform (ID und Text) als Spalte.


    Welches Trennzeichen zwischen ID und Text?

    Zeig mal ein paar Beispielzeilen vom alten und neuen Format.

    Versuch' mal:

    Visual Basic-Quellcode

    1. Dim TR As String
    2. TR = " " ' Trennzeichen
    3. Do While f.AtEndOfStream <> True
    4. x = x + 1
    5. ReDim Preserve Id(x)
    6. ReDim Preserve text(x)
    7. org_zeile = f.Readline
    8. text(x) = Split(org_zeile, TR)(0)
    9. Id(x) = Split(org_zeile, TR)(1)
    10. Loop
    11. End Sub

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Eierlein“ ()