Autor: admin

Script Logic DA 8.1 Setzt den Standarddrucker nicht immer vollständig um. Hier ist ein Script um dies im Nachgang noch zu Bereinigen.
Funktioniert allerdings nur bei min. 2 Druckern.

Const ATTR_DEFAULT = 4
strComputer = "."
Set oWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set colPrinters = oWMI.ExecQuery("SELECT * FROM Win32_Printer")
For Each oPrinter in colPrinters
If oPrinter.Attributes And ATTR_DEFAULT Then
oPrinter.SetDefaultPrinter()
Set NewDefaultPrinter=oPrinter
End If
Next
For Each oPrinter in colPrinters
If Not oPrinter.Attributes And ATTR_DEFAULT Then
oPrinter.SetDefaultPrinter()
exit For
End If
Next
If IsNull(NewDefaultPrinter) Then
Wscript.echo "Kein Standarddrucker gefunden"
Else
NewDefaultPrinter.SetDefaultPrinter()
End If


RVTools – Home.

GU10 LED Lampen bzw. Strahler – light bulbs warmweiss günstig.

Seit dem 1. 2. 2014 darf man Firmware Updates bei HP nur noch mit Aktivem Wartungsvertrag erhalten. d.H. Jetzt Registrieren und den ganzen komplizierten Apperat wie bei schon einigen anderen Herstellern. Vorbei die Zeit der unkomplizierten Server Updates.

ecome a great tool for IT professionals to save time in completing day to day activities. Another great use of PowerShell however, is correcting corruptions or errors sometimes caused by GUI based apps. In this Step-By-Step post, the example given is that of..

via Browse by Tags – Canadian IT Professionals – Site Home – TechNet Blogs.

Six Tasks You Can’t Do With Traditional IT Operations Tools

via Six Tasks You Can’t Do With Traditional IT Operations Tools.

Spaß mit Arduino und Processing.

IBF-Wiki deutsch.

Identische Attachments werden nun in jeder Empfänger-Mailbox gespeichert statt wie bisher nur einmal. Allerdings kann die In-Store-Kompression nur bei leicht komprimierbaren

via Vorsicht Falle: Die Tücken der Exchange-2010-Migration.