如何實現像3721網絡實名的功能

Question

具体实现不会，不过那是activex

Answer 1

object中的codebase属性填上就可以了

Answer 2

<script language=javascript>
var Acrobat;
try{
Acrobat =new ActiveXObject("PDF.PdfCtrl.5");
}catch(e){}
if(Acrobat){
alert("用户已经安装了acrobat");
}else{
alert("用户没有安装acrobat");
}
</script><script language=vbscript>
Dim Acrobat
On Error Resume Next
Set Acrobat = CreateObject("PDF.PdfCtrl.5")
if IsObject(Acrobat) Then
alert("用户已经安装了acrobat")
else
alert("用户没有安装acrobat")
end if
</script>

Answer 3

做成cab.就会提示下载安装了.
<object codebase="http://activex.microsoft.com/controls/you.cab">

Answer 4

网络实名功能是通过下载ActiveX插件方式来实现的..

Answer 5

都说完了，我UP一下，也写个<%
       Dim hehehe
       on error resume next
       Set hehehe = Server.CreateObject("myhope.我现在好想吃必胜客啊")
       if err<>0 then
%>
<script>
       alert("想也没用，我们这里没有分店！！");
</script>
<%
       else
%>
<script>
       alert("张嘴接着，天上掉必胜客啦！！！！");
</script>
<%
       end  if
%>

Answer 6

老板要求的,我們是內部网,程序員就我們電腦部幾十個人,他們不會罵我的To:wanghr100(灰豆宝宝.net) 
怎麼做CAB文件?

Answer 7

可以用VB开发ActiveX.
http://www.china-askpro.com/msg1/qa37.shtml

Answer 8

http://www.china-askpro.com/msg18/qa88.shtml