[讨论] 用户管理使用外部数据表问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [讨论] 用户管理使用外部数据表问题

共有2547人关注过本帖树形打印复制链接主题：[讨论] 用户管理使用外部数据表问题

大红袍

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/6 10:39:00 [显示全部帖子]

你把你数据表的空行删除保存再试。

大红袍

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/7 10:46:00 [显示全部帖子]

RejectChanges，是还原到上一次save的状态。

你新增行的时候，肯定save了。

大红袍

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/7 11:17:00 [显示全部帖子]

那你就直接编写代码吧当前行删除吧

Tables("光缆台帐表").Current.Delete

大红袍

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/7 11:20:00 [显示全部帖子]

以下是引用wumingrong1在2016/4/7 11:18:00的发言：
但是我新增行后，好像鼠标没有移动到新增行上

那就用变量记录新增的行

Dim n As DataRow = DataTables("光缆台帐表").AddNew

vars("新增行") = n

然后

vars("新增行").Delete

大红袍

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/7 14:40:00 [显示全部帖子]

Dim dlg As New OpenFileDialog
dlg.Filter = "图形文件|*.bmp;*.jpg;*.gif;*.png;*.txt;*.xls;*.doc;*.cad;*.vsd;*.pptx;*.dwg;*.kmz;*.mdb;*.psd;*.rar"
If dlg.ShowDialog = DialogResult.OK Then
    Dim t As Table = e.Form.controls("table1").Table
    Dim fl As String = dlg.FileName

    t.Save()
    Dim r As Row = t.AddNew()
    t.Save()

    r("机房名称") = e.Form.Controls("机房名称").Text
    r("光缆名称") = e.Form.Controls("光缆名称").Text

    r("文件名") = FileSys.GetName(fl) '写入文件名
    r.Save '必须先保存
    r.DataRow.SQLInsertFile("附件",fl) '插入文件
    r.DataRow.SQLSetValue("CRC值", CRCCheckFile(fl)) '保存crc检验值
End If

大红袍

小大 6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：贵宾帖子：39310 积分：196782 威望：0 精华：1 注册：2015/4/25 9:23:00

Post By：2016/4/7 16:08:00 [显示全部帖子]

你是不是设置了筛选？去掉筛选。

具体问题做例子发上来。

下一主题 >> << 上一主题

主题：[讨论] 用户管理使用外部数据表 问题

主题：[讨论] 用户管理使用外部数据表问题