Dim _jytable As DataTable
Dim cmd As new sqlcommand
cmd.C
cmd.CommandText="s e l e c t * from {调出人员}"
_jytable=cmd.ExecuteReader(True)
dr = _jyTable.AddNew()
For Each c As Col In Tables("基本信息").Cols
If _jytable.DataCol.contains(c.name) Then
dr(c.name)=Tables("基本信息").current(c.name)
End If
Next
_jyTable.save ????
Tables("基本信息").current.Delete
e.Form.Close
以前用试用版时，代码正常。
用开发版其它都正常，当执行到 _jytable.save 时，提示：对于造型说明无效的字符值，什么原因呀？
[此贴子已经被作者于2015/10/21 17:05:09编辑过]
加好友 
发短信
Post By：2015/10/21 17:03:00 [只看该作者]
