office交流網--QQ交流群號

Access培訓群:792054000         Excel免費交流群群:686050929          Outlook交流群:221378704    

Word交流群:218156588             PPT交流群:324131555

兩個未公開的ACCESS方法的使用技巧及示例源碼

2017-08-18 11:09:00
zstmtony
原創
1249

很多年以前寫的貼子,后來自己的找不到了。而網絡上則流傳開了。再摘錄一下。

應黃海之邀 (Access交流網總版主),突然要寫點自己的東西,一下子仿佛不知道寫些什么了,研究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:
    中英轉換,雖然還需要進行少量手工轉換,但已經節省了不少時間,但如何使用正式表達式來正確區別哪些是標題、提示文字、消息框還需要一些技巧。
用途7:改變控件的默認屬性
    除了我們在設計狀態修改控件的默認屬性之外,使用修改文本文件的內容也可達到修改控件默認屬性的效果,當窗體或報表導出到文本文件之后,所有的窗體、控件屬件以及默認控件屬性都在文本文件中體現出來,通過修改這個文本文件里有關默認屬性的設置即可達到目的。
    什么是默認屬性?舉個例子,你從國外下載一個程序,為什么往窗體里面添加控件,控件字體總是Serif,而在簡體中文環境下新建的窗體控件,字體都是"宋體",在繁體中文環境下新建的窗體控件,字體都是"新細明體",就是因為這個控件的默認屬性導致的
用途8:
    實現自動創建窗體模板的效果,將做好的具備基本功能的窗體導出到文本文件保存起來,到需要使用的時間,直接導入回來馬上就可能產生一個已具備常用功能的窗體,不需要從頭來過,再做得自動化一點,做一個豐富的窗體功能代碼庫,可讓用戶選擇各種不同的功能,然后從這些代碼庫里選擇想要的代碼按照窗體文本文件的格式創建一個文本文件,再由這個文本文件自動組合出一個完善的窗體,不需要用戶去編程,他只要選擇字段,選擇窗體功能、選擇樣式、選擇模板就可實現各種錄入窗體、查詢窗體、分析窗體、報表統計等等,寫程序就變成了組裝程序。到時大家沒事干了,就開發各個專用組件吧。注意,在文本文件中復制功能和代碼,在自動編程化方面,相對窗體里復制控件和代碼,具有更大的彈性和可塑性。
用途9:
    如果窗體或報表里有圖片或OLE對象,在導出的文本文件里會包含它們的二進制文件,使用正則表達式或其它方法提取這部分內容再將其還原到相應的圖片文件中,即可實現將窗體和報表的圖像保存取文件(ACCESS不支持直接將圖像控件的圖片保存到文件)
用途10:
    實現將ACCESS窗體和報表轉換到VB程序中,現在有一些專業程序提供這種功能,我想基本思路應該是出于此,將窗體和報表導出到文件文件,然后分析它與VB窗體文件之間的分別,然后修改文本文件以適應VB窗體的需要即可實現,只是我沒有足夠的時間來做這些了:),當然如果你舉一反三,你也可能做一個工具,實現將VB的窗體反向轉換到ACCESS程序中,畢竟VB的資源和豐富的技巧對ACCESS來講有很大的利用價值
用途11:
    一次性修改ACCESS對象里面所用的字體名稱 字體大小或其它屬性,連窗體的數據表的字體及其它屬性也可更改到。
用途12:
    查看窗體和控件的GUID ,并用來做相應的用途
用途13:
    修改窗體和報表有關打印機的信息,為什么窗體的打印設置無法保存,為什么打開報表總會提示原來默認打印機不存在,是否使用當前打印機等等,這些信息其實都保存在窗體和報表里,打開文本文件,什么都清楚了,通過這個功能可實現不少強大的功能,大家發揮想像吧。
用途14:
    如果要獲取窗體和控件到底有些什么屬性,通過文本文件可知道許多
用途15:
    創建一些新的控件,如組合框,列表框等等,都可直接在里面復制代碼來創建,而更有用的是,有些帶注冊信息(license)的控件,如果原來的窗體可用,但你沒有LICENSE,你復制窗體會出現錯誤,說你沒有版權,但如果你將窗體導出到文本文件,再導回一個新的窗體,ACCESS就給你蒙過去了,不過,這個方法可別說是我教的:),雖然我試過很多次才試出來的,不過我自己是堅決不用的:),大家都知道啦,我一般在公開場合,都是用正版的:)
用途16:
    可以使用上述的方法對整個ACCESS的所有對象導出到文件進行備份保存,然后想還原哪個就還原哪個,雖然這種方法有其優點,不過,把整個MDB備份可能更實際些:)
用途17:
    可以用于版本控制,不知大家有否在ACCESS中使用過SourceSafe,我研究不短時間,發現,它的簽入簽出就是使用我上述說的方法,在SourceSafe保存的是每個對象的文本格式。如果你有興趣,可以寫一個類似的版本控制工具,我預計2008年會開始寫它,如果你在那年之前已經寫出來了,那最好寄份源碼給我,否則我控告你竊取我的點子:)
用途18:
    除了窗體和報表外,還有其它幾乎大部分對象,如查詢、視圖、存儲過程、關系、宏、模塊等等都可導出,你可用來做各種各樣的用途,這里就不詳述了,如果你有獨到發現,請一定告訴我哦。
    不過請注意,表是不可導出的:)
    另外得告訴大家,在2002(XP)版本開始,微軟開始對CRC校驗進行檢查了,所以導回對象時有時可能會有一些問題。可能微軟已經知道有人在濫用這個功能了:)
    匆促而就,語句不通或錯字處,還請放過一馬:)




請看:
http://www.guizmj.live/Article_Show.asp?ArticleID=276  (已失效)

網友整理成示例
http://www.guizmj.live/thread-52635-1-1.html
分享
北京十一选五基本走势