TC官方合作论坛

标题: 大漠注册收费注册不了? 求解. 谢谢 [打印本页]

作者: qq514757608    时间: 2014-1-27 09:04
标题: 大漠注册收费注册不了? 求解. 谢谢
本帖最后由 qq514757608 于 2014-2-3 11:21 编辑

功能 初始化()
    轩辕.注册热键()
    轩辕.销毁热键()
    轩辕.注册大漠插件()

功能结束

//------------------------------------------注册大漠插件------------------------------//
功能 注册大漠插件()
    变量 所需版本 = "5.1404",返回值,大漠版本,密钥="qwer15487grhjte"
    //--------解决XP系统Ghost版的atl.dll被精减掉
    ws = com("Wscript.Shell")
    ws.run("regsvr32 atl.dll /s")
    //注册大漠插件
    辅助.注册插件(辅助.获取资源路径("rc:dm.dll"), 真)
    dm = com("dm.dmsoft")
    大漠版本 = dm.Ver()
    //---------检查是否注册成功-------------//
    如果(所需版本 == 大漠版本)
        //注册插件成功
        调试输出("[注册大漠] 大漠插件注册成功 版本:" & 大漠版本)
        //注册收费功能
        注册码 = 轩辕.注册码加密()
        注册码 = 字符串.aes解密(注册码,密钥)
        返回值 = dm.Reg("~~~~~~~~~~~~~~~~~~~","0001")
        如果(返回值 == 1)
            调试输出("[注册大漠] 收费功能注册成功")
        否则
            调试输出("[注册大漠] 收费功能注册失败")
        如果结束
    否则
        辅助.消息框("请关闭360等杀软再进行使用")
        辅助.退出()
    如果结束     
功能结束
//-----------------------------------注册码加密--------------------------------------//
功能 注册码加密()
    变量 加密字串,源数据="~~~~~~~~~~~~~~~",密钥="qwer15487grhjte"
    加密字串 = 字符串.aes加密(源数据,密钥)
    返回 加密字串
功能结束


调试输出提示是  收费失败~~~~~~~
--------------------------------------------------------------------------------------------------------------



   问题得到解决,原来是大漠后台里:    我的注册码/   注册码上端,   开启和关闭,    第一次使用,  默认是关闭的,  需要手动开启, 否则, 返回值永远等于 4(注册码错误)

自己写代码,  个别原因, 自己写代码,  调试输出下就好了,    接口里有对应的返回值~~~~~~~~~~~




作者: kevinqq    时间: 2014-1-27 11:27
收费函数失败 是有返回值的 可以根据返回值  看是什么错误原因
作者: 芹菜    时间: 2014-1-27 13:54
用个 消息框弹出 返回值 ,对照文档查看 返回的信息。




欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1