Hallo,
ich habe folgendes Problem:
ich versuche mit dem WriteFile Befehl Daten an ein Gerät zu schicken
aber dann bekomme ich ein "AccessViolationException" und folgende Fehlermeldung:
"Es wurde versucht, im geschützten Speicher zu lesen oder zu schreiben. Dies ist häufig ein Hinweis darauf, dass anderer Speicher beschädigt ist."
Woran könnte es denn liegen? ich habe ein Gerät das per USB angeschlossen ist und versuche mit diesem WriteFile Befehl Daten zu schicken
Hier mein Code:
<DllImport("kernel32.dll", SetlastError:=True)> _
Function WriteFile(ByVal hFile As Long, ByVal lpBuffer As Long, _
ByVal nNumberOfBytesToWrite As Long, ByVal lpNumberOfBytesWritten As Long, _
ByVal lpOverlapped As OVERLAPPED) As Long
End Function
Dim testB2(19) As Byte
testB2(0) = &H10
testB2(1) = &H22
testB2(2) = &HD
testB2(3) = &H40
testB2(4) = &HCD
testB2(5) = &H59
testB2(6) = &H23
testB2(7) = &H0
testB2(8) = &H19
testB2(9) = &H53
testB2(10) = &H6
testB2(11) = &HE8
testB2(12) = &HE8
testB2(13) = &H81
testB2(14) = &H1C
testB2(15) = &H1
testB2(16) = &H68
testB2(17) = &H10
testB2(18) = &H3
SendPacket(testB2)
End Sub
Public Sub SendPacket(ByVal aPacket As Byte())
Dim theBytesToWrite As IntPtr = aPacket.Length - 1 '+ aPacket.mDataSize
Dim theBytesReturned As IntPtr = IntPtr.Zero
MsgBox(WriteFile(gHandle, aPacket, theBytesToWrite, theBytesReturned, 1))
End Sub
DANKE!!!
