web数据源表保存时提示错误如下
此主题相关图片如下:错误1.png
服务端数据库是access格式,表如下:
此主题相关图片如下:表结构.png
表数据如下
此主题相关图片如下:表数据如下.png
生成数据代码如下:
For Each fl As String In dlg.FileNames
Dim ifo As new FileInfo(fl)
Dim dr As DataRow = DataTables("文件表").AddNew()
dr("文件名") = Ifo.Name.Remove(Ifo.Name.Length - ifo.Extension.Length)
dr("后辍") = ifo.Extension
dr("父目录ID") = CInt(tr.SelectedNode.Name)
dr("上传人员ID") = _OperID
dr("版本") = 0
dr("是否最新版") = True
dr("修改时间") = ifo.LastWriteTime
Next
DataTables("文件表").Save()
测试发现,出错就在最后保存表时出错,而且第一条数据存到了数据库