“沒有腳的鳥”——API自定義路徑導入導出數(shù)據(jù)

roych

       “我聽別人說這世界上有一種鳥是沒有腳的，它只能夠一直地飛呀飛呀， 飛累了就在風里面睡覺，這種鳥一輩子只能下地一次，那一次就是它死亡的時候。”
    記得第一次看《阿飛正傳》時，就被這一句臺詞所打動了。也許骨子里一直流淌著這種不安分的血液吧，當時很羨慕這種沒有腳的鳥，以為這就是我想要的自由。然而多年以后的今天才知道，那只鳥的自由翱翔，恰恰返照出它的無奈。在那些風雨交加的日子里，揀盡寒枝不能歇的它，仿若無根的浮萍，又拿什么來談自由呢？世上終究沒有絕對的自由，所有自由都是要付出代價的，不是么？
    在哥哥逝世九周年之際，提及這部電影，也算是一種緬懷吧。

    而說到自由，則是因為最近一個同事問及如何自定義路徑導出數(shù)據(jù)的問題。開始是用FileDialog對象去寫，不過因為Office庫的版本問題，效果并不太好，后來便考慮用API函數(shù)來處理。
    通過獲取路徑進行導入是很簡單的，聲明API函數(shù)GetOpenFileNameA后，再處理好打開文件夾對話框界面即可。而對于導出，則相對麻煩些，因為往往要先賦以一個默認值，否則很容易出錯。而我所做的，也就是把這兩者合二為一而已。

    其它說明：
    1、為了簡化函數(shù)，模塊僅僅支持Excel文件(*.xls)。如需要多種選擇，則需要進一步改進里面的strFilter屬性。
    2、大家在測試時應該先導出數(shù)據(jù)，再以該文件為數(shù)據(jù)源進行導入，這是因為導入和導出字段結構相同的緣故。
******************************************************************************************
2015-5-15更新：
增加2007格式的導入導出。
注：導入是沒問題的。不過，由于Office 2007（當然包括Access 2007了）采用新的Office Open XML 文件格式，如果導出為2003格式，打開時出現(xiàn)提示是正常的，但不會影響數(shù)據(jù)的顯示。如果試圖避免這個問題，可能需要在用戶端安裝一些插件。http://www.microsoft.com/china/msdn/library/office/office/OfficeOpenXMLFormats.mspx?mfr=true

  
  

ycxchen

學習！

yanwei82123300

謝謝分享{:soso_e179:}

xxzx5

{:soso_e179:}

十三

請問一下，如果我臨時取消導入或?qū)С?會彈出一個錯誤對話框，如何解決呀？另如果想導入2007以上版本的excel 呢？

roych

十三 發(fā)表于 2015-5-14 17:27
請問一下，如果我臨時取消導入或?qū)С?會彈出一個錯誤對話框，如何解決呀？另如果想導入2007以上版本的excel ...

在2007版上已增加錯誤處理，但用2007版導出2003版excel文件時，會提示文件擴展名不一致。

jsjtyjp_001

學習