- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [分享]数据保存时的Sql语句合成函数 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=53006)
-- 发布时间：2014/6/27 12:01:00
-- [分享]数据保存时的Sql语句合成函数
用于表格数据保存时，使用Sql语句直接保存的时候，自动生成 删除，新增，修改语句
此主题相关图片如下：jdfw.gif
测试命令
Dim strlist As List(Of String) = Functions.Execute("sql提取函数",Tables("客户"),"客户","ID","ID","客户ID|客户名称|日期列|_shishi|逻辑列","客户ID|客户名称|日期列|_shishi|逻辑列",1)
If strlist.count = 0 Then Return Nothing
Dim sql As String
Dim cmd As New SQLCommand
cmd.C
Dim Count As Integer = 0
For Each s As String In strlist
cmd.CommandText = s
Count += cmd.ExecuteNonQuery()
Output.show(s)
Next
Tables("客户").DataTable.BaseTable.AcceptChanges() \'提交修改
Tables("客户").DataTable.Load \'刷新表
Output.show("影响了" & Count & "行")
以下内容只有回复后才可以浏览
-- 发布时间：2014/6/27 12:02:00
--
顶!~
-- 发布时间：2014/6/27 12:03:00
--
这种好。。。
-- 发布时间：2014/6/27 12:09:00
--
vb
-- 发布时间：2014/6/27 13:09:00
--
ok
-- 发布时间：2014/6/27 13:52:00
--
好，学习SQL的捷径。
-- 发布时间：2014/6/27 13:55:00
--
看看
-- 发布时间：2014/6/27 14:17:00
--
學習SQL
-- 发布时间：2014/6/27 14:44:00
--
学习下
-- 发布时间：2014/6/27 15:05:00
--
学习下，谢分享！