Hallo Leute,
gibt es bei Win 98 (und bei den anderen Win Varianten auch) eigentlich ein Möglichkeit bei der "Details" Ansicht in der Spalte "Grösse" auch bei Ordnern den entsprechenden Wert angezeigt zu bekommen ?
habe 14 Ordner zu überwachen und es wäre ganz hilfreich nicht jeden einzeln anklicken oder öffnen zu müssen um zu wissen ob sich etwas geändert hat.
Danke für eure Hinweise im Voraus
Oliver
Kolti Oliver 1 „Ordner : Grösse anzeigen ?“
Klar.
Rechter Mausklick auf den Ordner und Eigenschaften wählen.
victor_52 Oliver 1 „Ordner : Grösse anzeigen ?“
auf einzelklick schalten,wenn du dann mit der maus auf den ordner gehst zeigt es dir links die uhrzeit der letzten änderung an
Borlander Oliver 1 „Ordner : Grösse anzeigen ?“
Gibt es AFAIk nicht. Wäre auch seht Resourcenlasting, weil zum Ermitteln der Verzeichnis-Größe, die Größer aller Dateien innerhalb dieses Verzeichnisses und seinser Unterverzeichnisse ermittelt werden müsste. Das Anzeigen würde dadurch extrem verlangsamt.
habe 14 Ordner zu überwachen und es wäre ganz hilfreich nicht jeden einzeln anklicken oder öffnen zu müssen um zu wissen ob sich etwas geändert hat
Es gibt Tools die den Speicherverbrauch aller Ordner übersichtlich darstellen können. z.B. Treesize
Ich habe auch noch ein anders Tool das im Eigenschaftsdialog von Ordnern eingebunden wird und anschließend Größe sowie den reell auf dem Datenträger belegten Platz des Ordners incl. aller Unterordner anzeigt. Hab ich gerade nicht installiert werde den Namen aber raussuchen und hier posten.
CU Borlander
UselessUser Oliver 1 „Ordner : Grösse anzeigen ?“
Hi Oliver 1!
Ich habe gerade ein VBScript dafür geschrieben (schwitz!), das dir fortlaufend in zeitlichen Intervallen anzeigt, in welchem Ordner sich gerade die Zahl der Dateien geändert hat. Du brauchst dazu die Version 5.6 des WSH, die du dir kostenlos von M$ herunterladen kannst:
http://msdn.microsoft.com/downloads/default.asp?URL=/downloads/sample.asp?url=/msdn-files/027/001/733/msdncompositedoc.xml
Wenn du mir deine E-Mail-Adresse angibst (schicke sie zu
horsedropping@lycos.de), werde ich dir eine Textdatei mit dem Code und einigen Erläuterungen senden. Ich könnte dir den Code im Forum nur unvollständig posten, weil die spitzen Tag-Klammern im Code (enthält auch HTML) auf diesen Brettern nicht wiedergegeben werden.
MfG
UselessUser
Borlander UselessUser „Hi Oliver 1! Ich habe gerade ein VBScript dafür geschrieben schwitz! , das dir...“
Die Eckigen Klammern kannst Du so darstellen:
< <
> >
CU Borlander
UselessUser Borlander „Die Eckigen Klammern kannst Du so darstellen: lt gt CU Borlander“
Hi Borlander!
Danke für den Hinweis, ich werde es einmal versuchen. Dein Link auf meine Frage im Programmier-Forum war übrigens sehr interessant, einiges kannte ich schon, aber die Variante innerhalb der "With"-Anweisung VBScript-Befehle abzuspulen werde ich demnächst einmal ausprobieren. So könnte ich mein dort beschriebenes Problem umgehen.
Thx
UselessUser
UselessUser Oliver 1 „Ordner : Grösse anzeigen ?“
Hallo Oliver 1!
Nach dem Hinweis von Borlander versuche ich dir jetzt einmal das Script zu posten:
'******************************
'******** FOLDERWATCH *********
'******************************
nr = 13
Redim actfolder(nr)
Redim actfilenr(nr)
Redim oldfilenr(nr)
'======================
actfolder(0) = ""
actfolder(1) = ""
actfolder(2) = ""
actfolder(3) = ""
actfolder(4) = ""
actfolder(5) = ""
actfolder(6) = ""
actfolder(7) = ""
actfolder(8) = ""
actfolder(9) = ""
actfolder(10) = ""
actfolder(11) = ""
actfolder(12) = ""
actfolder(13) = ""
'======================
Set FSO = WScript.CreateObject("Scripting.FileSystemObject")
Set IE4 = WScript.CreateObject _
("InternetExplorer.Application", "Event_")
IE4.Navigate ("JavaScript:'<title>FolderWatch</title>" _
& "<body scroll=yes>FolderWatch ist gestartet.</body>'")
IE4.Width= 550
IE4.Height = 150
IE4.Toolbar = False
IE4.Statusbar = False
IE4.Visible = True
Do
Loop While IE4.ReadyState <> 4
Do
Y = Y + 1
WScript.Sleep 5000
For X = 0 To 1
Set ffolder = FSO.GetFolder(actfolder(X))
For Each ffile in ffolder.Files
actfilenr(X) = actfilenr(X) + 1
Next
If Y > 1 Then
If actfilenr(X) <> oldfilenr(X) Then
message = message & "<p>" & "</p>" & Date & " | " & Time _
& "<br>" & "=> Anzahl der Dateien im Ordner " _
& actfolder(X) & " hat sich von " & oldfilenr(X) _
& " auf " & actfilenr(X) & " verändert." & "</br>"
IE4.Document.Body.InnerHTML = message
End If
End If
oldfilenr(X) = actfilenr(X)
actfilenr(X) = 0
Next
Loop
Sub Event_onQuit
Msgbox "FolderWatch wird beendet.", vbExclamation, _
"Ende des Skriptes"
WScript.Quit
End Sub
a) Du brauchst dafür eine neuere Version des WSH, nämlich 5.6, sonst gibt es bei der "Sleep"-Methode eine Fehlermeldung. Kannst du dir kostenlos unter
http://msdn.microsoft.com/downloads/default.asp?URL=/downloads/sample.asp?url=/msdn-files/027/001/733/msdncompositedoc.xml
downloaden und dann installieren.
b) Diesen Code in den Editor kopieren und
C) bearbeiten:
Die Variable "nr" bekommt die Anzahl der Ordner zugewiesen, die du überwachen möchtest, aber: immer 1 abziehen, weil die Null hier mitzählt! (Bsp.: 14 Ordner, 13 geschrieben)
Zwischen den gestrichelten Linien werden die Pfade der einzelnen Ordner zugeordnet, und zwar zwischen die Anführungszeichen;
dabei möglichst die Pfadangabe immer mit einem Backslash "\" abschließen und darauf achten, dass von Null bis zur Zahl der Variable "nr" alle "actfolders" eine gültige Zuweisung haben, sonst gibt es eine Fehlermeldung. Bei mehr oder weniger Ordnern also entsprechend die Zeilen löschen oder hinzufügen, weil es genau passen muss.
Die Zeit der Überprüfungsintervalle kannst du in der Zeile "WScript.Sleep 5000" einstellen, indem du die Zahl 5000 änderst. 5000 bedeutet 5000 Millisekunden = 5 Sekunden. Je länger die Intervalle, desto weniger werden deine Systemressourcen im Hintergrund belastet.
d) Die Textdatei als "FolderWatch.vbs" abspeichern und mit einem Doppelklick darauf starten.
Eigentlich müsste es funktionieren .....
MfG
UselessUser
Oliver 1 UselessUser „Ob das klappt?“
Hallo UselessUser,
dein Script funktioniert einwandfrei !
Und da die ganze Sache auch übers Netzwerk funzt, ist die Geschichte mit der Systemauslastung auch Geschichte.
(Der rechner mit den 14 Ordnern ist ein PIII/450) der Rechner auf dem ich das ganz jetzt beobachte ein Athlon 1200)
Alles bestens, nochmal Danke an alle für die Hilfe (besonders natürlich an UselessUser)
mfg
Oliver
Borlander Oliver 1 „Ordner : Grösse anzeigen ?“
Habs gefunden;
Folder Size Shell Extension
Läuft leider nicht mit Win2K (und vermutlich auch nicht mit XP)
CU Borlander
Oliver 1 Borlander „Habs gefunden Folder Size Shell Extension Läuft leider nicht mit Win2K und...“
Hallo Leute,
also zuallererst einmal vielen Dank für eure Mühe.
@UselessUser : mit dem WSH geht in ordnung ich hatte sowieso vor den mal zu aktualisieren. (Und eigentlich auch schon mal dran gedacht selbst so ein Script auszutüftlen ... aber wie das so ist bleibts dan dabei.)
Also, ich werde das dann in den nächsten Tagen ausprobieren und das Ergebnis mitteilen.
An dieser Stelle nochmal vielen Dank an alle die Ihren Snef dazugegeben haben und bis bald.
mit den besten Grüssen aus Berlin
Oliver
