Vbscript 指令碼程式設計關於檔案的讀寫

2021-09-05 05:45:21 字數 3110 閱讀 7597

vbscript

指令碼程式設計

關於檔案

<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" />

使用vbscript

檔案,十分的方便,廢話少說,切入正題。

1、開啟檔案使用

opentextfile方法

set fs =createobject(「scripting.filesystemobject」)

set ts=fs.opentextfile(「c:\1.txt」,1,true)

注意這裡需要填入檔案的完整路徑,後面乙個引數為訪問模式 1

為forreading 2

為forwriting 8

為a<?xml:namespace prefix = st1 ns = "tencent" />

ppending

第三個引數指定如果指定檔案不存在,是否建立。

2、檔案

檔案的方法有三個

read(x)

x個字元

read

line

取一行

readall

全部

例如:set fs =createobject(「scripting.filesystemobject」)

set ts=fs.opentextfile(「c:\1.txt」,1,true)

value=ts.read(20)

line=ts.read

line

contents=ts.re

adall

這裡還要介紹幾個指標變數:

textstream

物件的atendofstream

屬性。當處於檔案結尾的時候這個屬性返回

true.

我們可以

用迴圈檢測又沒有到達檔案末尾。例如:

set fs =createobject(「scripting.filesystemobject」)

set f=fs.getfile(「c:\1.txt」,1,false)

set ts=f.openastextstream(1,0)

do w

hile ts.atendofstream<>true

f.read(1)

loop

還有乙個屬性,

atendof

line,

如果已經到了行末尾,這個屬性返回

true.

textstream

物件還有兩個有用的屬性,

column和li

ne.

在開啟乙個檔案後,行和列指標都被設定為1。

看乙個綜合的例子吧:

******

****

****

****

****

****

****

*read.vbs

******

****

****

****

****

****

****

set fs =createobject(「scripting.filesystemobject」)

set f=fs.opentextfile(「c:\1.txt」,1,true)

do w

hile f.atendofstream<>true

data=」」

for a=1 to 5

iff.atendofstream<>true then

data=data+f.read

line

end if

next

dataset=dataset+1

wscript.

echo

「data set」

&dataset & 」:」 & data

loop

最後說一下在檔案中跳行

skip(x)  跳過x

個字元

skip

line 

跳過一行

用法也很簡單

和前面一樣,就不說了。

3、檔案可以

用forwriting

和fora

ppending

方式來

3各方法:

write(x)

write

line

writeblank

lines(n)

n個空行

來看乙個例子:

******

****

****

****

****

****

****

****

****

****

****

****

****

****

*******

data=」hello, i

like script p

rograming」

set fs =createobject(「scripting.filesystemobject」)

if(fs.fileexists(「c:\2.txt」)) then

set f =fs.opentextfile(「c:\2.txt」,8)

f.write data

f.write

line data

f.close

else

set f=fs.opentextfile(「c:\2.txt」,2, true)

f.writeblank

lines 2

f.write data

f.close

end if

vbscript指令碼1 讀取xml格式的配置檔案

最近一專案中,vbs指令碼需要讀取配置檔案,本來考慮用ini來做配置檔案,但是vbs裡沒有現成讀寫ini檔案的支援,於是考慮用xml來做配置檔案,使用xmldom來讀取。寫成個class使用起來應該方便一些。貼來備忘一下。class clsgetprofile private rootdoc xml...

重新梳理關於shell指令碼程式設計

2016年11月13日 星期一 晴 今天梳理一下關於shell指令碼的程式設計。echo命令用於在螢幕上顯示訊息。shell中有一些特殊的符號,除了 bin bash中的 外,其餘作注釋符,變數符,a表示變數a的值,單引號 被引起的字元全部做普通字元,雙引號 內除了 保留特殊功能,其餘作普通字元。倒...

用vbscript實現將指令碼的輸出複製到剪貼簿

問 嗨,scripting guy!有辦法將指令碼輸出複製到剪貼簿嗎?zw,marseilles,france 答 您好,zw.如果您不介意用一些瘋狂的解決方法,那麼實際上將指令碼輸出複製到剪貼簿相當容易。首先,您需要構造乙個字串,其中包含想要的輸出。然後,建立 internet explorer ...