Foxtable(狐表) → 用户栏目 → 专家坐堂 → 增加行


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

主题：增加行
美女呀，离线，留言给我吧！
球球
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：18 积分：214 威望：0 精华：0 注册：2011/12/13 14:28:00 		增加行  发帖心情 Post By：2011/12/27 11:07:00 [只看该作者]

Syscmd.Row.AddNew()  增加一行 

Syscmd.Row.AddNews() 增加多行

 

上面的命名是系统的增加行，如何实现真对某一个表增加一行或多行的代码，请指教。
 回到顶部
帅哥哟，离线，有人找我吗？
游山玩水
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：39 积分：420 威望：0 精华：0 注册：2011/11/19 16:31:00 		  发帖心情 Post By：2011/12/27 11:11:00 [只看该作者]

Tables("表名").AddNew()
 回到顶部
美女呀，离线，留言给我吧！
球球
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：18 积分：214 威望：0 精华：0 注册：2011/12/13 14:28:00 		  发帖心情 Post By：2011/12/27 11:11:00 [只看该作者]

Tables("产品").AddNew()  这是针对一个表增加单行的代码

 

 

Tables("产品").AddNew(10)  这是针对一个表增加多行的代码，但是这段代码只能固定的增加数量很不灵活。

 

 

系统自动带的一个增加多行代码，能不能实现针对一个表实现随意增加多行的代码。
 回到顶部
帅哥哟，离线，有人找我吗？
游山玩水
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：39 积分：420 威望：0 精华：0 注册：2011/11/19 16:31:00 		  发帖心情 Post By：2011/12/27 11:16:00 [只看该作者]

设置一个变量n，做一个数值框给n赋值，

Tables("表名").AddNew(n)
 回到顶部
美女呀，离线，留言给我吧！
球球
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：婴狐 帖子：18 积分：214 威望：0 精华：0 注册：2011/12/13 14:28:00 		  发帖心情 Post By：2011/12/27 12:38:00 [只看该作者]

我很愚昧 能不能做一个例子谢谢您了
 回到顶部
帅哥哟，离线，有人找我吗？
blackzhu
 小大  6楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级：狐仙 帖子：9879 积分：57634 威望：0 精华：15 注册：2008/9/1 9:45:00 		  发帖心情 Post By：2011/12/27 13:00:00 [只看该作者]

Dim Val As Integer
If InputValue(Val, "增加行", "请输入要增加的行数:") Then
    Tables("表C").AddNew(Val)
End If
[此贴子已经被作者于2011-12-27 13:00:26编辑过]
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 4 次数据查询