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


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

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

帅哥哟,离线,有人找我吗?
evolymft
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
AfterOpenProject不正确的数据求助  发帖心情 Post By:2020/6/21 16:09:00 [只看该作者]





.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2019.11.3.1
错误所在事件:项目,AfterOpenProject
详细错误信息:
不正确的数据。

[此贴子已经被作者于2020/6/22 14:13:47编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
sloyy
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2193 积分:13908 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2020/6/21 19:02:00 [只看该作者]

你这是从哪抄来的吧?怎么有这么多 "\"?  

 回到顶部
帅哥哟,离线,有人找我吗?
evolymft
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2020/6/21 19:16:00 [只看该作者]

有\,才可以上传代码。

 回到顶部
帅哥哟,离线,有人找我吗?
sloyy
  4楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2193 积分:13908 威望:0 精华:2 注册:2012/2/25 10:59:00
  发帖心情 Post By:2020/6/21 19:38:00 [只看该作者]

在代码中隔几行设置一个 messagebox(1) .......messagebox(10)
看看代码在那一句出错

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望: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

 回到顶部
帅哥哟,离线,有人找我吗?
evolymft
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2020/6/22 9:04:00 [只看该作者]

老师:还是不对。
现上传实例,请你指点,谢谢。
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:afteropenproject不正确的数据求助.rar


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望: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()

 回到顶部
帅哥哟,离线,有人找我吗?
evolymft
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2020/6/22 10:08:00 [只看该作者]

老师:改了还是不对,请你再指点,谢谢。

 回到顶部
帅哥哟,离线,有人找我吗?
evolymft
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1028 积分:7191 威望:0 精华:0 注册:2016/6/16 15:23:00
  发帖心情 Post By:2020/6/22 10:08:00 [只看该作者]

以前这样用的没出现错误。


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/6/22 10:14:00 [只看该作者]

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

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

 回到顶部
总数 18 1 2 下一页