`

怎样获取加密狗序列号

阅读更多
最近小弟在玩加密狗,采用的脚本是VBScript,我已经获取到加密狗的用户及密码,但是,就不知道怎样获取加密狗的序列号。是不是调用什么方法可以返回加密狗的序列号呢?哪位玩过加密狗的叔叔、阿姨、前辈、大侠帮小弟一把可以么。。。呵呵!先谢啦!
分享到:
评论
1 楼 yangpeihai 2008-10-13  
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<script language="VBScript">
Dim FirstDigest
Dim Digest
dim EnData
Digest= "01234567890123456"
dim bErr
sub ShowErr(Msg)
bErr = true
MsgBox Msg
End Sub
function Validate(userInfo)
Digest = "01234567890123456"
On Error Resume Next
Dim TheForm
Set TheForm = Document.forms("JAFLoginForm")
If Len(TheForm.pwd.Value) < 4  Then
  MsgBox "PIN empty or user pin length less than 4 or so pin length less than 6!!" 
  Validate = FALSE
  Exit Function
End If

bErr = false
'Let detecte whether the haikey Safe Active Control loaded.
'If we call any method and the Err.number be set to &H1B6, it
'means the hakey Safe Active Control had not be loaded.
dim LibVer
LibVer = htactx.GetLibVersion'-------->获取版本
If Err.number <> 0 Then
  'ShowErr "Load haikey Safe Active Control failed"
  ShowErr "加密狗控件加载失败"
  Validate = false
  Exit function
Else
  'MsgBox "Load ActiveX success!"
  dim hCard
  hCard = 0
  hCard = htactx.OpenDevice(1)'打开设备
  If Err.number<>0 or hCard = 0 then
   'ShowErr "Open first haikey failed."
   ShowErr "请插入加密狗."
   Validate = false
   Exit function
  End if
  'MsgBox "open device success!"
  htactx.VerifyUserPin hCard, CStr(TheForm.password1.Value)'校验口令
  If Err.number<>0 Then
   'ShowErr "Verify User PIN Failure!!!"
   ShowErr "密码不正确!!!"  
   Validate = false
   htactx.CloseDevice hCard
   Exit function
  End if
  'MsgBox "Verify user pin success!"
 
  dim UserName
  UserName = htactx.GetUserName(hCard)'获取用户名
  If Err.number<>0 Then
   'ShowErr "Get User Name Failure!!!"
   ShowErr "获取用户名失败!!!"
   Validate = false
   htactx.CloseDevice hCard
   Exit function
  End if
 
  IF TheForm.username1.value<>UserName Then'用户名不正确
   Validate = false
   Exit function
  End if
  'MsgBox UserName
  'MsgBox "RandomData = " + TheForm.RandomData.value
  Digest = htactx.HTSHA1(TheForm.RandomData.value,30)
  ShowErr Digest
  If Err.number<>0 Then
   'ShowErr "SHA1 failed."
   ShowErr "SHA1 失败."
   Validate = false
   htactx.CloseDevice hCard
   Exit function
  End if
  'MsgBox "SHA1 success!" + Digest
 
  Digest = Digest&"04040404"'对SHA1数据进行补码
  EnData = htactx.HTCrypt(hCard,0 ,0,Digest, len(Digest))'DES3加密SHA1后的数据
  If Err.number<>0 Then
   ShowErr "HashToken compute"
   Validate = false
   htactx.CloseDevice hCard
   Exit function
  End if
  'MsgBox "Encrypt success!" + EnData
  htactx.CloseDevice hCard
  'MsgBox "close device success!"
  TheForm.username.value = UserName
  TheForm.password.value = TheForm.password1.value
  TheForm.EncData.value = EnData
End If
End function
</script>
<script type='text/javascript' src='/dwr/interface/Rockey.js'></script>
<script type='text/javascript' src='/dwr/engine.js'></script>
<script type='text/javascript' src='/dwr/util.js'></script>
<meta http-equiv="Content-Type" content="text/html; charset=GBK"> 
<link href="common/jslogin/css.css" rel="stylesheet" type="text/css" />
</head>
<body background="common/imagesLogin/i_bg.jpg" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" onFocus="document.JAFLoginForm.userName.focus();">
    <OBJECT id="htactx" name="htactx"
   classid="clsid:FB4EE423-43A4-4AA9-BDE9-4335A6D3C74E"
   codebase="HTActX.cab#version=1,0,0,1" style="HEIGHT: 0px; WIDTH: 0px">
  </OBJECT>
</body>
</html>

相关推荐

    epson stylus pro 7880c无限期加密狗打样序列号

    3. 序列号输入:在EFI界面中输入正确的打样序列号,这是激活加密狗的关键步骤。 4. 遵循指南:按照制造商提供的指导进行操作,避免错误可能导致打印机功能受损。 5. 更新确认:安装完成后,测试打印机功能,确保一切...

    加密狗检测工具(几乎支持各种型号的加密狗)

    加密狗检测工具(几乎支持各种型号的加密狗)

    老牌U盘及加密狗共享工具,服务器端,含序列号

    "老牌U盘及加密狗共享工具,服务器端,含序列号"这个标题暗示我们讨论的是一个专门用于管理和共享U盘以及加密狗的老牌解决方案。 这个工具的主要功能可能包括: 1. **U盘管理**:工具可能提供了一个集中化的平台,...

    VB将密码写入加密狗

    VB6.0将密码写入加密狗,一个加密与解密相关的程序,测试前请先插入加密狗,否则程序报错,有可能佳死。

    目前认为总结的最全的ET加密狗升级id汇总(含之前及部分最新的定额id)

    其次,当软件需要升级或添加新的许可证时,他们需要知道如何获取和应用正确的升级ID。这通常涉及与软件供应商的通信,确认许可条款,并可能通过专门的工具或服务进行更新。 此外,这个ID汇总文件还可能用于诊断和...

    加密狗查询

    这个工具可以帮助用户了解他们的加密狗型号、序列号等重要信息,从而帮助他们解决问题或者确保软件的兼容性。解压提供的文件后,运行名为“UserTest.exe”的可执行文件,即可启动加密狗查询过程。 “UserTest.exe”...

    魔锐加密狗授权说明书1

    魔锐加密狗的序列号是其出厂时设定的硬件序列号,可以用于标识某一类产品或某个子开发商。 二、种子码和PID 种子码是魔锐加密狗中的重要数据,用于生成产品PID。种子码需要妥善保存,因为只有相同的种子码才能生成...

    管家婆加密狗工具dogtools

    读狗功能则是Dogtools读取加密狗内部存储的数据,如序列号、授权信息等。这些信息通常是软件验证用户身份和许可级别的依据。通过读取加密狗数据,用户可以确认自己的许可证状态,同时,软件开发商也可以通过读取数据...

    USB加密狗原理.pdf

    如果没有正确的加密狗,程序将无法获取正确的`A`值,进而无法正常执行。 #### 四、提高安全性的策略 1. **防止DLL篡改**:为避免破解者修改制造商提供的DLL文件,可以加入MD5校验机制。一旦检测到DLL被篡改,则...

    如何识别加密狗

    "加密狗识别详解" 在本文中,我们将详细介绍如何识别加密狗类型,包括无驱动程序型和有驱动程序型加密锁的识别方式,并提供了多种加密狗厂商型号的识别方法。 无驱动程序型加密锁 无驱动程序型加密锁是即插即用的...

    加密狗型号快速检测

    它们通常包含一个唯一的序列号或密钥,与特定的软件许可证关联,只有在插入正确的加密狗时,受保护的软件才能运行。"加密狗型号快速检测"是针对这类设备的一个实用工具,能够帮助用户快速识别和确认连接到计算机的...

    加密狗检测工具(支持多种)

    2. 信息:这可能包含加密狗的序列号、内部存储的密钥、固件版本等。 3. 厂家:揭示了加密狗的制造商,这对于查找适配的驱动程序和获取技术支持至关重要。 4. 品牌:确认加密狗的品牌有助于了解其性能和安全性。 在...

    加密狗检测工具.rar

    这类工具通常会扫描系统,查找已连接的加密狗,并提供有关狗的详细信息,如制造商、型号、序列号等。这对于软件开发者、技术支持人员以及需要确认自己软件授权状态的用户来说非常有用。 在使用加密狗检测工具时,...

    加密狗类型检测工具和复制

    2. 显示设备详细信息:除了型号,可能还会显示加密狗的序列号、固件版本等关键数据。 3. 复制功能:可能包含将加密狗的信息备份或复制到其他地方的功能,以便在需要时恢复或共享。 标签"加密狗类型检测工具"再次...

    Https双向认证+加密狗配置教程

    - 生成后,证书的有效期、序列号、主题等信息会显示出来。 #### 7. 配置HTTPS双向认证过程 - 将生成的服务器证书部署到Apache服务器配置中。 - 服务器端还需要配置客户端证书验证的相关指令,以便对客户端证书进行...

    加密狗检测工具

    加密狗检测工具是一种专门用于识别和验证加密狗硬件设备的软件工具。在IT行业中,加密狗常被用作软件授权的物理凭证,它通常插入计算机的USB端口,以确保只有拥有正确授权的用户能够运行特定的软件。这种技术被广泛...

    DogCheck 加密狗检测工具

    这可能包括狗的型号、序列号、制造商等详细信息。 加密狗的工作原理通常涉及到驱动程序和软件授权模块。驱动程序使操作系统能够识别和与加密狗通信,而授权模块则用于验证软件的合法性。DogCheck 工具通过分析这些...

    EzCad2.5.3加密狗驱动

    这可能涉及到连接加密狗,输入序列号或者执行特定的激活程序。 7. **兼容性**:EzCad2.5.3应能兼容多种操作系统,如Windows XP、7、8、10等,以满足不同用户的系统环境。 8. **更新与维护**:EzCad的版本更新通常...

    使用加密狗进行身份验证,加密狗验证失败怎么办,C#源码.zip

    加密狗内部存储着一串唯一的序列号或密钥,当软件尝试运行时,会检查系统中是否存在匹配的加密狗,并读取其密钥。如果密钥匹配,软件则允许用户继续操作;否则,会阻止软件执行或显示错误信息。 在C#中,实现加密狗...

    世纪科怡档案管理系统3.2.1(单机加密狗版)

    总的来说,世纪科怡档案管理系统3.2.1(单机加密狗版)是一款针对单机用户的档案管理工具,其便捷的序列号激活和加密狗验证机制,以及对32位操作系统的兼容性,使其成为小规模企业和个人用户理想的档案管理选择。...

Global site tag (gtag.js) - Google Analytics