以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  dryqm("列名")没有保存,共3列  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99620)

--  作者:zhangjian222200
--  发布时间:2017/4/22 19:17:00
--  dryqm("列名")没有保存,共3列
看了很久,换了多种方法,还是找不到原因,麻烦看看
                Dim tjrs As Short = dryqm("推荐人数")\'定义原有推荐人数
                msgbox("原有推荐人数列:" & dryqm("推荐人数")) ’这里提示:1
                tjrs = tjrs + 1
                msgbox("推荐人数计算后:" & tjrs)
                dryqm("推荐人数") = tjrs  \'写入邀请人的邀请次数(注意:与刚添加的行不同)
                msgbox("推荐人数保存:" & dryqm("推荐人数"))
                msgbox("内部:" & 4)

                If dryqm("推荐人数") = 2 Then
                    msgbox("内部11:")
                    dryqm("会员等级") = "中级会员"  \'更改邀请人的会员等级
                    msgbox("内部22:")
                    Dim shiycs0 As String = dryqm("免费邀ta次数_今日使用")
                    Dim shiycs As Integer
                    Integer.TryParse(shiycs0,shiycs)
                    msgbox("内部33:")
                    dryqm("免费邀ta次数_今日剩余") = 9 - shiycs  \'更改邀请人,免费邀请次数
                    msgbox("内部44:")
                End If

msgbox执行时,显示的数字也是对的,但是“推荐人数”列(段整数列,另外2列是字符型),没有写入
其他代码均可正常执行,没有任何提示

全部代码:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:推荐人数不保存3.txt




[此贴子已经被作者于2017/4/22 22:20:34编辑过]

--  作者:有点色
--  发布时间:2017/4/23 12:43:00
--  

1、你没有执行save操作

 

2、你用的是sqlfind,即便save以后,你还需要刷新表才能看到你修改的内容。