136782
136782
Jul 26, 2018
view2444
view31
0
Goto Top

Umwandlungsskript

GermanQuestionBasicDevelopment
Hallo,
ich muss ein VBSkript skript erstellen : Ein Programm (aufrufbar per Kommandozeile) soll die Datei input.txt in output.csv umwandeln.

Wie kann ich das machen?
Danke
comment-contentCommentShareShare
Share on Facebook Share on Twitter Share on Reddit Share on Linkedin

Content-Key: 381396

Url: https://administrator.de/contentid/381396

Printed on: April 16, 2024 at 04:04 o'clock

31 Comments
Latest comment
Goto Top
Member: colinardo
colinardo Jul 26, 2018 updated at 08:47:32 (UTC)
Goto Top
Servus.
Umwandeln
Schönes "universelles" Wort, wenn es dir nur ums "umbenennen" geht:
INPUT = "d:\input.txt"  
OUTPUT = "d:\output.csv"  
Set fso = CreateObject("Scripting.Filesystemobject")  
If fso.FileExists(OUTPUT) Then
	MsgBox OUTPUT & " existiert schon.",vbExclamation  
        wscript.quit
End If
fso.MoveFile INPUT, OUTPUT
Grüße Uwe
Member: emeriks
emeriks Jul 26, 2018 at 08:46:36 (UTC)
Goto Top
@uwe
Tolle Interpretation! face-wink face-wink
Member: colinardo
colinardo Jul 26, 2018 updated at 08:49:41 (UTC)
Goto Top
Zitat von @emeriks:

@uwe
Tolle Interpretation! face-wink face-wink
Joa, steht ja sonst nix da face-smile. Jeder bekommt was er verdient wenn er so gewürgt beschreibt. :-P. Sind ja offensichtlich wieder die Hausaufgabenjunkies unterwegs ...
Mitglied: 136782
136782 Jul 26, 2018 at 08:49:46 (UTC)
Goto Top
Super, Vielen Dank für die rasche Antwort.

ich bin aber trotzdem noch nicht fertig face-sad

Dabei sind folgende Dinge zu beachten:
- Zeilen ohne Materialnummer sind zu ignorieren (rot markiert)
- Es ist nur die Nummer des Lieferanten zu übernehmen, nicht der Name (grün markiert)
- Sollte der Kurztext ein ; enthalten, ist das zu ersetzen durch ein , damit die CSV-Datei funktioniert
Member: colinardo
colinardo Jul 26, 2018 updated at 08:53:04 (UTC)
Goto Top
ich bin aber trotzdem noch nicht fertig
Tja und warum steht das dann nicht direkt in deinem Post?? Koppschüttel.
(rot markiert) (grün markiert)
LOL face-big-smile. Bin ich jetzt schon farbenblind?! Icke seh nix.
Member: emeriks
emeriks Jul 26, 2018 at 08:51:27 (UTC)
Goto Top
Einen Tag zu früh ....
Member: colinardo
colinardo Jul 26, 2018 updated at 08:52:17 (UTC)
Goto Top
Zitat von @emeriks:
Einen Tag zu früh ....
Die haben jetzt 6 Wochen Freitag... Gott steh uns bei.
Mitglied: 136782
136782 Jul 26, 2018 at 08:52:58 (UTC)
Goto Top
sorry dachte ich nicht, das so schnell ein antwort bekommen werd face-smile
Member: Lochkartenstanzer
Lochkartenstanzer Jul 26, 2018 updated at 09:02:31 (UTC)
Goto Top
Zitat von @136782:

Hallo,
ich muss ein VBSkript skript erstellen : Ein Programm (aufrufbar per Kommandozeile) soll die Datei input.txt in output.csv umwandeln.

Dim objFso  
Set objFso= CreateObject("Scripting.FileSystemObject")    
objFso.MoveFile "input.txt", "output.csv "

Oder was meintest Du?

lks


PS: Sehe gerade, daß Uwe die gleiche Idee hatte. face-smile
Member: Xaivia
Xaivia Jul 26, 2018 at 09:06:11 (UTC)
Goto Top
Guten Morgen
Sobald "skript" in einem Beitrag steht läuten Alarmglocken und alles wir priorisiert
die Antwortbereitschaft ist hier enorm und die Leute haben sehr viel Erfahrung


Gruß S
Mitglied: 136782
136782 Jul 26, 2018 at 09:07:39 (UTC)
Goto Top
Danke füe die Antwort

das funktioniert auch, aber bin noch nicht fertig

Dabei sind folgende Dinge zu beachten:
- Zeilen ohne Materialnummer sind zu ignorieren
- Es ist nur die Nummer des Lieferanten zu übernehmen, nicht der Name
- Sollte der Kurztext ein ; enthalten, ist das zu ersetzen durch ein , damit die CSV-Datei funktioniert
Member: colinardo
colinardo Jul 26, 2018 updated at 09:18:48 (UTC)
Goto Top
Zitat von @136782:
ich bin aber trotzdem noch nicht fertig face-sad

Dabei sind folgende Dinge zu beachten:
- Zeilen ohne Materialnummer sind zu ignorieren (rot markiert)
- Es ist nur die Nummer des Lieferanten zu übernehmen, nicht der Name (grün markiert)
- Sollte der Kurztext ein ; enthalten, ist das zu ersetzen durch ein , damit die CSV-Datei funktioniert
Er spielt mit uns "Ich sehe was was du nicht siehst..."

Sorry aber du weist schon das wir nicht vor deinem Bildschirm sitzen, hier sieht niemand irgendwas rot oder grün markiertes! Also formuliere dein Anliegen noch mal ganz in Ruhe mit allen Details wenn du hier überhaupt noch irgendetwas produktives erwarten willst, unsere Glaskugeln sind im Urlaub.
Member: emeriks
emeriks Jul 26, 2018 at 09:13:04 (UTC)
Goto Top
Zitat von @colinardo:
Er spielt mit uns "Ich sehe was was du nicht siehst..."
lol
Member: Lochkartenstanzer
Lochkartenstanzer Jul 26, 2018 at 09:24:47 (UTC)
Goto Top
Zitat von @136782:

Super, Vielen Dank für die rasche Antwort.

ich bin aber trotzdem noch nicht fertig face-sad

Dabei sind folgende Dinge zu beachten:
- Zeilen ohne Materialnummer sind zu ignorieren (rot markiert)
- Es ist nur die Nummer des Lieferanten zu übernehmen, nicht der Name (grün markiert)
- Sollte der Kurztext ein ; enthalten, ist das zu ersetzen durch ein , damit die CSV-Datei funktioniert

Such Dir einen Ghostwriter oder schau in dein Schulmaterial.

lks
Member: eisbein
eisbein Jul 26, 2018 at 09:25:22 (UTC)
Goto Top
Also formuliere dein Anliegen noch mal ganz in Ruhe mit allen Details wenn du hier überhaupt noch irgendetwas produktives erwarten willst, unsere Glaskugeln sind im Urlaub.

Da sind die Erwartungen zu hoch gesteckt!

Besser der TO postet die komplette Aufgabe 1:1 und auch noch welche Beurteilung/Note er sich dafür erwartet, damit wir uns bei der Antwort danach richten können.
Mitglied: 136782
136782 Jul 26, 2018 at 09:26:39 (UTC)
Goto Top
sorry das ist die input.txt
Member: Kraemer
Kraemer Jul 26, 2018 at 09:35:40 (UTC)
Goto Top
Dir ist schon klar, dass das was du da hast, schon eine "CSV" ist? Halt mit Tab als Spaltentrenner.
Member: Lochkartenstanzer
Lochkartenstanzer Jul 26, 2018 at 09:37:10 (UTC)
Goto Top
Zitat von @Kraemer:

Dir ist schon klar, dass das was du da hast, schon eine "CSV" ist? Halt mit Tab als Spaltentrenner.

Und da ist ein Einzeiler in bash ausreichend, um das umzuwandeln. face-smile

lks
Mitglied: 136782
136782 Jul 26, 2018 at 09:38:24 (UTC)
Goto Top
ja, aber dabei sind folgende Dinge zu beachten:
- Zeilen ohne Materialnummer sind zu ignorieren (rot markiert)
- Es ist nur die Nummer des Lieferanten zu übernehmen, nicht der Name (grün markiert)
- Sollte der Kurztext ein ; enthalten, ist das zu ersetzen durch ein , damit die CSV-Datei funktioniert
Member: Kraemer
Kraemer Jul 26, 2018 at 09:40:38 (UTC)
Goto Top
Zitat von @136782:
- Sollte der Kurztext ein ; enthalten, ist das zu ersetzen durch ein , damit die CSV-Datei funktioniert
was zur Hölle sollte das eine mit dem anderen zu tun haben. Bei CSV gibt es diese netten kleinen Dinger: ". Damit werden Texte markiert - die durchaus auch Kommata und Semikola enthalten dürfen!
Member: Lochkartenstanzer
Lochkartenstanzer Jul 26, 2018 at 09:50:38 (UTC)
Goto Top
Zitat von @136782:

ja, aber dabei sind folgende Dinge zu beachten:
- Zeilen ohne Materialnummer sind zu ignorieren (rot markiert)
- Es ist nur die Nummer des Lieferanten zu übernehmen, nicht der Name (grün markiert)
- Sollte der Kurztext ein ; enthalten, ist das zu ersetzen durch ein , damit die CSV-Datei funktioniert

Das sind alle snur kosmetische Änderungen, die man mit Hilfe reguläreer Ausdrücker schnell erschlagen kann.

lks
Mitglied: 136782
136782 Jul 26, 2018 at 09:54:25 (UTC)
Goto Top
und wie kann ich das machen ?
Sorry aber ich habe mir VBS nie gearbietet
Member: colinardo
colinardo Jul 26, 2018 updated at 10:04:05 (UTC)
Goto Top
Zitat von @Lochkartenstanzer:
Und da ist ein Einzeiler in bash ausreichend, um das umzuwandeln. face-smile
Jepp in Powershell auch
(Import-CSV 'D:\input.txt' -Delimiter "`t") | ?{$_.Material -ne ''} | select * -ExcludeProperty 'Name des Lieferanten' | export-csv 'D:\output.csv' -Delimiter ";" -NoType -Encoding UTF8
Sorry aber ich habe mir VBS nie gearbietet
Und dann willst du Funktionen ergänzen, wie das mit null Ahnung??
Member: Archeon
Archeon Jul 26, 2018 at 10:04:42 (UTC)
Goto Top
Zitat von @colinardo:
Und dann willst du Funktionen ergänzen, wie das mit null Ahnung??
In dem er einfach immer weiter fragt und jeder mal eine Zeile hinzufügt, bis das Konstrukt vollständig ist face-wink

Gruß
Member: Lochkartenstanzer
Lochkartenstanzer Jul 26, 2018 updated at 10:13:19 (UTC)
Goto Top
Uwe, Du bist zu gutmütig.

lks
Member: colinardo
colinardo Jul 26, 2018 updated at 10:27:35 (UTC)
Goto Top
Umso schneller sind wir ihn los face-smile. Aber wenn jemand aus einer "IT Firma" aus Fernost mit sowas hier aufkreuzt ist sowieso Hopfen und Malz verloren.
Member: keine-ahnung
keine-ahnung Jul 26, 2018 at 10:24:46 (UTC)
Goto Top
Moin,
"Umwandlungsskript"
zahlreiche Umwandlungsscripte findest Du für umme zum download auf www.wasser-in-wein.de !

Einfach machen!
LG, Thomas
Member: colinardo
colinardo Jul 26, 2018 updated at 10:34:28 (UTC)
Goto Top
Zitat von @keine-ahnung:
zahlreiche Umwandlungsscripte findest Du für umme zum download auf www.wasser-in-wein.de !
Nun hat er sich in Luft umgewandelt, auch eine Methode.
Member: MrT0astbr0t
MrT0astbr0t Jul 26, 2018 at 11:07:38 (UTC)
Goto Top
Warum macht man das nicht mit Powershell?

$impath = "D:\test\test.txt"
$expath = "D:\test\test.csv"

if(Test-Path $expath -eq "False"){
$file = get-content $impath
$file | Out-File $expath
}
else{
Write-Host "Fehler! Datei existiert bereits!" -ForegroundColor Red
}
Member: keine-ahnung
keine-ahnung Jul 26, 2018 at 11:08:50 (UTC)
Goto Top
Nun hat er sich in Luft umgewandelt, auch eine Methode.
Kruzitürken ... das hatte ich vergessen zu übermitteln --> da läuft ein Startscript auf der Seite, welches dafür verantwortlich ist face-smile

LG, Thomas
Member: colinardo
colinardo Jul 26, 2018 updated at 11:29:35 (UTC)
Goto Top
Zitat von @MrT0astbr0t:
Warum macht man das nicht mit Powershell?
@ Toastbrot: Lese mal den ganzen Thread. btw. ein rename-item hätt's dafür auch getan
GermanQuestionBasicDevelopment