用VBScript寫合并文本文件的腳本
合并文本的腳本可以這么寫:
Sub AppendTextFile(filename)
Set objTextFile = objFSO.OpenTextFile(filename, ForReading, true, -2)
Do Until objTextFile.AtEndOfStream
objOutFile.WriteLine(objTextFile.Readline)
Loop
End Sub
可是如果所讀取的文件是UTF-8格式的,那么文件開頭的三個字節(jié)的標(biāo)識符會被腳本認為是數(shù)據(jù),這樣這個標(biāo)識符就變成了合并后文件里的亂碼。
FSO是提供了打開Unicode文件的參數(shù)的,可惜這里并不生效。
TristateUseDefault |
-2 |
Opens the file using the system default. |
TristateTrue |
-1 |
Opens the file as Unicode. |
TristateFalse |
0 |
Opens the file as ASCII. |
另外一個想法是讀入文件的時候,自行判斷文件開始三個字節(jié)是否標(biāo)識符,這也被判斷是不可行的方法,因為FSO提供的Read是按字符進行讀取,這樣,在有中文的環(huán)境里,我們不可能正好讀出這三個字節(jié)。
類似的問題在IIS6里面被微軟確認,好像也有一個對應(yīng)的補丁出來,但是對于批處理文件的情況,似乎還是沒有修改過來。
最后,MSDN幫了很大的忙,但是它的地址很不好找,記錄一下:
http://msdn.microsoft.com/en-us/library/ms950396.aspx
上一篇:VBA 編程基礎(chǔ)
欄 目:vb
下一篇:VBS讀網(wǎng)頁的代碼
本文標(biāo)題:用VBScript寫合并文本文件的腳本
本文地址:http://mengdiqiu.com.cn/a1/vb/7585.html
您可能感興趣的文章
- 01-10VBS中的正則表達式的用法大全 <font color=red>原創(chuàng)&
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10VBScript教程 第十一課深入VBScript
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript語法速查及實例說明
- 01-10VBS中Select CASE的其它用法
- 01-10VBScript教程 第七課使用條件語句
- 01-10vbscript 可以按引用傳遞參數(shù)嗎?
- 01-10VBScript教程 第二課在HTML頁面中添加VBscript代碼
- 01-10VBScript教程 第十四課在VBScript中使用對象


閱讀排行
本欄相關(guān)
- 01-10下載文件到本地運行的vbs
- 01-10飄葉千夫指源代碼,又稱qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個高效的軟件
- 01-10VBS中的正則表達式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語法速查及實例說明
隨機閱讀
- 01-10delphi制作wav文件的方法
- 08-05織夢dedecms什么時候用欄目交叉功能?
- 01-10使用C語言求解撲克牌的順子及n個骰子
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置
- 08-05dedecms(織夢)副欄目數(shù)量限制代碼修改
- 01-11ajax實現(xiàn)頁面的局部加載
- 08-05DEDE織夢data目錄下的sessions文件夾有什
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文
- 01-10C#中split用法實例總結(jié)
- 04-02jquery與jsp,用jquery