有一个DLL文件,名叫:aLock32.Dll,采用COM接口,使用前先注册文件(regsvr32 aLock32.dll),aLock32.dll中包含一个叫做DigiCard.MF1Card的类.现在PB中调用该DLl文件中的类的方法,以实现特定的功能.
//创建类的实例:
OLEObject DigiCardObject
DigiCardObject = Create OLEObject
ii_ret=DigiCardObject.ConnectToNewObject("DigiCard.MF1Card")
if ii_ret<>0 then
Messagebox("OLE Error","OLE连接失败")
return
end if
//连接成功以后,就可以直接调用OLE对象中的方法了.如:DigiCardObject.ReadCard()等.
//使用完后
DigiCardObject.DisconnectObject()
Destory DigiCardObject