Foxtable(狐表)用户栏目专家坐堂 → 指令不执行


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

主题:指令不执行

美女呀,离线,留言给我吧!
cqmeiyan
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:939 威望:0 精华:0 注册:2011/6/8 9:13:00
指令不执行  发帖心情 Post By:2014/6/15 9:30:00 [只看该作者]

Tables("a加班申請單主檔").AddNew
Tables("a加班申請單主檔").current("日期")=Date.Today

Tables("a加班申請單子檔").AddNew
Tables("a加班申請單子檔").current("日期")=Date.Today


相同的指令,在一个数据表中不执行,在一个数据表中可以执行,前面做过的操作是将两表进行了关联,关联后就出现这种情况

 回到顶部
美女呀,离线,留言给我吧!
cqmeiyan
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:939 威望:0 精华:0 注册:2011/6/8 9:13:00
  发帖心情 Post By:2014/6/15 9:33:00 [只看该作者]

怎么上传不了附件

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/15 9:33:00 [只看该作者]

 代码一定是有效的。在表里面,肯定是添加了行的,你去查看一下。

 

 你是不是要这样的?

 

Dim nr As Row = Tables("a加班申請單主檔.a加班申請單子檔").AddNew
nr("日期") = Date.Today

 回到顶部
美女呀,离线,留言给我吧!
cqmeiyan
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:939 威望:0 精华:0 注册:2011/6/8 9:13:00
  发帖心情 Post By:2014/6/15 9:35:00 [只看该作者]

行是添加了,但是不会写入日期值进去

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/15 9:36:00 [只看该作者]

以下是引用cqmeiyan在2014-6-15 9:35:00的发言:
行是添加了,但是不会写入日期值进去

 

看4楼,或者这样

 

Dim nr As Row = Tables("a加班申請單子檔").AddNew
nr("日期") = Date.Today

 回到顶部
美女呀,离线,留言给我吧!
cqmeiyan
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:939 威望:0 精华:0 注册:2011/6/8 9:13:00
  发帖心情 Post By:2014/6/15 9:36:00 [只看该作者]

我已经将关联去掉了,同样的代码一个表有效,一个表无效,我已经项目与数据库打包,但无法添加上传进来

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/15 9:38:00 [只看该作者]

 看5楼,看代码是否有效。

 回到顶部
美女呀,离线,留言给我吧!
cqmeiyan
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:939 威望:0 精华:0 注册:2011/6/8 9:13:00
  发帖心情 Post By:2014/6/15 9:40:00 [只看该作者]

现在上传不了附件,能否提供邮箱,我发给你测试看看

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/15 9:42:00 [只看该作者]

 回复8楼,这是很简单的问题好吧?

 

 这样写代码,不可能无效,肯定是你别的地方影响了

 

Dim nr As Row = Tables("a加班申請單子檔").AddNew
nr("日期") = Date.Today
 
 
 

 回到顶部
美女呀,离线,留言给我吧!
cqmeiyan
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:104 积分:939 威望:0 精华:0 注册:2011/6/8 9:13:00
  发帖心情 Post By:2014/6/15 9:49:00 [只看该作者]

试过很多次都无法上传,我已将文件放在网盘上,你可以下载下来测试看看,这个问题困扰了很久.实在无法解决 


 回到顶部
总数 11 1 2 下一页