以文本方式查看主题

-  易表在线答疑  (http://egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://egrid2000.com/dvbbs/list.asp?boardid=2)
----  [求助]如何将查询窗口的信息复制到另一张表中  (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=1911)

--  作者:zzyuan8989
--  发布时间:2011/9/21 11:51:00
--  [求助]如何将查询窗口的信息复制到另一张表中
老师你好,有个问题请您帮助。我在查询窗口中设置一个【档案登记】按钮,用来实现借阅的档案直接登记(对应的列是‘借阅时间’), 就是把当前窗口的信息复制到《档案借阅》表中。下面是我设置的公式,请老师帮我看看,怎么一点【档案登记】按钮就全部复制过去了。这是我上传的文件,谢了。AddCol(GridName,"标识",3, True )  And AddCol(GridName,"标识1",3, True ) And EvalFor(GridName,"标识","If(Text([借阅时间]) = """",-1,0)") And CopyRows("档案借阅","标识", "=" ,-1) And DeleteCol(GridName,"标识1") And DeleteCol(GridName,"标识")  And OpenWindow(0) And MsgBox("已完成登记!",1)

另外,老师,前几天您教我的将EXCEL文件导入时,我不小心打开了《档案借阅》表,但是也能将EXCEL文件导入,导入路径是:ImportDBFile("d:\\档案明细表.XLS",6,"档案明细表") And MsgBox("已完成导入!",1)
egd文件下载


--  作者:lyang70
--  发布时间:2011/9/21 13:19:00
--  
[这个贴子最后由lyang70在 2011/09/21 01:22pm 第 1 次编辑]

没找到所谓的"查询窗口中设置一个【档案登记】按钮"...

先按版主的建议处理一下吧...

1、...
2、隐藏无关的列;
3、暂时不要启用自定义菜单;
4、无关紧要的表预处理公式删除。
这样方便查看你的文件。


--  作者:zzyuan8989
--  发布时间:2011/9/21 13:34:00
--  
老师,是【借阅登记】按钮,不好意思。就是把当前窗口查询到的信息复制到《档案借阅》表中。另外,老师,前几天您教我的将EXCEL文件导入时,我不小心打开了《档案借阅》表,但是也能将EXCEL文件导入,导入路径是:ImportDBFile("d:\\档案明细表.XLS",6,"档案明细表") And MsgBox("已完成导入!",1)
多谢了。egd文件下载
--  作者:wjq1072
--  发布时间:2011/9/21 14:16:00
--  
egd文件下载
--  作者:zzyuan8989
--  发布时间:2011/9/21 14:46:00
--  
版主你好:我的意思是在我上传的软件窗口中查到要借阅的档案信息后,在此窗口的{借阅时间}一栏内录入时间等其他借阅信息,然后按【保存文件】按钮,再按【借阅登记】按钮将此条信息保存到《档案借阅》表内。版主刚才为我作的【借阅登记】按钮公式我试过了,只要点击【借阅登记】按钮,以前作过借阅登记的信息将重复登记在《档案借阅》表内,点击【借阅登记】按钮一次,就在《借阅登记》表内重复登记一次。如何处理?谢版主了。
--  作者:wjq1072
--  发布时间:2011/9/21 15:42:00
--  
egd文件下载
--  作者:zzyuan8989
--  发布时间:2011/9/21 19:09:00
--  
谢谢老师,太好了。另外,老师,前几天您教我的将EXCEL文件导入时,我不小心打开了《档案借阅》表,但是也能将EXCEL文件导入,导入路径是:ImportDBFile("d:\\档案明细表.XLS",6,"档案明细表") And MsgBox("已完成导入!",1)
多谢了。
[UploadFile=1B51B51B01B81C31_1316603378.zip]

-=-=-=- 以下内容由 zzyuan89892011年09月21日 07:13pm 时添加 -=-=-=-
就是说不但能导入到《档案明细表》中,也能导入到《档案借阅》和《移出档案明细表》中。正常不应当啊。
--  作者:wjq1072
--  发布时间:2011/9/21 19:22:00
--  
不知道你的公式在哪里啊?
--  作者:zzyuan8989
--  发布时间:2011/9/21 20:11:00
--  
老师:公式在工具栏中的导入按钮。egd文件下载

-=-=-=- 以下内容由 zzyuan89892011年09月21日 08:14pm 时添加 -=-=-=-
或文件--文件设置---菜单方案

-=-=-=- 以下内容由 zzyuan89892011年09月21日 08:23pm 时添加 -=-=-=-
版主您辛苦了。拜谢了。
--  作者:wjq1072
--  发布时间:2011/9/21 21:31:00
--  
egd文件下载