大漠插件注册 卡注问题

战死沙场

我把界面，大漠调用等代码写在dll 里面，（用在dll注入，或其他程序调用该功能dll），

然后易语言windows程序调用这个dll时，
一直卡在注册大漠的地方。


dm.创建 ()
dm.Ver ()   '这行能正常打印出版本号

dm.Reg (注册码,附加码） '一直卡在这个里面，不出来。




注：注册代码不写在dll里时，能正常注册大漠。

hjinpwhe1

给写个源码吧 很简单

  

子程序名	返回值类型	公开	备 注
注册	文本型		一天注册一次

变量名	类 型	静态	数组	备 注
zj	大漠类库
版本号	文本型
VIP	整数型
结果	文本型

如果真 (文件是否存在 (“C:\jbcj”) ＝ 假)
创建目录 (“C:\jbcj”)
如果真 (文件是否存在 (“C:\jbcj\dm.dll”) ＝ 假)
写到文件 (“C:\jbcj\dm.dll”, #d )
如果真 (文件是否存在 (“C:\jbcj\DmReg.dll”) ＝ 假)
写到文件 (“C:\jbcj\DmReg.dll”, #dd )

判断 (读配置项 (“C:\jbcj\zcsj.ini”, “注册时间”, “时间”, ) ＝ 年月日 ())
SetDllPathA (“C:\jbcj\dm.dll”, 0)
返回 (“注册成功”)
SetDllPathA (“C:\jbcj\dm.dll”, 0)
zj.创建 ()
版本号 ＝ “版本号 ” ＋ zj.Ver ()
VIP ＝ zj.RegEx (“你自己注册码”, “你自己附加码”, “121.204.252.143|123.129.231.44|121.204.253.161|123.129.231.45|125.77.165.62|123.129.231.85|125.77.165.131|123.129.231.86”)
zj.释放 ()
如果真 (VIP判断 (VIP) ＝ “VIP注册成功”)
写配置项 (“C:\jbcj\zcsj.ini”, “注册时间”, “时间”, 年月日 ())
返回 (版本号 ＋ “  ” ＋ VIP判断 (VIP))

.版本 2<br /> <br /> .子程序 注册, 文本型, 公开, 一天注册一次<br /> .局部变量 zj, 大漠类库<br /> .局部变量 版本号, 文本型<br /> .局部变量 VIP, 整数型<br /> .局部变量 结果, 文本型<br /> <br /> .如果真 (文件是否存在 (“C:\jbcj”) ＝ 假)<br />     创建目录 (“C:\jbcj”)<br /> .如果真结束<br /> .如果真 (文件是否存在 (“C:\jbcj\dm.dll”) ＝ 假)<br />     写到文件 (“C:\jbcj\dm.dll”, #d)<br /> .如果真结束<br /> .如果真 (文件是否存在 (“C:\jbcj\DmReg.dll”) ＝ 假)<br />     写到文件 (“C:\jbcj\DmReg.dll”, #dd)<br /> .如果真结束<br /> <br /> .判断开始 (读配置项 (“C:\jbcj\zcsj.ini”, “注册时间”, “时间”, ) ＝ 年月日 ())<br />     SetDllPathA (“C:\jbcj\dm.dll”, 0)<br />     返回 (“注册成功”)<br /> .默认<br />     SetDllPathA (“C:\jbcj\dm.dll”, 0)<br />     zj.创建 ()<br />     版本号 ＝ “版本号 ” ＋ zj.Ver ()<br />     VIP ＝ zj.RegEx (“你自己注册码”, “你自己附加码”, “121.204.252.143|123.129.231.44|121.204.253.161|123.129.231.45|125.77.165.62|123.129.231.85|125.77.165.131|123.129.231.86”)<br />     zj.释放 ()<br />     .如果真 (VIP判断 (VIP) ＝ “VIP注册成功”)<br />         写配置项 (“C:\jbcj\zcsj.ini”, “注册时间”, “时间”, 年月日 ())<br />     .如果真结束<br />     返回 (版本号 ＋ “  ” ＋ VIP判断 (VIP))<br /> .判断结束

  

子程序名	返回值类型	公开	备 注
VIP判断	文本型		判断VIP注册返回值
参数名	类 型	参考	可空	数组	备 注
注册VIP返回值	整数型

判断 (注册VIP返回值 ＝ 1)
返回 (“VIP注册成功”)
判断 (注册VIP返回值 ＝ -1)
返回 (“无法连接网络”)
判断 (注册VIP返回值 ＝ -2)
返回 (“进程没有以管理员方式运行”)
判断 (注册VIP返回值 ＝ 0)
返回 (“失败”)
判断 (注册VIP返回值 ＝ 2)
返回 (“余额不足”)
判断 (注册VIP返回值 ＝ 3)
返回 (“绑定了本机器，但是账户余额不足50元”)
判断 (注册VIP返回值 ＝ 4)
返回 (“注册码错误”)
判断 (注册VIP返回值 ＝ 5)
返回 (“你的机器或者IP在黑名单列表中或者不在白名单列表中”)
判断 (注册VIP返回值 ＝ 6)
返回 (“非法使用插件”)
判断 (注册VIP返回值 ＝ 7)
返回 (“你的帐号因为非法使用被封禁”)
判断 (注册VIP返回值 ＝ 8)
返回 (“附加码不在你设置的附加白名单中”)
判断 (注册VIP返回值 ＝ 77)
返回 (“机器码或者IP因为非法使用，而被封禁”)
判断 (注册VIP返回值 ＝ 777)
返回 (“同一个机器码注册次数超过了服务器限制,被暂时封禁. 请登录后台，插件今日详细消费记录里，相应的机器码是否有次数异常，并立刻优化解决”)
判断 (注册VIP返回值 ＝ -8)
返回 (“版本附加信息长度超过了20”)
判断 (注册VIP返回值 ＝ -9)
返回 (“版本附加信息里包含了非法字母”)
判断 (注册VIP返回值 ＝ -10)
返回 (“非法的参数ip”)


返回 (“”)

.版本 2<br /> <br /> .子程序 VIP判断, 文本型, , 判断VIP注册返回值<br /> .参数 注册VIP返回值, 整数型<br /> <br /> .判断开始 (注册VIP返回值 ＝ 1)<br />     返回 (“VIP注册成功”)<br /> .判断 (注册VIP返回值 ＝ -1)<br />     返回 (“无法连接网络”)<br /> .判断 (注册VIP返回值 ＝ -2)<br />     返回 (“进程没有以管理员方式运行”)<br /> .判断 (注册VIP返回值 ＝ 0)<br />     返回 (“失败”)<br /> .判断 (注册VIP返回值 ＝ 2)<br />     返回 (“余额不足”)<br /> .判断 (注册VIP返回值 ＝ 3)<br />     返回 (“绑定了本机器，但是账户余额不足50元”)<br /> .判断 (注册VIP返回值 ＝ 4)<br />     返回 (“注册码错误”)<br /> .判断 (注册VIP返回值 ＝ 5)<br />     返回 (“你的机器或者IP在黑名单列表中或者不在白名单列表中”)<br /> .判断 (注册VIP返回值 ＝ 6)<br />     返回 (“非法使用插件”)<br /> .判断 (注册VIP返回值 ＝ 7)<br />     返回 (“你的帐号因为非法使用被封禁”)<br /> .判断 (注册VIP返回值 ＝ 8)<br />     返回 (“附加码不在你设置的附加白名单中”)<br /> .判断 (注册VIP返回值 ＝ 77)<br />     返回 (“机器码或者IP因为非法使用，而被封禁”)<br /> .判断 (注册VIP返回值 ＝ 777)<br />     返回 (“同一个机器码注册次数超过了服务器限制,被暂时封禁. 请登录后台，插件今日详细消费记录里，相应的机器码是否有次数异常，并立刻优化解决”)<br /> .判断 (注册VIP返回值 ＝ -8)<br />     返回 (“版本附加信息长度超过了20”)<br /> .判断 (注册VIP返回值 ＝ -9)<br />     返回 (“版本附加信息里包含了非法字母”)<br /> .判断 (注册VIP返回值 ＝ -10)<br />     返回 (“非法的参数ip”)<br /> .默认<br /> <br /> .判断结束<br /> 返回 (“”)

  

子程序名	返回值类型	公开	备 注
年月日	文本型		取 年 月 日 时间

变量名	类 型	静态	数组	备 注
注册时间	日期时间型

注册时间 ＝ 取现行时间 ()
返回 (到文本 (取年份 (注册时间)) ＋ “-” ＋ 到文本 (取月份 (注册时间)) ＋ “-” ＋ 到文本 (取日 (注册时间)))

.版本 2<br /> <br /> .子程序 年月日, 文本型, , 取 年 月 日 时间<br /> .局部变量 注册时间, 日期时间型<br /> <br /> 注册时间 ＝ 取现行时间 ()<br /> 返回 (到文本 (取年份 (注册时间)) ＋ “-” ＋ 到文本 (取月份 (注册时间)) ＋ “-” ＋ 到文本 (取日 (注册时间)))

类模块

.版本 2

.程序集 大漠类库
.程序集变量 obj, 对象

.子程序 创建, , 公开

释放 ()
obj.创建 (“dm.dmsoft”, )
SetParam64ToPointer ()

.子程序 释放, , 公开

obj.清除 ()

.子程序 Ver, 文本型, 公开

返回 (obj.文本方法 (“Ver”, ))

.子程序 RegEx, 整数型, 公开
.参数 code, 文本型
.参数 Ver, 文本型
.参数 ip, 文本型

返回 (obj.数值方法 (“RegEx”, code, Ver, ip))

.子程序 SetParam64ToPointer, 整数型, 公开

返回 (obj.数值方法 (“SetParam64ToPointer”, ))

hjinpwhe1

https://125.confly.eu.org/thread-14784595-1-1.html

易语言易辈子

返回值可能是负1.重启路由器换IP或者明天应该自动恢复

Mouth

感谢分享

默泪撸断肠

卡住一般的返回值是负1.
负1原因1大漠版本太老。老版本里的大漠注测服务器不稳定。建议用最新版本。最新7.2319下载https://wwi.lanzoup.com/i0WGW0v2fzed

原因2负1注测失败是电脑网络原因.请检查是否有网络或者开了加速器类的.如果网络正常则请检查是否
电脑用错误到期注测码或网上失效注测码注测失败次数过多大漠认为攻击，封了一天IP，重启路由器或者等明天自动恢复，建议不要用错误或者网上分享的注测码来注测
原因3:或者电脑网络不正常连接不上大漠服务器,请用regex命令来注测.带上大漠工具包里有个注测IP，如
RegEx (“你自己注测码”, “你自己附加码”, “121.204.252.143|123.129.231.44|121.204.253.161|123.129.231.45|125.77.165.62|123.129.231.85|125.77.165.131|123.129.231.86”)

jyyilntj

用易语言写在dll中确实会卡住,用vc没事..  也不知道是咋回事

askjhgka

非常棒 谢谢

yinhanyu123

楼主我也碰到了您这个问题，咋解决的呀

ipkaion

jyyilntj 发表于 2023-10-6 19:43
用易语言写在dll中确实会卡住,用vc没事..  也不知道是咋回事

請問解決了嗎…