Jump to content

Dr Kiffer

Members
 Profil anzeigen  Aktivitäten des Benutzers anzeigen

  • Gesamte Inhalte

    448

  • Registriert seit

  • Letzter Besuch

 Inhaltstyp 

Beiträge erstellt von Dr Kiffer

  1. Script beim Herunterfahren

    in Windows Forum — Scripting

    Geschrieben

    hier noch eine vbs Variante die dir auch den korrekten Laufwerksbuchstaben ausspuckt, solltest du öfters mehrere Massenspeichergeräte angeschlossen haben und die Buchstaben sich verschieben..

     

    strComputer = "."
Set wmi = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set col = wmi.ExecQuery("Select * FROM Win32_LogicalDisk WHERE VolumeName = 'KINGSTON'")'KINGSTON ist der Name der Partition der externen Platte
For Each obj in col
strLWbst = obj.Caption
if strLWbst <> "" then
wscript.echo "ich mache jetzt mein Backup auf Laufwerk " & strLWbst & "\"
End if
Next

     

    Gruß

     

    Danny

  2. Script beim Herunterfahren

    in Windows Forum — Scripting

    Geschrieben

    Hallo redgoblin,

     

    du kannst auf dem XP Rechner einfach mal gpedit.msc starten.

     

    Dort kannst du dann unter Computerkonfiguration -->Windows-Einstellungen-->Skripts(Start/Herunterfahren) ein Skript definieren welches beim Herunterfahren ausgeführt wird.

     

    Alternativ unter Benutzerkonfiguration-->Windows Einstellungen -->Skripts(Anmelden/Abmelden) für jeden User bei Abmeldung.

     

     

    Für dein Skript kannst du z.B

     

    @echo off
if not exist g: (goto ende)
echo ich mache jetzt ein Backup
:ende
echo hier ist ende
exit

     

    Gruß

     

    Dann

  3. 2k3 Druckserver per Script einrichten?

    in Windows Forum — Scripting

    Geschrieben

    Hey redshirt,

     

    wenn du die Treiber einmal auf den Server geladen hast kannst du die Druckerkonfigurationsskripte aus dem System32 Verzeichnis verwenden.

     

    Hier mal ein Beispiel

     

    'Den Druckerport erstellen
cscript C:\Windows\System32\prnport.vbs -a -r IP_192.168.1.10 -h 192.168.1.10 -o raw -n 9100
'Den Drucker auf dem Server erstellen
cscript C:\Windows\System32\prnmngr.vbs -a -p "Druckername" -m "HP LaserJet 5N" -r "IP_192.168.1.10"
'Den Drucker freigeben und im Verzeichnisanzeigen
cscript C:\Windows\System32\prncnfg.vbs -t -p Druckername -h "Druckername_Freigabe" +shared +published

     

    Gruß

     

    Danny

  5. SQL Query in Excel "einbauen"?

    in Windows Forum — Scripting

    Geschrieben

    Moin blob,

     

     

    welche Excel Version hast du denn?

     

    Also bei 2007 kannst du im Reiter Daten im Feld "externe Daten abrufen" auf "Aus anderer Quelle" klicken und dann den SQL Server auswählen.

     

    Dannach kommt ein mehr oder weniger ;) selbsterklärender Assistent.

    Du hast auch hinterher die Möglichkeit Abfragen zu definieren.

     

    Bei Excel 2003 unter Daten --> Externe Daten importieren solltest du auch fündig werden..

     

    Gruß

     

    Danny

  6. Windows 2008 SBS Server Premium Installationsstrategie

    in Windows Server Forum

    Geschrieben

    Hi greatmgm,

     

    also meines Wissens nach funktionieren auf dem SBS an sich nur die adminsessions.

    Also kannst du den gar nicht als TS benutzen.

     

    Hardwareseitig lässt der 2008 SBS sich unter 4GB Ram nicht installieren.

    Also mit einer alten schwachen Maschine ist hier auch nicht viel getan.

     

    Wir haben den bei uns auch laufen.

     

    Server 1 als SBS und Server 2 als TS und SQL.

     

    Läuft nicht überragend schnell aber das passt schon.

     

    Gruß

     

    Danny

  8. VPN mit EAP Einwahl

    in Windows Forum — LAN & WAN

    Geschrieben

    Hallo Dr.Verpeilung,

     

    mhh sieht so aus als wenn der NAP nicht das richtige Zertifikat verwendet.

     

    Schau mal in deiner Netzwerkrichtlinie unter Einschränkungen --> Authentifizierungsmethode.

    Da wirs du ja "Smartcard oder anderes Zertifikat" in den EAP Typen stehen haben.

    Den Eintrag kannst du bearbeiten und das korrekte Zertifikat von deiner zertifizierungstelle auswählen.

     

    Gruß

     

    Danny

  11. Netzwerkadapter abfragen - Geschwindigkeit und Autoermittlung?

    in Windows Forum — Scripting

    Geschrieben

    Hallo und herzlich Willkommen hier an Board.

     

    Ich hab da mal eine kleine vbs-Funktion zu geschrieben.

     

    Ich nehme an wenn du WMI-Abfragen machst, machst du die über vbs.

     

    Über WMI kannst du auch den Index abfragen.

    Den müsstest du nur noch in eine 4 stellige Zahl umwandeln.

     

    Hier das Skript

     

    function get_nic_speed(intindex) 'intindex 4 stellige Indexnummer
Const HKEY_LOCAL_MACHINE = &H80000002
arrmodes =  array ("SpeedAndDuplex","SpeedDuplex","DuplexMode","ConnectionType","RequestedMediaType","ConnectionType_A","ForceSpeedDpx","*SpeedDuplex","EXTPHY")
strComputer = "."
Set oReg=GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
Set wshshell = WScript.CreateObject ("wscript.shell")
for each mode in arrmodes 
  strlink_desc = "ParamDesc"
  strkeylink_desc = "SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002bE10318}\"& intindex & "\Ndi\params\" & mode & "\"
  oReg.GetStringValue HKEY_LOCAL_MACHINE,strkeylink_desc,strlink_desc,reglink_desc 
  if reglink_desc <> "" then
   strfinal_key = "SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002bE10318}\"& intindex
   strfinal_value = mode
   oReg.GetStringValue HKEY_LOCAL_MACHINE,strfinal_key,strfinal_value,regfinal_value    
   strkey_enum = "SYSTEM\CurrentControlSet\Control\Class\{4D36E972-E325-11CE-BFC1-08002bE10318}\"& intindex & "\Ndi\params\" & mode & "\enum"
   oReg.GetStringValue HKEY_LOCAL_MACHINE,strkey_enum,regfinal_value,speed_name
   get_nic_speed = speed_name
  End If
Next
End Function

     

     

    Bis jetzt habe ich noch keine NIC/Treiber gesehen wo die WMI-Abfragen auf Auto-Sense und Speed funktionieren.

     

    Gruß

     

    Danny

  17. vbs Alle Dateien aus Verzeichnis auflisten

    in Windows Forum — Scripting

    Geschrieben

    Hallo zusammen

     

    ich hab da ein Problem. Ich möchte ein paar alte Sicherungen löschen die älter als 2 Monate sind.

    Die Sicherungen enthalten u.a das komplette Profil.

    Das Script läuft rekursiv alle Verzeichnisse durch.

    Jetzt hab ich bei manchen Verzeichnissen das Problem, dass mir nicht alle Dateien mit

     

    Set oWso = CreateObject("Scripting.FileSystemObject")
Set oFolder = oWso.GetFolder("E:\Datensicherung\XXX\C\Dokumente und Einstellungen\U12345\Lokale Einstellungen\Temp\Temporary Internet Files\Content.IE5\85VP4AAR")
For Each oFile In oFolder.Files
.
.
.
Next

    aufgelistet werden.

     

    Jetzt ist in diesem Verzeichnis eine Datei mit einem sehr sehr sehr langen Dateinamen.

     

    Diese Datei wird nicht in oFile übernommen.

    mit einem wscript.echo ofile.name passiert einfach nichts.

    Ende vom Lied ist, dass der Ordner hinterher nicht gelöscht werden kann mit dem Fehler "Path not found"

    Pfad ist natürlich vorhanden, da er durch die oFolder.Subfolders ermittelt wurde.

     

    Ich hoffe das ist halbwegs verständlich und ihr könnt mir ein wenig helfen:)

     

    Gruß

     

    Danny

  22. User bekommt Gruppenrichtlinie, aber woher

    in Active Directory Forum

    Geschrieben

    Hi,

     

    unter Umständen ist direkt in der Benutzerregistrierung / HKEY_USER die Einstellung festgelegt. Schau doch einmal auf Technet oder über die ADM / ADMX Dateien, wohin die Einstellungen geschrieben werden (ggf. einmal den Policy Zweig "nicht beachten", sondern den normalen Registry-Zweig einsetzen).

     

    Vielleicht findest Du dort ein "fest verdrahtetes" Setting.

     

    Viele Grüße

    olc

    Moin,

     

    mhh durch ein neues User-Profil sollte das eigentlich ausgeschlossen sein oder?

     

    Gruß

     

    Danny

  24. 2nd Shot bis 30.Juni

    in MS Zertifizierungen — Prüfungen

    Geschrieben

    Also wie jetzt.

     

    Wenn ich meine Prüfung am 30.06 mache, ist die Frist für den 2.Shot doch schon vorbei, oder nicht?

     

    Jein,

     

    du könntest am 30.06 selber die Prüfung noch ein zweites Mal machen.

     

     

    Und nebenbei, ich konnte letzte Woche eine Prüfung ink. 2nd Shot buchen sowie antreten. 2nd Shot hab ich zum Glück nicht gebraucht.

     

    Und wenn ich die Woche mit der 70-647 fertig werde, buch ich nochmal mit dem 2nd Shot.:)

     

    Gruß

     

    Danny

×
×
  • Neu erstellen...