Pfad Variable für aktuelles Fenster VBS

[waimea_mac]

Hallo,

ich habe ein kleines VBS Script erstellt, mit dem man eine Textdatei erstellen kann. Nun soll ich dieses Script im TC einbinden. Dazu benötige ich die Pfadvariable des Fensters das gerade offen ist (entweder links oder rechts).
Würde mich freuen, wenn mir jemand helfen könnte.

Wers brauchen kann... hier ist mein Script:

set fs = CreateObject("Scripting.FilesystemObject")

scriptname = Wscript.ScriptFullName
scriptpath = fs.getparentfoldername(scriptname)

msgbox scriptpath

dim dateiname
Dim ofso
dim antwort

set ofso = CreateObject("Scripting.FileSystemobject")
dateiname=Inputbox("Wie soll die Datei heißen?")

if ofso.FileExists (dateiname & ".txt") then
Msgbox ("Diese Datei ist schon vorhanden")
antwort=Msgbox("Wollen Sie diese überschreiben?",vbyesNo)


if antwort=vbYes then
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile(dateiname & ".txt")
else
'nix
end if


else
' nix
end if

[sqa_wizard]

Im einfachsten Fall (ohne Script) die Umsch-F4 Taste drücken

... aber wenn du es schon mal geschrieben hast:
Button anlegen mit

Code: Select all

Befehl: cscript "C:\MeinPfad\meinscript.vbs" //Nologo
Parameter:  "%P"

Der Pfad wird als Parameter übergeben und kann im Script ausgelesen werden.

[bwr]

Hallo,

probier doch mal Script Helper. Damit habe ich auch schon erfolgreich ein paar Scripte erstellt. Es sind Beispiele dabei, leider sind die Kommentare in einer für Westeuropäer nicht verständlichen Sprache verfasst. Das macht aber nichts, mit einem Objektbrowser findet man sich sehr schnell zurecht und das Werkzeug funktioniert sehr zuverlässig. Alles was mit "src" - source beginnt bezieht sich auf das aktive Fenster, und mit "trg"- target auf das andere.

Du bekommst es hier: http://www.totalcmd.net/plugring/script_helper.html

Viel Erfolg

Andi

[waimea_mac]

supi... vielen dank für den tipp (umschalt F4) funtkioniert einwandfrei...
schöne weihnachten!!

Im einfachsten Fall (ohne Script) die Umsch-F4 Taste drücken

... aber wenn du es schon mal geschrieben hast:
Button anlegen mit

Code: Select all

Befehl: cscript "C:\MeinPfad\meinscript.vbs" //Nologo
Parameter:  "%P"

Der Pfad wird als Parameter übergeben und kann im Script ausgelesen werden.