Dateigröße bestimen und Rückgabewert

[HuBaer]

Hallo,

habe zwei Fragen:

1. Gibt es in VisualBasicScript irgendeinen Befehl, mit dem ich die Größe einer Textdatei oder die Länge des enthaltenen Textes ermitteln kann?

2. Falls nein, gibt es irgendein kleines Tool irgendwo zum downloaden?

3. Kann ich mit der shell-Funktion von vbs irgendwie nachher einen Rückgabewert des aufgerufenen Programms verarbeiten?

danke euch!


Gruß
Christoph

EDIT: Frage 1 und 2 haben sich erledigt, ich habe den LEN-Befehl gefunden.

 

[Backslash]

Hi!

zu 3) ich weiß nicht ob es eine VBS Funktion gibt, aber du kannst zur Not die Ausgabe in eine Datei schreiben lassen (einfach ">PFAD" anhängen) und anschließend diese Datei lesen (zB per FileSystemObject). Also zum Beispiel so:

Set fso = CreateObject("Scripting.FileSystemObject")
Set shell = CreateObject("WScript.Shell")
shell.Run "ping www.t-com.de>C:\ausgabe.txt" ' Oder jeder andere Befehl
WScript.Sleep 5000 ' Dass genug Zeit ist den Befehl auszuführen, je nach Befehl anpassen
Set datei = fso.OpenTextFile("C:\ausgabe.txt")
ausgabe = datei.ReadAll()
datei.Close()

und du hast deine Ausgabe in der Varibale Ausgabe. Ich weiß: etwas umständlich (und man könnte zur sicherheit noch eine Abfrage einbauen, ob die Ausgabedatei exisitiert, um Errors zu vermeiden), aber es funktioniert.

mfg Backslash


//edit: Sorry funzt anscheinend doch nicht.. habs gradmal ausprobiert und anscheinend wird die datei nicht erstellt.. muss mir das nommal anschauen