Install printerdrivers with WMI and VB.NET

This is an example of how you install printerdrivers with .NET and WMI (Windows Management Instrumentation). Most examples on the Internet shows how this can be done with vbscript, printui.dll and such…

A list of properties can be found at MSDN Win32_PrinterDriver

Other topics:
How to install printerports with WMI and VB.NET
How to create a printerqueu with .NET and WMI

Imports System.Management

Dim infPath  as String = "c:\driver\printerdriver.inf"
Dim mp As ManagementPath = New ManagementPath("Win32_PrinterDriver")

Dim co As ConnectionOptions = New ConnectionOptions()
co.EnablePrivileges = True

Dim ms As ManagementScope = New ManagementScope("\\" + Environment.MachineName + "\root\cimv2", co)

Dim mcPrinterDriver As New ManagementClass(ms, mp, Nothing)
mcPrinterDriver.SetPropertyValue("Name", "drivername")
mcPrinterDriver.SetPropertyValue("SupportedPlatform", "Windows NT x86") ' x86-architecture
'mcPrinterDriver.SetPropertyValue("SupportedPlatform", "Windows x64") ' x64-architecture
mcPrinterDriver.SetPropertyValue("Version", 3)
mcPrinterDriver.SetPropertyValue("FilePath", System.IO.Path.GetDirectoryName(infPath))
mcPrinterDriver.SetPropertyValue("InfName", infPath)

Dim inParams As System.Management.ManagementBaseObject = Nothing
inParams = mcPrinterDriver.GetMethodParameters("AddPrinterDriver")
inParams("DriverInfo") = CType(mcPrinterDriver, System.Management.ManagementBaseObject)
Dim outParams As System.Management.ManagementBaseObject = mcPrinterDriver.InvokeMethod("AddPrinterDriver", inParams, Nothing)

Dim uiReturnValue As UInteger = System.Convert.ToUInt32(outParams.Properties("ReturnValue").Value)

I have tested this in Windows XP, Windows 7 and Windows 2008R2. Make sure your account has privileges to install drivers.

On Windows XP the drivers are installed physically to:
C:\WINNT\system32\spool\drivers

And in the registry:
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Print\Environments

Boost performance on your Asus EEE 900

My sister has the Asus eee 900 netbook, the one with 16GB SSD hard drive, and Windows XP. The performance on the machine was very very bad. The bottleneck was the SSD-drive that made the machine hang when there were (m)any writes to it. I have made all optimizations that you can do on Windows XP, like disabling all services that aren’t needed. However, the machine was still slow. While browsing the eeeuser forum I found the magical solution in one of the threads….

The solution was to install Flashfire SSD Accelerator. FlashFire is a software for Solid-State Drives and uses host RAM to enhance random write performance of a SSD. Read more about other peoples success-stories in the eeeuser forum.

After installing Flashfire the computer is fast as hell and has no hangups. It is such a miracle! I highly recommend this piece of software for all people with netbooks that has slow SSD-drives.

Mid Sweden Technology Conference i Sundsvall

Den 9 september så var jag på Mid Sweden Technology Conference på Folkets Hus här i stan. Det var en trevlig tillställning som arrangerades av Åkroken Science Park AB. Man förklarade att det skulle bli en återkommande konferens med fokus med utveckling och teknik inom Microsoft-området och denna gång så låg fokuset på ”Windows 7″.

Programmet var följande:

08.00-08.30 Registrering

08.30-09.30 Arbeta smart (Nils Morén, XLENT)

09.45-10.45 Nytt försäkringssystem i .NET (Thomas Hellström, SPV)
Thomas Hellström är ansvarig arkitekt i ett pågående projekt på Statens Pensionsverk som syftar till att utveckla ett nytt försäkringssytem med den största delen på .NET plattformen. Thomas kommer berätta om de utmaningar som ställs på ett sådant system och de tekniska lösningar som valts.

11.00-12.15 Azure (Johan Lindfors, Microsoft)
Windows Azure består också av tjänster som SQL Azure och .NET Services. Dessa kan användas både i molnet och från lokalt installerade applikationer. Här visar vi på exempel och demonstrerar teknikerna som redan idag finns tillgängliga för utvecklare!

12.15-13.15 Lunch

13.15-14.00 Windows 7 (Magnus Jungåker, Microsoft)
Windows 7 är ett modernt operativsystem som alla kan använda och företag sparar mycket på att rulla ut som standartklient. Vi har fokuserat på att utveckla de fundamentala egenskaperna som prestanda, kompatibilitet, säkerhet och stabilitet. Vi lägger också till funktionerna DirectAccess och BranchCache. Vi har förbättrat sök och hårddiskkrypteringsfunktionerna. Men vi har framförallt gjort ett operativsystem som gör användaren mer produktiv och företaget effektivare.

14.15-15.15 Virtualization (Magnus Jungåker, Microsoft)
Med Live Migration i Windows Server 2008 R2 och Server Management Suite Datacenter har Hyper-V blivit en mogen och fullfjädrad servervirtualiseringslösning. På klientsidan har Microsoft i Desktop Optimization Pack (MDOP) och Virtual Enterprise Centralized Desktop(VECD) alla teknologier på plats för att även virtualisera klientsidan.

15.30-16.45 Rika klienter (Robert Folkesson, Microsoft)
I den här sessionen visas hur rika klienter kan dra nytta av ny funktionalitet i Windows 7 som Taskbar notifications, Jump Lists och federerad sökning. Vi visar också de nya möjligheterna som Multi-touch ger och undersöker hur stödet för detta kommer att se ut i .NET Framework 4 och Windows Presentation Foundation.

17.00-18.00 RIA Arkitektur (Fredrik Normén, Cornerstone)
Fler och fler affärs applikationer flyttas till målnet , fler och fler användare vill a bättre användarupplevelse. Enligt Gartner Research, så är 60% av all nya applikationer skapade som RIA under 2010. I denna session så får du lära dig hur arktietkturen för en RIA kan se ut, vad man bör tänka på etc när man utvecklar RIA.

Mina Synpunkter
Jag tycker att det var intressant att lyssna på Thomas Hellström från SPV och hans tankar om deras .NET utvecklingsprojekt. Han undertryckte bla. vikten av att testa sina ideer med proof-of-concept lösningar, och det är något som jag själv gillar väldigt mycket. Det är viktigt att testa sin design med en enkel modell innan man börjar bygga något stort.

Sedan så var det intressant att höra föreläsarna från Microsoft tala om nyheter i Windows 7. Eftersom jag själv nyligen börjat köra sjuan efter att ha hoppat över Vista så fick jag lära mig en hel del nyheter inom såväl operativsystem som sådant samt om utvecklingsbitarna, virtualisering, paketering och licenser.

Här kan du läsa om Robert Folkessons Presentation från Mid Tech-konferensen i Sundsvall . Där hittar man även material för nedladdning.

I det stora hela så var det en bra dag, även om vissa delar inte passade mig. Det blev lite väl stor spridning på de ämnen som diskuterades. För att passa mig bättre så skulle jag år vilja se att man delar upp konferensen på två dagar. Ena dagen med utvecklingsrelaterade ämnen och den efterföljande dagen med mer driftrelaterade ämnen. Samt att man får välja om man vill gå en eller två dagar.

Run advertised programs

When you use the classical view of the control panel in Windows XP the ”Run advertised programs” icon doesn’t show up. However, it shows up when you use the ”windows xp theme”. This is happening for my computer at work which uses features from the company’s SMS setup. Perhaps our SMS-guys have done a bad job or this problem is a bug.

If you have this problem you should try this command from the command prompt or from ”run…” in the start-menu:

RunDLL32.EXE shell32.dll,Control_RunDLL %WINDIR%\system32\ccm\smsrap.cpl

This should start the ”run advertised programs” software.

Radera tom sida i Word

Dagens andra Word tips är en förklaring om hur man kan ta bort en tom/blank sida i Word som vägrar att försvinna och som inte går att få bort på något av de vanliga sätten. Det fanns heller inga gömda formatteringar på sidan. I mitt fall fanns den tomma sidan sist i mitt dokument. Varför den hamnat där och varför den var helt omöjlig att ta bort är för mig oförklarligt. På något sätt hängde det ihop att min sista sida enbart bestod av en lista med slutkommentarer. Jag lyckades till slut radera sidan genom att göra följande:

1. Välj att förhandsgrandska dokumentet.
2. Bläddra fram den tomma sidan så att den syns i förhandsgranska fönstret.
3. Välj i menyn: Redigera -> Radera -> Format
4. Om inte det funkar så välj Redigera -> Radera -> Innehåll
5. Vid det här läget borde den tomma sidan vara borta.

Låsa fält i Word

Den här funktionaliteten i Word 2002 (fungerar säkert för andra Word versioner) hittade jag inte i någon av de miljontals menyerna och var tvungen att googla fram. Om du har ett uppdaterbart fält som t.ex. en innehållsförteckning eller liknande som du INTE vill ska uppdateras då du gör en uppdatering på hela dokumentet (Ctrl+A sedan F9) så kan du göra enligt följande. Markera fältet och tryck sedan Ctrl+F11. Nu är fältet låst och uppdateras inte. Testa! För att låsa upp fältet markerar du det och trycker Ctrl+Shift+F11. Här hittar du en lista över kortkommandon i Word 2002 och 2003.

Minimera alla program från snabbstartsfältet

Den lilla behändiga ikonen som ”minimerar alla program” som finns i Windows XP’s snabbstartsfält råkade försvinna idag. Jag lyckades inte hitta den heller så vad gör man? Det visade sig att man enkelt kan återskapa ikonen. Öppna din favorit-texteditor och skriv in följande rader

[Shell]
Command=2
IconFile=explorer.exe,3
[Taskbar]
Command=ToggleDesktop

Till sist sparar du denna fil med namnet ShowDesktop.scf
Du har nu en sprillans ny quick launch ikon.

Vad är då filer med scf-filändelsen? Jo en ”Windows Explorer Command Shell Command File”. Dessa filer körs av SHELL32.dll och är en speciell filändelse som håller sig hidden även fast man i windows väljer att visa filändelser.

Hur man blir kvitt det störande ”starta om datorn” meddelandet i Windows

Givetvis poppar det förhatliga meddelandet om att jag måste starta om datorn precis då jag är mitt i nått viktigt arbetsmoment. Känner ni igen er? Den säger: Automatiska uppdateringar. Installationen har nästan slutförts. Datorn måste startas om innan uppdateringarna börjar gälla. Vill du starta om nu? ”Starta om nu” eller ”starta om senare”

Om jag råkar fortsätta skriva så kan det bli så att jag automatiskt väljer ”starta om nu” med konsekvensen att windows stänger ner mina program och startar om datorn. Eftersom jag har ett 20-tal applikationer igång med en massa data i dessa så tar denna procedur säkert 10-15 minuter.

Om du väljer ”starta om senare” så tror du att du ska slippa meddelandet. Men icke, det dyker upp igen då man minst av allt vill se det. Om du sedan försöker döda processen wuauclt.exe i aktivitetshanteraren så går det bra men inom kort så börjar dialogen poppa upp igen.

Men det finns ett sätt att få stopp på eländet på ett enkelt sätt. Det gör man genom att stänga av tjänsten som sköter detta. Klicka på Start -> Kör… för att få upp en kommandoprompt. Väl där skriver du:

sc stop wuauserv

Om du tittar i tasktray (meddelandefältet) så ser du att den förhatliga ikonen är borta och du slipper popupen. Voila! Men kom ihåg att du förmodligen bör starta om datorn inom den närmsta tiden. För att lättare komma ihåg det här kommandot så kan du skapa en bat-fil med detta kommando.