Bei den unten stehenden Code kommt immer folgende Fehlermeldung:
System.AccessViolationException wurde nicht behandelt.
Message="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."
Hat jemand eine Idee wo der Fehler liegt?
Code:
Public Class Hauptformular
Public Declare Function SCardComand Lib "SCARD32.dll" (ByVal Handle As Integer, _
ByVal cmd As String, ByVal CmdLen As Integer, ByVal DataIn As String, ByVal _
DataInLen As Integer, ByVal DataOut As String, ByVal DataOutLen As Integer) _
As Integer
Private Sub Hauptformular_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim Result As Integer
Dim DataIn As String = vbNullString
Dim DataOut As String = Space$(255)
Result = SCardComand(0, "Device, Info, Status", 0, DataIn, Len(DataIn), DataOut, 255)
MsgBox(DataOut)
MsgBox(Result)
End Sub
System.AccessViolationException wurde nicht behandelt.
Message="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."
Hat jemand eine Idee wo der Fehler liegt?
Code:
Public Class Hauptformular
Public Declare Function SCardComand Lib "SCARD32.dll" (ByVal Handle As Integer, _
ByVal cmd As String, ByVal CmdLen As Integer, ByVal DataIn As String, ByVal _
DataInLen As Integer, ByVal DataOut As String, ByVal DataOutLen As Integer) _
As Integer
Private Sub Hauptformular_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim Result As Integer
Dim DataIn As String = vbNullString
Dim DataOut As String = Space$(255)
Result = SCardComand(0, "Device, Info, Status", 0, DataIn, Len(DataIn), DataOut, 255)
MsgBox(DataOut)
MsgBox(Result)
End Sub