[原创]Access导入和导出工具

taoether

Access导入和导出工具

========================

说明：

    此示例数据库中包含两个公共窗体：[Pub_Transfer]和[Pub_TransForm]，可以对数据库中的数据和窗体导入和导出，大家觉得有用的话可以回到自己的数据库中。

    关于窗体[Pub_Transfer]，作者不详，忘记是从什么地方得来的了。此窗体可以对导入，链接和导出数据进行管理，很是方便。

    关于窗体[Pub_TransForm]，是我根据文章＜两个未公开的ACCESS方法的使用技巧＞（作者：tmtony　转贴自：Access中国）制作，可以将窗体导出为文本文件，同时也可以将文本文件导入为窗体，用途不是很广泛，但有时确有很好的用处，比如大家以后都有了这个窗体，将窗体转化为文本文件，交流的时候就方便的多了。关于用处，原文中有详细的说明，大家可以看一下，原文附后。

    本人水平有限，让大家见笑了!

注意事项:

    1，导出窗体时，必须输入完整目录，文件名！

    2，窗体导出的格式为文本文件，不输入文件扩展名也可以，但无法查看代码，但不影响导回到数据库中。

    3，导入窗体时，必须输入完整目录，文件如有扩展名，必须输入扩展名，否则无法导入！

    4，此窗体的正确运行需要模块[dlgComDialog]的支持，否则无法浏览文件夹。



Author:陶永利

EntryDate:2005-4-5

Email:tao_yl@yahoo.com.cn，taoether@yahoo.com.cn

NetHD:tao168.ys168.com

===

两个未公开的ACCESS方法的使用技巧

---

［ 作者：tmtony    转贴自：Access中国    点击数：9597    更新时间：2003-12-28    文章录入：tmtony ］

---

应黄海之邀（[url=http://www.accessqq.com/]http://www.accessqq.com[/url]），突然要写点自己的东西，一下子仿佛不知道写些什么了，研究ACCESS这么多年，感觉都是在做企业应用，并没有什么高深的技巧，也没有属于自己的技巧，只好绞尽脑汁，榨点东西出来，希望能对得起黄海和大家：）

在ACCESS中APPLICATION对象有两个未公开的方法，其中一个是SaveAsText, 另一个是LoadFromText.我记得是刚学ACCESS不久，当时在研究FMS一个分析工具时，跟踪发现它总会产生一些临时文件，对这些临时文件分析，发现它与VB里的窗体文件差不多的格式，所以估计微软可以将ACCESS的窗体转换为文本格式，并提供一种逆相转换的方法。所以发现了深厚的兴趣，后来就找到这两个方法。

虽然微软还有其它一些比较好用的未公开的属性，但我在这两个方法上花的时间还是最多的，因为它的确有使用价值，所以说说自己多年来的使用心得。

这两个方法在以后的ACCESS版本中并不一定支持，所以我并不建议大家使用，但因为有些功能如果使用它来实现，可以节省比较多的时间，所以，在某些情况下，我还是会使用它，至少现有的ACCESS版本都支持这个方法。如果同样的功能你可以通过ACCESS正常的方法来实现，我则建议你使用微软公开的方法。切记！

用途1：

使用

application.saveastext acForm,"我的窗体","c:\test.txt"

将整个窗体导出到一个文本文件，将其打包发送给朋友，让朋友再使用      

application.loadfromtext acForm,"我的窗体","c:\test.txt"

再导回去。你可以压缩打包传送。

用途2：

可以将窗体保存到文本文件，然后把文本文件存储到OLE字段里，这样整个窗体的界面与代码都可保存到ACCESS数据表里，这个方法对编写 代码库管理器 非常有用。在使用时，还可即时将文本文件还原到一个窗体，让使用者即时预览到这个技巧产生的效果

用途3：

将窗体保存到一个文件文件，使用正则表达式对代码进行分析，可以分析语法，代码结构、语法错误、字数统计等等，你可参考一下FMS的一个ACCESS分析工具，它有的功能，你花个半年，做出来应该也没有大问题啦。记得让我试用一下源码哦：）

用途4：

真正的全局替换，一般我们需要全局替换窗体里一个属性的名称或内容，需要逐个逐个修改，而无法实现像代码中的全局替换，现在将窗体导出到文本文件，在文本文件里进行全局替换，完成后再导回窗体。

用途5：

繁简转换，中英转换，一般对控件标题、提示文字、默认值等进行文字上繁简转换后并不能真正实现繁简转换，在转换后相应的环境中打开还会出现ACTIVEX控件找不到或者OLE错误，将窗体或其它对象转换为文本文件后再进行繁简转换，然后再转换相应的字符集、字体名称、节的繁简对应名称、CRC校验码等之后，再导回ACCESS相应对象，就可完成整个ACCESS程序的转换，相应的程序效果可参见我做的繁简转换通用程序，记住简体一般是134 繁体是136 英文你打开就知了。我奉劝，如果你想做同样的功能，那你最好就别做了，用我的就得了，免得断我财路，我提成20%给你就得了，等两年后积到100元我再一次汇给你：）

用途6：

中英转换，虽然还需要进行少量手工转换，但已经节省了不少时间，但如何使用正式表达式来正确区别哪些是标题、提示文字、消息框还需要

游客，如果您要查看本帖隐藏内容请回复

爱情插班生

顶！！[em01]

mhh

1、请教在导出为Excel时，如果有同名文件会提示是否覆盖，如何使这个提示不出现而直接覆盖它？2、在access中可以用宏或其它办法删除一个Excel文件吗？这两个如何做？？先谢了！

lunar2006

支持!

stevenzibo

Thanks a lto

tsilon

DaDing

cte458

支持!

lhsh

支持

ckyun

支持

绿色爱好者

感谢提供源代码和详细解释,同时敬佩斑竹的人品.