Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

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, 611 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 ...

Batch & Shell
gelöst Robocopy XF und die Probleme mit der Dateiendung (2)

Frage von Ebisumaru zum Thema Batch & Shell ...

Neue Wissensbeiträge
Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(1)

Information von DerWoWusste zum Thema Microsoft ...

Humor (lol)

Wohnt jemand in Belgien und kann nicht mehr ruhig ausschlafen?

(6)

Information von LordGurke zum Thema Humor (lol) ...

Heiß diskutierte Inhalte
Hosting & Housing
Mailserver Software Empfehlungen (21)

Frage von sunics zum Thema Hosting & Housing ...

Voice over IP
DeutschlandLAN IP Voice Data M Premium, Erfahrung mit Faxgeräte? (16)

Frage von liquidbase zum Thema Voice over IP ...

TK-Netze & Geräte
TK-Anlage VoIP - DECT Erweiterung (15)

Frage von Lynkon zum Thema TK-Netze & Geräte ...