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


  共有2876人关注过本帖树形打印复制链接

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

帅哥哟,离线,有人找我吗?
大红袍
  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 [显示全部帖子]

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

 

 具体问题做例子发上来。


 回到顶部