primäre USB-Maus XP/VBA ; Createfile = -1

[Johannes H. (johannes-kuriboh)]

Hallo,
seit etwa 8 Tagen komme ich nicht weiter. Ich habe hier einige 
interessante Artikel gefunden, leider helfen die mir nicht über mein 
Problem hinweg.
Ich bekomme keinen Handle für meine Maus.
Dem Buch ISBN 3-8266-0698-1 liegt ein Tool bei, welches meine Maus 
erfolgreich anspricht, und Attribute ausliest. (Gehen muss es also)
Ich sitze an einem XP Rechner (SP2), und habe als einziges HID meine 
Maus angeschlossen.

Die angehängte Datei ist eine ExCel Datei.
Die Module API_Test, Errorreport, USB_Suche sind Fehlerfrei.
USB20_CD ist vermutlich Fehlerfrei und enthält alle API Deklarationen, 
die im Modul USB_Gethandle verwendet werden.

Der Fehler steckt in der Zeile:

CurrentDeviceHandle = CreateFile(CurrentDevicePathName, GENERIC_READ, FILE_SHARE_READ, 0, OPEN_EXISTING, 0, 0)

oder knapp davor.

Den Gerätepfad erhalte ich erfolgreich, nach der Weiterverarbeitung 
sieht er so aus:

"\\?\hid#vid_046d&pid_c00e#6&30366122&0&0000#{4d1e55b2-f16f-11cf-88cb-001111000030}

"
""

Ich bin mir nicht sicher ob meine Weiterverarbeitung stimmt:

DetailDeviceResult = SetupDiGetDeviceInterfaceDetail(GlobalDeviceInfoSet, CurrentDeviceInterfaceData, VarPtr(DetailBuffer(0)), DetailBufferSize, DetailBufferSize_Probe, 0)
CurrentDevicePathName = CStr(DetailBuffer())
CurrentDevicePathName = StrConv(CurrentDevicePathName, vbUnicode)
CurrentDevicePathName = Right$(CurrentDevicePathName, Len(CurrentDevicePathName) - 4)

Ich komme nicht weiter.
Ich brauche den Handle zu meiner Maus.
Ich freue mich auf eure Hilfe.

Grüße, Johannes

[Johannes H. (johannes-kuriboh)]

Ich bin mir nicht sicher ob das mit dem Upload funktioniert hat, darum 
nachgereicht als .Zip

[Johannes H. (johannes-kuriboh)]

Ich habe folgende Tabelle gefunden:
http://msdn2.microsoft.com/en-us/library/ms789918.aspx

Device Type       U.Page  U.ID  Windows Client  Access Mode
Pointer           0x01    0x01  Win32 subsystem Exclusive
Mouse             0x01    0x02  Win32 subsystem Exclusive
Joystick          0x01    0x04  DirectInput     Shared
Game pad          0x01    0x05  DirectInput     Shared
Keyboard          0x01    0x06  Win32 subsystem Exclusive
Keypad            0x01    0x07  Win32 subsystem Exclusive
System Control    0x01    0x80  Win32 subsystem Shared
Cons. Aud. Contr. 0x0C    0x01  *               Shared

U.Page = Usage Page
U. ID = Usage ID
Cons. Aud. Contr. = Consumer Audio Control
* hidserv.exe in Windows 2000 and hidserv.dll (one of the SVC host services) in Microsoft Windows XP

Wie es aussieht hat Win32-subsystem exclusive Zugriffsrechte auf meine 
Maus.
Wie kann ich trotzdem auf meine Maus zugreifen?
Können mir die User Page und User ID Informationen weiterhelfen?