以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- SQLAddNew 不能自动填写排序列和锁定列吗 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176039) |
-- 作者:foxtablefanse -- 发布时间:2022/3/28 15:31:00 -- SQLAddNew 不能自动填写排序列和锁定列吗 Dim cmd As new SQL Command cmd.Conne cti cmd.Comm andText = "Sel ect * From [**] Where 1=2" Dim dtb As DataTable = cmd.Execu teReader(True) Dim dr As DataRow = dtb.SQLAddNew() For Each nm As String In nms If e.PostValues.ContainsKey(nm) dr(nm) = e.PostValues(nm).trim() Else dr(nm) = Nothing End If Next dr("编号") =Functions.Execute("SerialNumber",e,"往来单位编号") If dr("编号") >"" Then dr.save() With wb.AddMsgPage("","msgpage","添加成功", "") \'生成成功提示页 .AddButton("btn1","继续添加","AddCustomer.htm") .AddButton("btn2","查看记录","Customerlist.htm") .AddButton("btn3","退出","index.htm") End With \'返回增加成功消息 Else End If e.WriteString(wb.Build) \'生成网页 |
-- 作者:有点蓝 -- 发布时间:2022/3/28 15:38:00 -- 既然已经使用了SQLcommand,直接addnew即可,没有必要使用SQLAddNew |
-- 作者:foxtablefanse -- 发布时间:2022/3/29 8:31:00 -- 改成 .addnew后 锁定字段可以了,但排序字段还是不行 |
-- 作者:有点蓝 -- 发布时间:2022/3/29 8:53:00 -- 我测试没有问题。排序字段和主键值要保存后才是正确的值 |