Hi,
ich möchte ein Skript schreiben das im Verzeichnis, in dem das Skript ausgeführt wird, einen Ordner namens "Konfig" anlegt und danach eine bestimmte Datei in diesen Ordner verschiebt.
Ich bin momentan so weit gekommen dank Google (Ich habe vorher noch nie Skripts programmiert):
Das Problem dabei ist, dass es behauptet, der Ordner wäre schon vorhanden und alles Nachfolgende natürlich auch nicht macht. Wo ist das Problem?
ich möchte ein Skript schreiben das im Verzeichnis, in dem das Skript ausgeführt wird, einen Ordner namens "Konfig" anlegt und danach eine bestimmte Datei in diesen Ordner verschiebt.
Ich bin momentan so weit gekommen dank Google (Ich habe vorher noch nie Skripts programmiert):
VB.NET-Quellcode
- Option Explicit
- Dim sPath
- Dim Ordner, fso
- set fso = CreateObject("Scripting.FileSystemObject")
- sPath = Replace(WScript.ScriptFullName ,WScript.ScriptName, vbNullString)
- msgbox(sPath)
- If fso.FolderExists(sPath) then
- msgbox("Ordner bereits vorhanden")
- else
- Ordner = fso.CreateFolder(sPath & "Konfig\")
- msgbox("Ordner erstellt")
- End If
- If fso.FileExists(spath & "000_formular_Start.xml") then
- fso.MoveFile spath & "000_formular_Start.xml", spath & "Konfig\"
- else
- msgbox("Startformular nicht vorhanden.")
- End If
Das Problem dabei ist, dass es behauptet, der Ordner wäre schon vorhanden und alles Nachfolgende natürlich auch nicht macht. Wo ist das Problem?