CLASSID="CLSID:64605B9A-BF10-4F16-9303-5A512469E4DF"
CODEBASE="dcic32.cab#version=1,0,0,1">//如果没有发现该控件,会去当前目录dcic32.cab解压安装该控件
3、js 里调用
document.getElementById('mscs_ocx');
4、读写IC卡演示代码
var a,b,c,d,snr,data,datastr;
a = Test.InitDev();
c = Test.GetFunMessage();
if(a == 0)
{
b = 0;
d = 1;
while(d){
switch(b){
case 0:
a = Test.ResetCard();
c = "ResetCard";
if(a == 0){
alert(c+"操作成功,");
b = 1;
}else{
b = 200;
}
break;
case 1:
a = Test.SetCompanyID("PF","LS","12345678","1234567890123456","流通","123456","071120");
c = "SetCompanyID";
if(a == 0){
alert(c+" 操作成功");
b = 2;
}else{
b = 200;
}
break;
case 2:
data = Test.GetCompanyID();
a = Test.GetFunRet();
c = "GetCompanyID";
if(a == 0){
alert(c+" 操作成功,数据为:"+data);
b = 3;
}else{
b = 200;
}
break;
case 3:
a = Test.WriteBill("123456789012","1234","071120");
c = "WriteBill";
if(a == 0){
alert(c+" 操作成功");
b = 4;
}else{
b = 200;
}
break;
case 4:
datastr = Test.ReadBill("01");
a = Test.GetFunRet();
c = "ReadBill";
if(a == 0){
alert(c+"操作成功,数据为:"+datastr);
b = 5;
}else{
b = 200;
}
break;
case 5:
a = Test.Beep(10);
c = "Beep";
if(a == 0){
alert(c+"操作成功,鸣叫100毫秒");
b = 6;
}else{
b = 200;
}
break;
case 6:
alert("演示流程结束");
a = Test.ExitDev();
d = 0;
break;
default:
alert(c+"操作失败!!");
a = Test.ExitDev();
d = 0;
break;
}
}
}
else
{
alert(c+"请将读写器连接到U口!!");
}
分享到:
2010-12-21 16:20
浏览 4179
评论
1 楼
suhenhappy
2012-05-14
你好!请问下你这个OCX控件还在吗? 能给我下吗? 我的邮箱是suhenhappy@sina.com 谢谢你了!