Apr 26 2007, 10:44 AM
QUOTE(xenon @ Apr 21 2007, 03:15 PM)
I'm not confident with this code, but you asked for it. Was having difficulty with VB without pointers. I don't like .NET either, makes program slow, and need more memory.
Please comment.
---
There is one minor edit you can do. The "Get Response" command (named Cmd2 in this code) is not strictly necessary. Therefore you can comment out
dLength = 256
retval = SCardTransmit(hCard, pciT0, Cmd2, 5, pciT0, Buffer, dLength)
in Function SelectApp
The code u give can decode the MyKad encrypted data?Please comment.
---
There is one minor edit you can do. The "Get Response" command (named Cmd2 in this code) is not strictly necessary. Therefore you can comment out
CODE
dLength = 256
retval = SCardTransmit(hCard, pciT0, Cmd2, 5, pciT0, Buffer, dLength)
in Function SelectApp
U must have installedn the MyKad SDK on your dev PC
Declare Function SCardEstablishContext Lib "winscard.dll" _
(ByVal dwScope As Int32, ByVal pvReserved1 As Int32, _
ByVal pvReserved2 As Int32, ByRef phContext As Int32) As Int32
.....
Since you have that Dll, why not share out let me test it, thanks...
(Last time I try regsvr IRIS some dll at other PC face problem, There're some digital cert thingy need to install, Am I right ?)
QUOTE(waykeong @ Apr 25 2007, 12:06 AM)
no lar...hack it for wat... just wanna retrieve info.
Even u try to get info from MyKad, but some of the old contain Not enough info for it.
Quote
0.0157sec
0.64
7 queries
GZIP Disabled