| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- sql问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=168826) |
| -- 作者：刘林 -- 发布时间：2021/5/23 22:21:00 -- sql问题 请问老师，我想用sqlreplacer("hm", 用lb _identify的后四位替换 我是想用lb例的值 + _identify的后四位合成一个值替换hm
[此贴子已经被作者于2021/5/23 22:29:06编辑过]
|
| -- 作者：有点蓝 -- 发布时间：2021/5/23 22:54:00 -- DataTables("订单").SQLReplaceFor("hm", "lb + Right([_Identify],4)", "",True) |
| -- 作者：刘林 -- 发布时间：2021/5/23 22:58:00 -- lb是字符列 |
| -- 作者：有点蓝 -- 发布时间：2021/5/23 23:12:00 -- hm是整数？ |
| -- 作者：刘林 -- 发布时间：2021/5/24 0:18:00 -- hm是字符形 |
| -- 作者：有点蓝 -- 发布时间：2021/5/24 9:05:00 -- 2楼代码我测试没有问题。提示什么错误？ |
| -- 作者：刘林 -- 发布时间：2021/5/25 15:14:00 -- Dim cmd As new SQLCommand cmd.C cmd.CommandText = "S/LECT * FROM {申请表} where sfzh=\'" & e.PostValues("sfzh") & "\'" Dim dt As DataTable = cmd.ExecuteReader(True) If dt.DataRows.Count>0 dr = dt.DataRows(0) Else dr=dt.AddNew() End If 。。。。。 dr("类别")=e.PostValues("类型说明").Substring(0,1) & "2" dr("年份")=val(e.Cookies("xsbj").Substring(2,4))+6 dr("sqsj")=Date.Today() dr("bh")= e.PostValues("类型说明").Substring(0,1) & "2" & right(dr("_identify"),4) dr("bkxx")=e.PostValues("byxx") dr.save() 因为这里要保存才有_identify, 所以先保存了，再用下一句来生成bh dt.SQLReplaceFor("bh", "类别" & "Right([_Identify],4)", "sfzh=\'" & e.Cookies("username") & "\'",True) 其中bh为字符型，类别也为字符型，现在的结果是没有结果，也没提示 |
| -- 作者：有点蓝 -- 发布时间：2021/5/25 15:20:00 -- 看不懂代码就不要乱改呀，或者下次把改之后的代码及时贴上来 |