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

2016-01-29 14:54 18 1 收藏

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

【 tulaoshi.com - Access数据库 】

在ACCESS中APPLICATION对象有两个未公开的方法,其中一个是SaveAsText, 另一个是LoadFromText.我记得是刚学ACCESS不久,当时在研究FMS一个分析工具时,跟踪发现它总会产生一些临时文件,对这些临时文件分析,发现它与VB里的窗体文件差不多的格式,所以估计微软可以将ACCESS的窗体转换为文本格式,并提供一种逆相转换的方法。所以发现了深厚的兴趣,后来就找到这两个方法。
    虽然微软还有其它一些比较好用的未公开的属性,但我在这两个方法上花的时间还是最多的,因为它的确有使用价值,所以说说自己多年来的使用心得。
    这两个方法在以后的ACCESS版本中并不一定支持,所以我并不建议大家使用,但因为有些功能如果使用它来实现,可以节省比较多的时间,所以,在某些情况下,我还是会使用它,至少现有的ACCESS版本都支持这个方法。如果同样的功能你可以通过ACCESS正常的方法来实现,我则建议你使用微软公开的方法。切记!
    用途1:

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

     使用
       application.saveastext acForm,"我的窗体","c:test.txt"
     将整个窗体导出到一个文本文件,将其打包发送给朋友,让朋友再使用      
       application.loadfromtext acForm,"我的窗体","c:test.txt"
     再导回去。你可以压缩打包传送。

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com)

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

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

来源:http://www.tulaoshi.com/n/20160129/1494643.html

延伸阅读
在VB6中,函数是能够返回数组对象的。这种情况下,我们不能象返回对象或者数值的其他函数一样使用函数名当做局部变量来存储中间结果,因此不得不生成一个临时局部数组,函数退出前再分配这个数组给函数名,就象下面的代码一样: '返回一个数组,其中含有N个随即元素 '并且将平均值保存在AVG中 FunctionGetRandomArray(ByValnAsLong,av...
标签: Web开发
说明: 技巧一: 当表单提交或重置时向客户端进行确认操作 技巧二: 列出表单域中所有元素及其重要属性, 就是 input, select 等的 name, value 等. 总结: 用这两个技巧可以写一个通用的客户端表单验证函数, 至于怎么写, 动动脑筋就行了^^. 但是鄙人还是觉得, 不能过于依赖客户端的验证机制, 现在的人聪明得...
标签: word
去除Word水印的两个实用方法   你在使用word办公软件时,是否也碰到过这样的情况。那就是,当你从网上下载了一些word资料文档的时候,有些里面可能会有水印的存在。那么,我们该如何去除这些word水印呢?其实,软件直销网认为,去掉word水印的方法有许多,今天为大家介绍两个简单易行的方法,供大家参考(以word2003为例): 方法一...
对iPhone开关机的两个技巧   说起iPhone开机关机的技巧,相信大多数人都会觉得这个太小儿科了,直接按电源键就可以解决它。可是,如果iPhone电源键坏了又碰上有重要的信息需要接收怎么办了,来看看无需电源开关机的几个技巧吧。 一、如何开机? 首先,给iPhone插上数据线,然后长按home键不要松,再将数据线的另外一头...
标签: ASP
  一、 <% Response.Buffer = True % <% ' Setup the variables necessary to accomplish the task Dim TimerStart, TimerEnd, TimerNow, TimerWait ' How many seconds do you want them to wait... TimerWait = 5 ' Setup and start the timers TimerNow = Timer TimerStart = TimerNow TimerEnd = TimerStart + TimerWait ' Ke...

经验教程

459

收藏

20
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部