Foxtable(狐表)用户栏目专家坐堂 → [求助]如果数据库中没有数据的时候添加数据会出错~求解决~好像是我的代码写的不对


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

主题:[求助]如果数据库中没有数据的时候添加数据会出错~求解决~好像是我的代码写的不对

帅哥哟,离线,有人找我吗?
Bin
  31楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/6/19 15:15:00 [只看该作者]

设置好分页再LOAD不存在出现11行的问题,   而且出现空行更加是不可能 除非你在其他地方有增加行的代码.

 回到顶部
帅哥哟,离线,有人找我吗?
y653988556
  32楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:52 积分:364 威望:0 精华:0 注册:2013/6/5 0:08:00
  发帖心情 Post By:2013/6/19 15:17:00 [只看该作者]

恩 我重新做一个 小项目看看 这个 可能被我改的有点乱了~

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  33楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/6/19 15:21:00 [只看该作者]

我把帮助的例子改来一下,你参考一下吧,空表增加行不会出错的:

 

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:传统编辑方式.table


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  34楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/6/19 15:22:00 [只看该作者]

以下是引用狐狸爸爸在2013-6-19 15:21:00的发言:

我把帮助的例子改来一下,你参考一下吧,空表增加行不会出错的:

 

 

 下载信息  [文件大小:296.0 KB  下载次数:0]
图片点击可在新窗口打开查看点击浏览该文件:传统编辑方式.table

他现在是希望直接不出现空行, 所以必须得再点击保存的时候再增加行然后使用代码赋值.

 回到顶部
帅哥哟,离线,有人找我吗?
y653988556
  35楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:52 积分:364 威望:0 精华:0 注册:2013/6/5 0:08:00
  发帖心情 Post By:2013/6/19 15:24:00 [只看该作者]

空行的问题解决了 确实 是在我打开新增窗口的时候 addnew了一下 这个 没问题了 已经解决了 谢谢了 

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  36楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/6/19 15:24:00 [只看该作者]

呵呵,原来这样啊。

图片点击可在新窗口打开查看

 

 

不过楼主你没有必要为这个大费周章吧,反正空行可以删除的。


 回到顶部
帅哥哟,离线,有人找我吗?
y653988556
  37楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:52 积分:364 威望:0 精华:0 注册:2013/6/5 0:08:00
  发帖心情 Post By:2013/6/19 15:26:00 [只看该作者]

哈哈 是啊 我之前 就是按照咱们案例做的 但是 我觉得 那样好像 有那么一点点的小瑕疵 所以就想修改一下~图片点击可在新窗口打开查看

 回到顶部
帅哥哟,离线,有人找我吗?
y653988556
  38楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:52 积分:364 威望:0 精华:0 注册:2013/6/5 0:08:00
  发帖心情 Post By:2013/6/19 15:28:00 [只看该作者]

但是 关于加载 分页那个 你们说 点击保存的时候不用重新Load一下的 但是 我刚才试了一下 还是失败了
我在afteropenproject的时候是
If User.Type <> UserTypeEnum.Developer
    TableCaptionVisible = False
End If

Forms("上边栏").Open()
Forms("左边栏").Open()
Forms("初始化").Open()
With DataTables("GongWen")
    .LoadFilter = "" '一定要清除加载条件
    .LoadTop = 3
    .LoadPage = 0
    .LoadReverse = True
    .Load()
End With
Tables("GongWen").Sort = "Id desc"
这么写的
有什么写错的么?

 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  39楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2013/6/19 15:32:00 [只看该作者]

出现什么问题? 多出一条数据?

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  40楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2013/6/19 15:34:00 [只看该作者]

If User.Type <> UserTypeEnum.Developer
    TableCaptionVisible = False
End If
Forms("上边栏").Open()
Forms("左边栏").Open()
Forms("初始化").Open()
With DataTables("GongWen")
    .LoadFilter = "" '一定要清除加载条件
    .LoadTop = 3
    .LoadPage = 0
     .LoadOver = "ID"
    .LoadReverse = True
    .Load()
End With
 

 回到顶部
总数 63 上一页 1 2 3 4 5 6 7 下一页