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

Folder Unterfolder löschen

Frage Entwicklung VB for Applications

Mitglied: bigsero

bigsero (Level 1) - Jetzt verbinden

19.10.2010 um 10:49 Uhr, 3203 Aufrufe, 5 Kommentare

Hallo zusammen

Ich habe ein kleines Problem

Folgender Code möchte ich ausfüren. Die Variable %username% nicht vergessen
Es sollen alle Dateien und Subfolder mit Dateien gelöscht werden


TempDel = "\\nvacest066\userredir$\%username%\Application Data\Sun\Java\Deployment\cache\*"
If (objFileSystem.FolderExists(TempDel)) Then
objFileSystem.DeleteFolder(TempDel)
End if
Mitglied: em-pie
19.10.2010 um 11:29 Uhr
Moin,

Blöd dass meine geheiligte Glaskugel gerade in Reperatur ist ;)

Was genau ist dein Problem?
löscht er dir nichts, formatiert er dir deine Server?

Springt die Kaffemaschine an?

Gruß
meistro
Bitte warten ..
Mitglied: bigsero
19.10.2010 um 13:07 Uhr
LOL

Ich möchte den kompletten Inhalt (Files und Folder) des Ordners löschen.

"\\nvacest066\userredir$\%username%\Application Data\Sun\Java\Deployment\cache\*"

Aber es passiert nichts............... Auch kein Kaffee.. (ist Schade)
Bitte warten ..
Mitglied: bastla
19.10.2010 um 13:15 Uhr
Hallo bigsero!

Wenn der Ordner selbst erhalten bleiben soll, etwa so:
01.
Set objShell = WScript.CreateObject("WScript.Shell") 
02.
TempDel = "\\nvacest066\userredir$\" & objShell.ExpandEnvironmentStrings("%username%") & "\Application Data\Sun\Java\Deployment\cache" 
03.
If objFileSystem.FolderExists(TempDel) Then 
04.
    Set TheDir = objFileSystem.GetObject(TempDel) 
05.
    For Each File In TheDir.Files 
06.
        File.Delete 
07.
    Next 
08.
    For Each SubFolder In TheDir.SubFolders 
09.
        SubFolder.Delete 
10.
    Next 
11.
End If
Alternativ könntest Du den Username auch so einbauen:
01.
Set objNetwork = WScript.CreateObject("WScript.Network") 
02.
TempDel = "\\nvacest066\userredir$\" & objNetwork.UserName & "\Application Data\Sun\Java\Deployment\cache"
... und ja, löschen kannst Du auch mit
01.
objFileSystem.DeleteFile(TempDel & "\*", True) 
02.
objFileSystem.DeleteFolder(TempDel & "\*", True)
Grüße
bastla
Bitte warten ..
Mitglied: bigsero
19.10.2010 um 13:22 Uhr
Merci vielmal

nur,
Ich bekomme einen Fehler

runtime error
Object required: 'objFileSystem'

Warum?
Bitte warten ..
Mitglied: bastla
19.10.2010 um 13:25 Uhr
Hallo bigsero!
Object required: 'objFileSystem'
... sollte eigentlich selbsterklärend sein - Du hast das entsprechende Objekt noch nicht mit
Set objFileSystem = CreateObject("Scripting.FileSystemObject")
erzeugt (was ich aufgrund Deines oben geposteten Codes aber als bereits erledigt vorausgesetzt habe) ...

Grüße
bastla
Bitte warten ..
Ähnliche Inhalte
Windows Server
Zugriff verweigert bei Folder redirection (8)

Frage von krodon zum Thema Windows Server ...

Windows Userverwaltung
Roaming profile mit folder redirection will nicht so recht (5)

Frage von menace zum Thema Windows Userverwaltung ...

Exchange Server
Move Public Folder to another Public Folder (4)

Frage von c64b311ee9 zum Thema Exchange Server ...

Batch & Shell
gelöst ( Batch ) Open File or Folder Dialog (5)

Frage von clragon zum Thema Batch & Shell ...

Neue Wissensbeiträge
Windows Tools

Zeit für Energiesparmodus, Bildschirmabschaltung etc. schnell anpassen

Anleitung von hannsgmaulwurf zum Thema Windows Tools ...

Linux Netzwerk

Ping und das einstellbare Bytepattern

(1)

Erfahrungsbericht von LordGurke zum Thema Linux Netzwerk ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(4)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Heiß diskutierte Inhalte
Microsoft Office
Office Druck fehler (18)

Frage von DaistwasimBusch zum Thema Microsoft Office ...

Windows Server
Zertifikat am DC erneuern funktioniert nicht (14)

Frage von takvorian zum Thema Windows Server ...