[浏览完整版]
标题：[分享]数据保存时的Sql语句合成函数
1楼
逛逛 发表于：2014/6/27 12:01:00用于表格数据保存时，使用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 & "行")
以下内容只有回复后才可以浏览
2楼
Bin 发表于：2014/6/27 12:02:00顶!~
3楼
有点甜 发表于：2014/6/27 12:03:00 这种好。。。
4楼
lihe60 发表于：2014/6/27 12:09:00vb
5楼
telek 发表于：2014/6/27 13:09:00ok
6楼
lsy 发表于：2014/6/27 13:52:00好，学习SQL的捷径。
7楼
qq121454970 发表于：2014/6/27 13:55:00看看
8楼
jaegea 发表于：2014/6/27 14:17:00學習SQL
9楼
jspta 发表于：2014/6/27 14:44:00学习下
10楼
baoxyang 发表于：2014/6/27 15:05:00学习下，谢分享！