Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Dateiendung Temporär umbenennen mit vbs (ohne Pfadangabe)

Frage Entwicklung Batch & Shell

Mitglied: o0Julia0o

o0Julia0o (Level 1) - Jetzt verbinden

14.02.2015, aktualisiert 15.02.2015, 601 Aufrufe, 2 Kommentare, 1 Danke

hallo

ich kenne mich ein wenig mit Batch-Dateien aus, aber nicht mit VBS. Ich möchte aber mit VBS eine Datei temporär umbenennen ohne absolute Pfadangabe(und am besten ohne Hilfsdatei). Also relativ zur vbs-Datei.

Ordner\Umbenenn.vbs
Odrner\Datei.txt

Wenn ich die Umbenenn.vbs starte, soll wenn die Datei.txt vorhanden ist, diese in Datei.sic umbenannt werden. 2 Bedingungen sollten gelten:
1. Wenn die Datei.txt nicht vorhanden ist, soll nichts gemacht werden
2. Wenn die Datei.sic schon vorhanden ist, braucht auch nix gemacht zu werden

In einer 2. VBS(Rueck.vbs) soll dann quasie das Gegenteil geschehen, aber nur fast:
Wenn die Datei.sic vorhanden ist, soll sie in Datei.txt umbenannt werden. 1 Bedingung soll gelten:
1. wenn die Datei.txt bereits vorhanden ist, soll die Datei.sic gelöscht werden

Man sieht doch dann kein Fenster mit Informationen, ob das geschen ist oder nicht? Das soll nämlich auch nicht sein, sondern alles unsichtbar ohne Nachfragen ablaufen ohne zu stören.

Hier habe ich etwas ähnliches gefunden:
01.
....do ( if not "%%i" == "%ORDNER1%" if not "%%i" == "%ORDNER2%" if not "%%i" == "%ORDNER3%" if not "%%i" == "%ORDNER4%" if not "%%i" == "%ORDNER5%" echo "%%i">>%%1_loschen.txt )) & (FOR /F "delims=\" %%l in (%%1_loschen.txt) do rd ...
Quelle: http://www.administrator.de/frage/dateien-verzeichnisse-l%C3%B6schen-au ...
Kann ich statt "%Ordner1%" auch einen relativen Pfad eintragen? Von der VBS-Datei ausgehend z.B.:
01.
VBS-Ordner\Umbenenn.vbs 
02.
VBS-Ordner\Unterordner1\Ordnerbleib 
03.
VBS-Ordner\Unterordner1\Ordnerbleib2 
04.
VBS-Ordner\Unterordner1\Ordnerloesch 
05.
VBS-Ordner\Unterordner1\Dateiloesch.zip 
06.
 
07.
....do ( if not "%%i" == "%\Unterordner\Ordnerbleib%" if not "%%i" == "%\Unterordner\Ordnerbleib2%" "%%i" echo "%%i">>%%1_loschen.txt )) & (FOR /F "delims=\" %%l in (%%1_loschen.txt) do rd ...
Werden dann "VBS-Ordner\Unterordner1\Ordnerloesch" & "VBS-Ordner\Unterordner1\Dateiloesch.zip" gelöscht & die beiden anderen Ordner bleiben bestehen? So soll es jedenfalls sein.

herzlichen Dank

Julia
Mitglied: rubberman
LÖSUNG 15.02.2015, aktualisiert um 05:05 Uhr
Hallo Julia,

sollte etwa so aussehen:

Umbenenn.vbs
01.
Option Explicit 
02.
 
03.
Const strOriginFile = "Datei.txt" 
04.
Const strBackupFile = "Datei.sic" 
05.
 
06.
Dim objFSO 
07.
 
08.
Set objFSO = CreateObject("Scripting.FileSystemObject") 
09.
If objFSO.FileExists(strOriginFile) Then objFSO.MoveFile strOriginFile, strBackupFile
Rueck.vbs
01.
Option Explicit 
02.
 
03.
Const strOriginFile = "Datei.txt" 
04.
Const strBackupFile = "Datei.sic" 
05.
 
06.
Dim objFSO 
07.
 
08.
Set objFSO = CreateObject("Scripting.FileSystemObject") 
09.
If objFSO.FileExists(strBackupFile) Then 
10.
  If objFSO.FileExists(strOriginFile) Then 
11.
    objFSO.DeleteFile strBackupFile 
12.
  Else 
13.
    objFSO.MoveFile strBackupFile, strOriginFile 
14.
  End If 
15.
End If
Grüße
rubberman
Bitte warten ..
Mitglied: o0Julia0o
18.02.2015 um 23:54 Uhr
wow - super. Dankeschön!
Bitte warten ..
Ähnliche Inhalte
Windows Server
gelöst FSRM Anzahl an Dateiendungen möglich (2)

Frage von BPeter zum Thema Windows Server ...

Windows 10
gelöst Temporäres Anmelden (14)

Frage von Frager zum Thema Windows 10 ...

Batch & Shell
gelöst Base64 Decode (Batch,VBS) (26)

Frage von clragon zum Thema Batch & Shell ...

Windows Server
gelöst Temporäre Clientzugriffslizenz (6)

Frage von bluepython zum Thema Windows Server ...

Neue Wissensbeiträge
Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Windows 10

Windows 10: Erste Anmeldung Animation deaktivieren

(3)

Anleitung von alemanne21 zum Thema Windows 10 ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Linksys wrt1200ac v2 mit dd-wrt: keine vlan-einstellungen im GUI (15)

Frage von Pixi123 zum Thema Router & Routing ...

E-Business
Wo tragt ihr eure privaten Termine ein? (13)

Frage von honeybee zum Thema E-Business ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...

Entwicklung
gelöst Tipp für Anfänger- Wie würdet ihr automatischen Mailversand umsetzen? (12)

Frage von Cloudyme zum Thema Entwicklung ...