Jump to content

MakaveliHH

Members
  • Gesamte Inhalte

    23
  • Registriert seit

  • Letzter Besuch

Beiträge erstellt von MakaveliHH

  1. Ich würde hier folgendermaßen vorgehen. Baue in das Script ein Array ein, mit dem du das datum der datei auslesen kannst. danach einfach eine schleife die überprüft ob das nächste datum > ist, dann soll er diese speichern. sobald er alle dateien durchgegangen ist, sagst du er soll die datei löschen. arbeite am besten mit funktionsaufrufen.

     

     

    pruefe()
    function pruefe()
    strComputer = "."
    Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
    Set colDisks = objWMIService.ExecQuery _
    ("Select * from Win32_LogicalDisk Where DeviceID = 'C:'")
    For Each objDisk in colDisks
    freierspeicher=objdisk.freespace /1024^3
    'Wscript.Echo freierspeicher & "GB Freier Speicher"
    Next
    if freierspeicher < 30 then
    Wscript.Echo freierspeicher &"Achtung! Speicherplatz unter 1 GB" 
    '----------
    loesche()
    '----------
    
    else Wscript.Echo "Speicherplatz OK!"
    End If
    
    function loesche()
    '----->Hier wird die älteste Datei raus gesucht und gelöscht.
    'danach die funktion pruefe starten --> pruefe()
    

  2. so jetzt hab ich noch ein anderes problem...ich hab mir jetzt vorgenommen täglich den speicherplatz von einem pc im netzwerk (aber nicht in der domäne) auszulesen...da der rechner nicht in der domäne hängt hab ich natürlich keinen zugriff darauf (also ich kanns nur lokal ausführen)!

     

    jetzt müsst ich halt wissen wie ich die benutzerkennung (benutzer + passwort) in dieses script einbaue!

     

    für das auslesen des speicherplatzes auf c: hab ich das normale FreeSpace script verwendet!

     

    peace

    MurphY

     

    Du kannst das Script doch einfach schedulen und dann die Anmeldeinformationen dort eingebnen.

  3. Vielleicht kann Dir das weiterhelfen...

    Das Script verschiebt alle Dateien aus einem Ordner die älter sind als 15 Tage.

     

    -----------------

    Dim fso, files, file, datei

    datei=date-15

     

     

     

    Set fso = CreateObject ("scripting.FileSystemObject")

    set files = fso.getFolder("C:\Temp\test1").files

    For Each file In files

     

    if file.datelastmodified < datei Then

    fso.MoveFile file, "C:\Temp\test2\"

    End If

     

     

    next

    ------------------------

  4. Hallo zusammen,

     

    ein Bekannter von mir hat ein Problem mit seinem Internet.

    Alles lief super, bis seine Frau nicht mehr den Firefox Browser nutzen wollte. Naja er hat dann ein bisschen rumgespielt und nun kann er nicht mehr surfen.

    Die Internetverbindung steht und man kann eine Adresse im Internet anpingen. Der MSN Messenger geht auch. Nun das seltsame. Wenn er im IE eine Seite Aufrufen will kommt immer " Die Seite kann nicht Angezeigt werden" (egal welche). Bei Firefox passier nix wenn er eine Adresse eingibt.

     

    TCP IP Einstellungen überprüft -> Adresse und DNS wird automatiosch zugewiesen.

    Internet Explorer -> Verbindungen - Automatische suche nach konfiguration...

    und kein Proxy.

     

    Ich hatte das Problem schonmal bei anderen Rechnern gesehen aber nur eine Neuinstallation konnte das Problem lösen. Es ist so, als wenn der IE bzw. Browser nicht erkennt, dass eine Verbindung zum Internet besteht.

     

    Habt Ihr irgendwelche Ratschläge??

     

    Ich vermute das irgendwelche Registrierungswerte falsch sind...

  5. Die User sollten ein Limit auf der Mailbox haben. Wenn dieses überschritten wird sollte die User die Mails in PST Dateien auslagern. Am besten auf einem File Server, der regelmäßig auf Band gesichert wird. Wenn dann eine PST Datei defekt ist, kann diese wiederhergestellt werden. Außerdem sollten die PST Dateien nicht zu groß werden (aus Performancegründen).

  6. Hallo zusammen,

     

    wie kann ich bei einer Exchange Umgebung festlegen, in welcher Sprache Warnmeldungen

    zu den Benutzern geschickt werden?

    Z.B. bekommen manche User die Warnmeldung (unter anderem Postfach voll) in Englisch und manche in Deutsch. Wie kann ich einstellen bzw. festlegen in welcher Sprache die Meldung gesendet wird?

     

    Ich habe da mal was gehört, dass die Sprache festgelegt wird, wenn der erste Zugriff auf das Postfach erfolgt d.h. wenn ich mit einem deutschen Outlook Client auf das Postfach zugreife erscheinen die Meldungen in deutsch und andersrum. Das Problem ist nur, dass der IS auch auf Viren gescannt wird. Da der Scanner aber in English ist und das Postfach evtl. vor dem Outlook Client öffnet erscheinen die Meldungen in Englisch. Wie kann ich nachträglich die Sprache der Warnmeldungen ändern?

     

    Eingesetzt wird Exchange 2003 und Outlook 2000.

     

    Vielen Dank für Eure Hilfe im voraus.

×
×
  • Neu erstellen...