VBScipt um die Maus zu zentrieren

Hallo,
ich brauche gerade eine Lösung um den Mauszeiger auf dem Bildschirm zu Zentrieren. Das Problem ist, dieses soll mit VBS geschehen.
Dies soll für jede Auflösung geschehen.
Falls jemand nicht weiß, wie er das relisieren soll aber die Befehle kennt um unter VBS die Auflösung zu ermitteln und den Cursor zu setzen so solle er dies Posten das würde mir auch schon weiterhelfen.
Ich bedank mich jetzt schon einmal bei alle Helfern.
Gruß
J. W. Grice

PS: Ich bin auch an Nachschlagewerke (im Inet) für VBS interessiert.

strComputer = "."   
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")   
Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_DisplayConfiguration",,48)   
For Each objItem in colItems 
    WScript.Echo "Auflösung: " & objItem.PelsWidth & "x" & objItem.PelsHeight  
Next

 ' VBScript source code  
 strComputer = "."   
 Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2")   
 Set colItems = objWMIService.ExecQuery( _
    "SELECT * FROM Win32_DisplayConfiguration",,48)   
 For Each objItem in colItems 
     DIM x
     DIM y
     x = objItem.PelsWidth \2
     y = objItem.PelsHeight \2
     WScript.Echo "Zur Kontrolle, der Mittelpunkt hat die Koordinaten: " & x & "x" & y  
     'Cursor.Position = New Point(x, y)  
 Next