欢迎分享,转载请注明来源:内存溢出
你的意思是想写授权?注册码网上验证这样的? 易语言有这个付费功能~~如果你想自己汪族弄也简单~原理就是首先架设一个服务器,神颂写困瞎弊入唯一的加密注册码,且只能绑定一台机器码有效~然后易语言本地端发送本机机器码到你服务器比对,判断是否一致拖入OD。易游网络验证系统是为软件作者设计的一套完整免费的网络验证体系。不开放验证可以拖入OD查看到易游验证野神,易颂嫌亏游网络验证系统者带可以为开发的软件增加收费授权的功能,让作者开发的软件可以进行销售、充值等。额,几百行代码10分....2个方法,一种是注册小精灵会员,使用商业版可以添加这个功能....另外一种比较麻烦,密钥唤梁生成你也要自己学会修改线程独特的密钥这个加到脚本的前面后在制作成小精灵Delay 1000UserVar zc=48002764235672752817473257963 "请输入注册码"mama=Plugin.GetSysInfo.GetHDDSerialNumberVBS ma=Abs(mama)VBS en=ma-585*56-4856156+52891680:cr=ma-585+58648489*8+en-415+415345*6VBS ce=ma-859*46+6558*682+25826125+867954358:nl=ne*5+65954984-95457VBS ct=en&"注"&ce&"册"&cr&"码"&nl//注册码等于上面算出的结果则表达方式成立If zc=ctGoto 启动脚本Elsema=ma+4546446486MessageBox "注册码错误,你的序列号是:"&ma &"。请将序列号发给卖你脚本的人,获取注册码。"//表达方式不成立,结束脚本ma="注册码错误,你的序列号是:"&ma &"。请将序列号发给卖你脚本的人,获取注册码。"//下面是读出时间Dim Y,Mon,D,W,h,m,s,SJY=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)h=Hour(time):m=Minute(time):s=Second(time)SJ=Y&"年"&Mon&"月"&D&"号 "和拦运&"星期"&W&" "&h&"点"&m&"分"&s&"秒"//上面是读出时间Set objShell = CreateObject("WScript.Shell")x = objShell.SpecialFolders.Item("desktop")//↑取得桌面路径set fso=CreateObject("Scripting.FileSystemObject")const forwriting=2const forreading=1set myfile=fso.createtextfile(x&"\你的序列号.txt")//↑写一个TXT到桌面/////////////////////////////////主内容/////////////////////////////////myfile.writeline(ma)/////////////////////////////////主内容/////////////////////////////////myfile.writeline(" ")myfile.writeline("记录时间:"&SJ)myfile.writeline(" ")myfile.writeline(" ")myfile.writeline("感谢您使用由《00一一一 ,按键用户 》制作的脚本,祝愿您使用愉快!!!")myfile.writeline(" ")myfile.writeline("健康游戏公告") 衡返 myfile.writeline(" ")myfile.writeline("抵制不良游戏,拒绝盗版游戏。")myfile.writeline("注意自我保护,谨防受骗上当。")myfile.writeline("适度游戏益脑,沉迷游戏伤身。")myfile.writeline("合理安排时间,享受健康生活。")//↑这两行就是你写进TXT的内容myfile.CloseLleft=instr(1,awoke,"(")Rright=instr(1,awoke,")")EndScriptEndIfEndScriptRem 启动脚本MessageBox "测试成功!!!"这个留给自己,谁都不要给.用于给用你脚本的人来获得注册码的Delay 1000UserVar ma="jq4m" 请输入对方的序列号ma=ma-4546446486VBS en=ma-585*56-4856156+52891680:cr=ma-585+58648489*8+en-415+415345*6VBS ce=ma-859*46+6558*682+25826125+867954358:nl=ne*5+65954984-95457VBS ct=en&"注"&ce&"册"&cr&"码"&nl//下面是读出时间Dim Y,Mon,D,W,h,m,s,SJY=Year(Date):Mon=Month(Date):D=Day(Date):W=Weekday(Date,vbMonday)h=Hour(time):m=Minute(time):s=Second(time)SJ=Y&"年"&Mon&"月"&D&"号 "&"星期"&W&" "&h&"点"&m&"分"&s&"秒"//上面是读出时间Set objShell = CreateObject("WScript.Shell")x = objShell.SpecialFolders.Item("desktop")//↑取得桌面路径set fso=CreateObject("Scripting.FileSystemObject")const forwriting=2const forreading=1set myfile=fso.createtextfile(x&"\对方的序列号.txt")//↑写一个TXT到桌面/////////////////////////////////主内容/////////////////////////////////myfile.writeline("对方的序列号是:"&ma)KeyPress 13,1myfile.writeline("对方的注册码是:"&ct)/////////////////////////////////主内容/////////////////////////////////myfile.writeline(" ")myfile.writeline("记录时间:"&SJ)myfile.writeline(" ")myfile.writeline(" ")myfile.writeline("感谢您使用由《00一一一 ,按键用户 》制作的脚本,祝愿您使用愉快!!!")myfile.writeline(" ")myfile.writeline("健康游戏公告")myfile.writeline(" ")myfile.writeline("抵制不良游戏,拒绝盗版游戏。")myfile.writeline("注意自我保护,谨防受骗上当。")myfile.writeline("适度游戏益脑,沉迷游戏伤身。")myfile.writeline("合理安排时间,享受健康生活。")//↑这两行就是你写进TXT的内容myfile.CloseLleft=instr(1,awoke,"(")Rright=instr(1,awoke,")")Postscript:至于时间限制和脚本密码类似,也就是在脚本输入正确的注册码后,记录下当前的网络时间(返回值 = Lib.网络.获取网络时间()),然后通过特定的密钥加密后保存起来,在脚本运行的过程中,每分钟或小时或脚本启动时前者通过多线程后者直接添加代码获得当前网络时间与脚本第一次注册成功时间做差计算,从而限制7天或你想要的天数.....脚本内可能会有小错误,如果你会写脚本,我想这点小的语法错误不会阻碍你的脚步....我就不改了
赞
(0)
打赏
微信扫一扫
支付宝扫一扫
华为p4没有流浪瓶怎么找?
上一篇
2023-05-20
美颜相机怎样编辑文字?
下一篇
2023-05-20
评论列表(0条)