- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 错误提示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=101599)
-- 发布时间：2017/6/3 18:19:00
-- 错误提示
Dim st1 As Date = Date.Now
Dim strlist As List(Of String) = Functions.Execute("sql提取函数",Tables("学生信息"),"学生信息","_Identify","[_Identify]","学生姓名|学籍号|身份证件号|性别|出生日期|民族|家庭住址|联系电话|班级|年级|政治面貌|健康状况|就读方式|邮政编码|综合素质|状态|户口性质","学生姓名|学籍号|身份证件号|性别|出生日期|民族|家庭住址|联系电话|班级|年级|政治面貌|健康状况|就读方式|邮政编码|综合素质|状态|户口性质",1)
Dim sql As String
Dim cmd As New SQLCommand
cmd.C
Dim Count As Integer = 0
try
Connections("180.153.108.50").BeginTransaction
For Each s As String In strlist
cmd.CommandText = s
Count += cmd.ExecuteNonQuery()
output.show(s)
Next
Connections("180.153.108.50").Commit \'提交事务,所有操作生效
Catch ex As Exception \'如果出错
msgbox(ex.message)
Connections("180.153.108.50").Rollback() \'回滚事务,撤销所有操作
End Try
Tables("成绩").DataTable.BaseTable.AcceptChanges() \'提交修改
MessageBox.Show("亲,我正在为节省您的每一秒钟努力,本次保存共耗时: " & (Date.Now - st1).TotalSeconds & "秒")
此主题相关图片如下：qq图片20170603181715.png
上面保存代码出现这个，好像不要出生日期就没问题，请问怎么办
-- 发布时间：2017/6/3 21:46:00
--
定义变量名错误
-- 发布时间：2017/6/3 22:31:00
--
Dim strlist As List(Of String) = Functions.Execute("sql提取函数",Tables("学生信息"),"学生信息","_Identify","[_Identify]","学生姓名|学籍号|身份证件号|性别|出生日期|民族|家庭住址|联系电话|班级|年级|政治面貌|健康状况|就读方式|邮政编码|综合素质|状态|户口性质","学生姓名|学籍号|身份证件号|性别|出生日期|民族|家庭住址|联系电话|班级|年级|政治面貌|健康状况|就读方式|邮政编码|综合素质|状态|户口性质",1)
不是楼上所说的问题哟，当把出生日期去掉就没有问题了，但现在是需要保存出生日期列，这怎么办
-- 发布时间：2017/6/4 10:52:00
--
弹出每一条的sql语句看看
For Each s As String In strlist
msgbox(s)
Next
如果是日期的问题，如果你的是sqlserver数据库，你要去修改 sql提取函数，把日期的#改成单引号\'
-- 发布时间：2017/6/4 19:59:00
--
改了行了，谢谢，请问如何动态提取修改过的列名呢
-- 发布时间：2017/6/4 20:40:00
--
以下是引用刘林在2017/6/4 19:59:00的发言：
改了行了，谢谢，请问如何动态提取修改过的列名呢
改了行了，谢谢，请问如何动态提取修改过的列名呢
不理解你的意思，如果你的列名是动态的，那么你可以单独做一个表存放你的列名。