Foxtable(狐表) → 用户栏目 → 专家坐堂 → 这个代码如何理解？


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

主题：这个代码如何理解？
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 9:46:00 [显示全部帖子]

1、这种是.net里定义函数的参数，建议网上学习一下vb.net

2、s_name是调用这个函数需要传入的参数
比如调用：_BizCodeBuilder.GetNextCode("表A")
那么s_name的值就是“表A”

3、执行下面代码，把弹窗里的sql放到数据库里执行.
Dim Sql As String = CExp("select * from uSysBizCode where BizName='{0}'", s_name)
msgbox(sql)

CExp的用法多看看帮助吧：http://www.foxtable.com/webhelp/topics/2919.htm
假设s_name的值为“表A”，那么合成后的sql应该是
select * from uSysBizCode where BizName='表A'
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 10:30:00 [显示全部帖子]

到命令窗口执行下面代码，看msgbox(sql)弹出什么

_BizCodeBuilder.GetNextCode("某个表名")
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

客户端给服务端发送消息的代码不正确

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 11:20:00 [显示全部帖子]

1、和1楼的代码没有一点关系，看客户端代码
2、OpenQQ与不用OpenQQ和速度没有直接关系，有异常会导致程序卡住

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


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 11:53:00 [显示全部帖子]

            Else
                Dim rt As String = QQClient.SendWait(":f订单f:")
                e.DataRow("编号") = rt
            End If
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 14:27:00 [显示全部帖子]

OpenQQ服务端的事件代码有问题，检查UserLogging、ReceivedMessage

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


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 14:47:00 [显示全部帖子]

编号表格里的mark列没有数据

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 15:17:00 [显示全部帖子]

markvalue有没有数据？
……
msgbox(dr("MarkValue"))
msgbox(dr("Mark"))
            If dr("MarkValue") <> Date.Today.ToString(dr("Mark")) Then 是不是这个错，如何解决？
                dr("MaxValue") = 1
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/27 17:33:00 [显示全部帖子]

调试是执行哪一句代码后出错的？

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


加好友 发短信
等级：超级版主 帖子：111393 积分：567029 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2024/7/28 21:41:00 [显示全部帖子]

调试哪一行代码出错？http://www.foxtable.com/webhelp/topics/1485.htm

 回到顶部
总数 24 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05762 秒, 5 次数据查询