标题: 判断 数字证书 是否插入？ [打印本页]

---

作者: bd123456789     时间: 2010-5-15 11:09    标题: 判断 数字证书 是否插入？

Set Disks =createobject("scripting.filesystemobject").Drives
'U盘为1，硬盘为2，光盘为4
For Each Disk in Disks
if Disk.IsReady then
msgbox  Disk.DriveType  & disk.Path
end if
Next

这个程序能判断上述盘的情况 ，但数字证书插入后，怎么没法判断？

---

作者: yishanju     时间: 2010-5-15 11:11
可能一般程序访问不了U盾吧，

---

作者: bd123456789     时间: 2010-5-17 15:39
OK
thanks