⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 create_key.php

📁 通达网络办公 - Office Anywhere 2008 增强版100%源码(3.4.081216) 内含 通达OA2008增強版接近完美破解补丁20081216集 及 最新通达OA2008ADV(
💻 PHP
字号:
<?php

include_once( "inc/auth.php" );
echo "<html>\r\n<head>\r\n<title>初始化USB用户KEY</title>\r\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=gb2312\">\r\n</head>\r\n<body class=\"bodycolor\" topmargin=\"5\">\r\n<object id=\"tdPassSC\" name=\"tdPassSC\" CLASSID=\"clsid:C7672410-309E-4318-8B34-016EE77D6B58\"\tCODEBASE=\"/inc/tdPass.cab#Version=1,00,0000\"\r\n\tBORDER=\"0\" VSPACE=\"0\" HSPACE=\"0\" ALIGN=\"TOP\" HEIGHT=\"0\" WIDTH=\"0\"></object>\r\n<object id=\"tdPass\" name=\"tdPass\" CLASSID=\"clsid:0272DA76-96FB-449E-8298-178876E0EA89\"\tCODEBASE=\"/inc/tdPass.cab#Version=1,00,0000\"\r\n\tBORDER=\"0\" VSPACE=\"0\" HSPACE=\"0\" ALIGN=\"TOP\" HEIGHT=\"0\" WIDTH=\"0\"></object>\r\n<script src=\"/inc/mytable.js\"></script>\r\n<script>\r\nfunction GetKey(va)\r\n{\r\n   var a = new VBArray(va);\r\n   return a.toArray().toString();\r\n}\r\nvar xmlHttpObj=getXMLHttpObj();\r\nvar KEY_USERINFO;\r\nvar KEY_SN;\r\nGET_USERKEY();\r\nfunction READ_KEYSN()\r\n{\r\n\tvar theDevice=document.getElementById(\"tdPass\");\r\n  var bOpened = OpenDevice(theDevice);\r\n  if(!bOpened)return false;\r\n  //读取设备序列号\r\n  try\r\n  {\r\n    KEY_SN=theDevice.GetStrProperty(7, 0, 0);\r\n  }\r\n  catch(ex)\r\n  {\r\n\t  theDevice.CloseDevice();\r\n\t  alert(\"USB用户KEY初始化失败!\");\r\n\t  location=\"user_new.php?DEPT_ID=";
echo $DEPT_ID;
echo "\";\r\n\t}\r\n}\r\nfunction GET_USERKEY()\r\n{\r\n\tREAD_KEYSN();\r\n  var theURL=\"get_userinfo.php?USER_ID=";
echo $USER_ID;
echo "&KEY_SN=\"+KEY_SN;\r\n  xmlHttpObj.open(\"GET\",theURL,true);\r\n  var responseText=\"\";\r\n  xmlHttpObj.onreadystatechange=function()\r\n  {\r\n\r\n    if(xmlHttpObj.readyState==4)\r\n    {\r\n      KEY_USERINFO=xmlHttpObj.responseText;\r\n      CREAT_KEY();\r\n    }\r\n  }\r\n  xmlHttpObj.send(null)\r\n}\r\nfunction OpenDevice(theDevice)\r\n{\r\n   try\r\n   {\r\n      theDevice.GetLibVersion();\r\n   }\r\n   catch(ex)\r\n   {\r\n\t    alert(\"您没有下载并正确安装USB用户KEY驱动程序\");\r\n\t    location=\"user_new.php?DEPT_ID=";
echo $DEPT_ID;
echo "\";\r\n\t }\r\n   try\r\n   {\r\n      theDevice.OpenDevice(1, \"\");\r\n   }\r\n   catch(ex)\r\n   {\r\n\t    alert(\"您没有插人合法的USB用户KEY\");\r\n\t    location=\"user_new.php?DEPT_ID=";
echo $DEPT_ID;
echo "\";\r\n\t }\r\n   return true;\r\n}\r\nfunction CREAT_KEY()\r\n{\r\n\t var KEY_USERINFO_ARRY=KEY_USERINFO.split(\",\");\r\n\t var theDevice=document.getElementById(\"tdPassSC\");\r\n   //打开设备\r\n   var bOpened = OpenDevice(theDevice);\r\n   if(!bOpened)\r\n      return false;\r\n   try\r\n   {\r\n   \t  //写用户信息\r\n   \t  var USER_INFO=KEY_USERINFO_ARRY[0];\r\n   \t  var USER_CERTINFO=KEY_USERINFO_ARRY[1];\r\n   \t  var sign=OPEN_FILE(3);\r\n   \t  if(sign==1)theDevice.DeleteFile(0,3);\r\n      theDevice.CreateFile(0,3,USER_INFO.length,2,0,0,7,2);\r\n      theDevice.write(0,0,0,USER_INFO,USER_INFO.length);//\r\n      theDevice.CloseFile();\r\n      var key1;\r\n      var key2;\r\n      key1 = GetKey(VBGetKey(0,USER_CERTINFO,theDevice));\r\n\t    key2 = GetKey(VBGetKey(1,USER_CERTINFO,theDevice));\r\n\r\n     //写个人私钥\r\n     sign=OPEN_FILE(5);\r\n   \t if(sign==1)theDevice.DeleteFile(0,5);\r\n     theDevice.CreateFile(0,5,16,4,7,0,0,0);\r\n     theDevice.write(1,0,0,key1,16);//\r\n     theDevice.CloseFile();\r\n     sign=OPEN_FILE(6);\r\n   \t if(sign==1)theDevice.DeleteFile(0,6);\r\n     theDevice.CreateFile(0,6,16,4,7,0,0,0);\r\n     theDevice.write(1,0,0,key2,16);//\r\n     theDevice.CloseFile();\r\n    }\r\n   catch(ex)\r\n   {\r\n\t    theDevice.CloseDevice();\r\n\t    alert(\"USB用户KEY初始化失败!请重新初始化KEY!\");\r\n\t    location=\"user_new.php?DEPT_ID=";
echo $DEPT_ID;
echo "\";\r\n\t    return false;\r\n\t }\r\n\t theDevice.CloseDevice();\r\n\t alert(\"USB用户KEY初始化成功!\");\r\n\t location=\"user_new.php?DEPT_ID=";
echo $DEPT_ID;
echo "\";\r\n}\r\n\r\nfunction OPEN_FILE(fileid)\r\n{\r\n\tvar theDevice=document.getElementById(\"tdPass\");\r\n  var bOpened = OpenDevice(theDevice);\r\n  if(!bOpened)return -1;\r\n  //读取设备序列号\r\n  try\r\n  {\r\n   theDevice.OpenFile (0,fileid);\r\n   theDevice.CloseFile();\r\n   return 1;\r\n  }\r\n  catch(ex)\r\n  {\r\n\t  theDevice.CloseDevice();\r\n\t  return 0;\r\n\t}\r\n}\r\n</script>\r\n<script language=\"VBScript\">\r\n'用VB函数获取到Key1和Key2\r\nfunction VBGetKey(WhichKey,CertKey,theDevice)\r\n\t\tOn Error Resume Next\r\n\t\tdim key\r\n\t\ttheDevice.Soft_MD5HMAC WhichKey,0,CertKey,key\r\n\t\tIf Err Then\r\n\t\t\tMsgBox (\"VBGetKey:No.1\\nError#\" & Hex(Err.number and &HFFFF) & \" \\nDescription:\" & Err.description)\r\n\t\t\tePass.CloseDevice\r\n\t\t\tExit function\r\n\t\tEnd If\r\n\r\n    VBGetKey = Array(key)\r\nEnd function\r\n</script>\r\n\r\n<div class=big1>正在初始化USB用户KEY,请稍候...</div>\r\n</body>\r\n</html>";
?>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -