Foxtable(狐表)用户栏目专家坐堂 → AfterOpenProject不正确的数据求助


  共有2453人关注过本帖树形打印复制链接

主题:AfterOpenProject不正确的数据求助

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107028 积分:544371 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/21 21:40:00 [显示全部帖子]

一般是解密的数据,或者密钥不正确,无法解密:

msgbox(Code) ‘看看是不是之前加密后的数据’
If Code > "" AndAlso Decry\ptText(Code,"DwPzPt","DjyPrT") = Comput\erId Then

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107028 积分:544371 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/22 9:42:00 [显示全部帖子]

测试没有问题,生成注册码的方式不对吧?Output.Show(EncryptText(ComputerId,"DwPzPt","DjyPrT") )

注册确定按钮
SaveConfigValue("Register" & ComputerId, e.Form.Controls("注册码").Value)
If DecryptText(GetConfigValue("Register" & ComputerId,""),"DwPzPt","DjyPrT") = ComputerId Then
    e.Form.Controls("注册码").Value=""
    e.Form.Controls("注册码").Value="已注册!"
Else
    msgbox("请输入正确的注册码!")
    Return
End If
e.Form.Close()

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107028 积分:544371 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/22 10:14:00 [显示全部帖子]

我测试没有问题,重新生成注册码测试。

一步步截图列出您详细的测试步骤

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107028 积分:544371 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/22 10:56:00 [显示全部帖子]

调试技巧:http://www.foxtable.com/webhelp/scr/1485.htm

看那一句代码有问题

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107028 积分:544371 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/22 14:54:00 [显示全部帖子]

代码没有任何问题。如果有问题就是生成的注册码有问题。加密生成的注册码有问题,重新生成注册码测试

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107028 积分:544371 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/22 16:19:00 [显示全部帖子]

每台电脑机器码都不一样,生成的注册码肯定都不一样。A电脑的注册码只能在A电脑测试

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107028 积分:544371 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/23 8:59:00 [显示全部帖子]

代码没有问题。

两边生成的不一样 -- 怎么生成的?具体代码,测试步骤截图说明
[此贴子已经被作者于2020/6/23 8:59:43编辑过]

 回到顶部