Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Access 2003, Speicherbereich mit VBA auslesen

Frage Microsoft Microsoft Office

Mitglied: PCFJKG

PCFJKG (Level 1) - Jetzt verbinden

22.03.2010 um 09:10 Uhr, 4987 Aufrufe, 2 Kommentare

Kartenlesegerät von Cherry, eine DLL schreibt in den RAM, wie finde ich die Adresse bzw. den von der DLL beschriebenen Speicherbereich zum auslesen ?

Ein VBA-Modul ruft die Funktion CT_Data auf: rc = CT_DATA(ctn, dad, sad, lenc, command(0), lenr, response(0))
Ich verstehe das so, dass nach erfolgreichem Aufruf von CT_Data, welches die DLL ctpcsc32kv.dll nutzt, die von CT_Data gelesenen Daten (hier von einer Chipkarte) in den RAM geschrieben werden. Wenn dem so ist, wie kann ich feststellen, wohin die Daten geschrieben wurden um diese zu lesen ? Oder verstehe ich die Arbeitsweise völlig falsch ?

Dank an jeden der helfen kann, wie auch immer.

Herzliche Grüße

PCFJKG


Deklariert wurden

a) in einem Public-Modul:

Public Declare Function CT_DATA Lib "ctpcsc32kv.dll" Alias "CT_data" _
(ByVal ctn As Integer, ByRef dad As Integer, _
ByRef sad As Integer, ByVal lenc As Integer, _
ByRef command As Byte, ByRef lenr As Integer, _
ByRef response As Byte) As Byte

b) in dem aufrufenden Modul:

Dim rc As Byte

Dim ctn As Integer
Dim dad As Integer
Dim sad As Integer
Dim lenc As Integer
Dim command(5) As Byte
Dim lenr As Integer
Dim response(100) As Byte


ctn = STD_CTN ' Use standard CTN

dad = &H1 ' Destination Adresse 01 = CT, 0 = ICC
sad = &H2 ' Source Address 02 = HOST, 05 = REMOTE_HOST
lenr = 100 ' Size of Receive Buffer

command(0) = &H20 ' CLA
command(1) = &H11 ' INS B0 = Read Binary
command(2) = &H1 ' P1 Select by FID
command(3) = &H1 ' P2 has to be 00
command(4) = &H0 ' Length of Data to be read (100 Bytes)
' Put 00 here if you want to read all data availiable

lenc = 5 ' Length of command

jetzt wie oben bereits gezeigt:

rc = CT_DATA(ctn, dad, sad, lenc, command(0), lenr, response(0))
Mitglied: SlainteMhath
22.03.2010 um 10:49 Uhr
Moin,

du musst kein RAM direkt auslesen - Dein Ergebins steht m.E. nach Aufruf von

01.
rc = CT_DATA(ctn, dad, sad, lenc, command(0), lenr, response(0))
in der Variable response. (zumindest legt das der Name nahe )

Response wird mit ByRef übergeben. D.h. Funktion kann die Variable ändern (im Gegensatz zu ByVal wo nur der Wert übergeben wird).

lg
Slainte
Bitte warten ..
Mitglied: PCFJKG
22.03.2010 um 14:06 Uhr
Hallo Slainte,
das ging ja schnell, dafür erst einmal danke. Ich hatte zunächst auch so gedacht und einfach einmal mit (zugegeben etwas einfach)

MsgBox response(0) & " " & response(1) & " " & response(2) & " " & response(3) & " " & response(4) & " " & response(5) & " " _
& response(6) & " " & response(7) & " " & response(8) & " " & response(9) & " " & response(17) & " " _
& response(21) & response(22) & response(23)
nachgesehen, was da so "drinsteht".

Ergebnisse:
- lenr (zurückgegeben) ist nur 8 Byte groß, somit erhalten wir als response nicht die Daten der Chipkarte.
- Die meisten Werte von response(x) sind = 0

Ggf. muss die Initialisierung über die command(x) Werte anders ausehen (oder ich mache noch etwas anderes falsch , vielleicht mit der vorherigen Initialisierung ?

Public Declare Function CT_INIT Lib "ctpcsc32kv.dll" Alias "CT_init" _
(ByVal ctn As Integer, ByVal pn As Integer) As Byte

Private Sub Initialisieren()

Dim rc As Integer
Dim ctn As Integer
Dim pn As Integer

ctn = STD_CTN
pn = STD_PN
rc = CT_INIT(ctn, pn)

End Sub

Auf jeden Fall nochmals danke, vielleicht fällt Dir ja noch ein anderer Hinweis ein ?
Viele Grüße

PCFJKG
Bitte warten ..
Neuester Wissensbeitrag
Humor (lol)

Linkliste für Adventskalender

(3)

Information von nikoatit zum Thema Humor (lol) ...

Ähnliche Inhalte
VB for Applications
gelöst Einzelne Begriffe aus PDF in Excel per VBA auslesen (20)

Frage von joha1908 zum Thema VB for Applications ...

VB for Applications
gelöst Xml-Datei laden bzw. auf Festplatte kopieren und per VBA in eine Access-Tabelle speichern (22)

Frage von machohunk zum Thema VB for Applications ...

Datenbanken
gelöst Syntaxfehler VBA Access 2010 (6)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Heiß diskutierte Inhalte
Windows Server
DHCP Server switchen (25)

Frage von M.Marz zum Thema Windows Server ...

SAN, NAS, DAS
gelöst HP-Proliant Microserver Betriebssystem (14)

Frage von Yannosch zum Thema SAN, NAS, DAS ...

Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Windows 7
Verteillösung für IT-Raum benötigt (12)

Frage von TheM-Man zum Thema Windows 7 ...