run---vbs

[raplay 10]

Hallo Zusammen

Unten habe ich ein teil eines Skripts von mir aufgeführt.

 

Das Problem ist:

Wie kann ich mit .run eine Variabel in den Pfad einbauen???

 

So funktionierts sowiso nicht...

Dim  WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
Dim DateinameOrginal
DateinameOrginal = "WasAuchImmer.vbs"
Zufall = Rnd()


WshShell.run ""C:\" & Zufall & DateiNameOrginal"

 

Geht auch nicht

WshShell.run "C:\" & Zufall & DateiNameOrginal

 

kennt sich da jemand aus??

 

Noch eine Frage die aber weniger wichtig ist:

Gibts einen Befehl welcher mir alle untergeortneten verzeichnise wieder giebt, und ich einzelne davon dan aufrufen kann?

 

Zum beispiel:

Es gibt ein Verzeichnis

C:\V1\V2

und C:\V1\V3

Das Skript ligt in V1 und soll mir nun erst V1 und dan V3 wiedergeben.

 

Danke euch vielmals

 

Raplay

[Cybquest 36]

Was soll der RUN-Befehl bei dir denn bezwecken?

Du baust eine Zufallszahl mit einem "Wasauchimmer" zusammen und willst das dann ausführen?

 

Mit dem RUN-Befehl können nur ausführbare Dateien aufgerufen werden.

[raplay 10]

Was soll der RUN-Befehl bei dir denn bezwecken?

Du baust eine Zufallszahl mit einem "Wasauchimmer" zusammen und willst das dann ausführen?

 

Mit dem RUN-Befehl können nur ausführbare Dateien aufgerufen werden.

Ja stimmt... danke

 

habs falsch übernommen..:jau:

aber das löst das prob auch nicht

"C:\" & Zufall & DateiNameOrginal ist der pfad zu einer vbs datei

[Cybquest 36]

OK, ich vermute jetzt mal, du willst ein Programm aufrufen und dem als Parameter die Zufallswasauchimmer-Konstruktion übergeben.

 

Wenn der Parameter ohne Leerzeichen ist z.B.

Set WshShell = WScript.CreateObject("WScript.Shell")
strParameter = Rnd() & "Wasauchimmer.txt"

Wshshell.run "notepad.exe " & strParameter

 

Wenn der Parameter Leerzeichen enthalten kann:

Set WshShell = WScript.CreateObject("WScript.Shell")
strParameter = Rnd() & "Was auch immer.txt"

Wshshell.run "notepad.exe """ & strParameter & """"

 

Auf die Anzahl der Gänsefüssle achten.

[raplay 10]

hallo nein

ich will ein vbs skript aufrufen das im C:\ liegt und den Namen der Zufall & DateinameOrginal hat

 

OK, ich vermute jetzt mal, du willst ein Programm aufrufen und dem als Parameter die Zufallswasauchimmer-Konstruktion übergeben.

 

Wenn der Parameter ohne Leerzeichen ist z.B.

Set WshShell = WScript.CreateObject("WScript.Shell")
strParameter = Rnd() & "Wasauchimmer.txt"

Wshshell.run "notepad.exe " & strParameter

 

Wenn der Parameter Leerzeichen enthalten kann:

Set WshShell = WScript.CreateObject("WScript.Shell")
strParameter = Rnd() & "Was auch immer.txt"

Wshshell.run "notepad.exe """ & strParameter & """"

 

Auf die Anzahl der Gänsefüssle achten.

[raplay 10]

hallo

nein

ich will ein vbs skript aufrufen das im C:\ liegt und den Namen der Zufall & DateinameOrginal hat

wobei Zufall = Rnd()

und DateinameOrginal = "WasAuchImmer.vbs"

[Cybquest 36]

Ja aber die VBS muss doch irgendwo dann auch mit der gleichen Zufallszahl mal erzeugt worden sein?!? Das mit dem Zufall ist mir in dem Zusammenhang einfach schleierhaft.

[raplay 10]

"Zufall" bleibt ja bis zum aufruf von Randomize() gleich...

Ich habe einfach eine datei welche "Zufall" im name enthält die ich nun aufrufen möchte

Aber hab jetzt ne halb wegs gute lösung...danke trotzdem

 

Ja aber die VBS muss doch irgendwo dann auch mit der gleichen Zufallszahl mal erzeugt worden sein?!? Das mit dem Zufall ist mir in dem Zusammenhang einfach schleierhaft.