中国少妇初尝黑人巨高清,97亚洲熟妇自偷自拍另类图片 ,日本午夜福利在线观看

主頁 > 知識庫 > 腳本編程3 關(guān)于文件的讀寫

腳本編程3 關(guān)于文件的讀寫

使用vbscript來讀寫文件，十分的方便，廢話少說，切入正題。

1、打開文件

使用opentextfile方法

set fs =createobject(“scripting.filesystemobject”)

set ts=fs.opentextfile(“c:\1.txt”,1,true)

注意這里需要填入文件的完整路徑，后面一個參數(shù)為訪問模式

1為forreading

2為forwriting

8為appending

第三個參數(shù)指定如果指定文件不存在，是否創(chuàng)建。

2、讀取文件

讀取文件的方法有三個

read(x)讀取x個字符

readline讀取一行

readall全部讀取

例如：

set fs =createobject(“scripting.filesystemobject”)

set ts=fs.opentextfile(“c:\1.txt”,1,true)

value=ts.read(20)

line=ts.readline

contents=ts.readall

這里還要介紹幾個指針變量：

textstream對象的atendofstream屬性。當處于文件結(jié)尾的時候這個屬性返回true.我們可以用循環(huán)檢測又沒有到達文件末尾。例如：

set fs =createobject(“scripting.filesystemobject”)

set f=fs.getfile(“c:\1.txt”,1,false)

set ts=f.openastextstream(1,0)

do while ts.atendofstream>true

f.read(1)

loop

還有一個屬性，atendofline,如果已經(jīng)到了行末尾，這個屬性返回true.

Textstream對象還有兩個有用的屬性，column和line.

在打開一個文件后，行和列指針都被設(shè)置為1。

看一個綜合的例子吧：

*******************************read.vbs******************************

set fs =createobject(“scripting.filesystemobject”)

set f=fs.opentextfile(“c:\1.txt”,1,true)

do while f.atendofstream>true

data=””

for a=1 to 5

if f.atendofstream>true then

data=data+f.readline

end if

next

dataset=dataset+1

wscript.echo “data set”?。ataset  ”:”  data

loop

最后說一下在文件中跳行

skip(x)  跳過x個字符

skipline  跳過一行

用法也很簡單和前面一樣，就不說了。

3、寫文件

可以用forwriting和forappending方式來寫

寫有3各方法：

write(x)

writeline

writeblanklines(n) 寫入n個空行

來看一個例子：

*****************************************************************

data=”hello, I like script programing”

set fs =createobject(“scripting.filesystemobject”)

if (fs.fileexists(“c:\2.txt”)) then

set f =fs.opentextfile(“c:\2.txt”,8)

f.write data

f.writeline data

f.close

else

set f=fs.opentextfile(“c:\2.txt”,2, true)

f.writeblanklines 2

f.write data

f.close

end if

注意寫完文件以后一定要關(guān)閉?。。。。。?！  還有就是，如果要讀文件又要寫文件，讀完之后一定也要記得關(guān)閉，這樣才能以寫的方式打開。

好了關(guān)于文件都說完了，實際運用中還有可能牽扯到關(guān)于字符串的操作。

后面的1章里面，我打算寫一點驅(qū)動器和注冊表的內(nèi)容，腳本編程內(nèi)容也很豐富，我也只講關(guān)于黑客方面的。今天好累啊，還有就是請大家不要在論壇灌水了，我每天都刪貼，這樣也不好，論壇是大家的，我每天寫一些原創(chuàng)的東西也就是為了讓我們的論壇和別的論壇有些不同，我一個人力量有限，還要靠大家的力量，我打算在論壇上找?guī)讉€人一論壇的名義一起編個軟件，這樣我們的論壇也算有點名聲。

很晚了，休息了

標簽：鶴壁達州丹東內(nèi)蒙古張掖資質(zhì)掛靠柳州南京

巨人網(wǎng)絡(luò)通訊聲明：本文標題《腳本編程3 關(guān)于文件的讀寫》，本文關(guān)鍵詞腳本,編程,關(guān)于,文件,的,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。

腳本編程3 關(guān)于文件的讀寫

四合一精品企业网站建设

¥888元限时抢购

立即咨询快速购买

企业400电话

合计11份范本：公司章程+合伙协议+出资协议+合作协议+股权转让协议+增资扩股协议+股权激励+股东会决议+董事会决议