本篇內(nèi)容主要講解“VBS下AtEndOfStream屬性的用法”,感興趣的朋友不妨來看看。本文介紹的方法操作簡單快捷,實(shí)用性強(qiáng)。下面就讓小編來帶大家學(xué)習(xí)“VBS下AtEndOfStream屬性的用法”吧!
讓客戶滿意是我們工作的目標(biāo),不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶,將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴,公司提供的服務(wù)項(xiàng)目有:域名與空間、虛擬主機(jī)、營銷軟件、網(wǎng)站建設(shè)、下城網(wǎng)站維護(hù)、網(wǎng)站推廣。如果文件指針位于TextStream 文件末,則返回True;否則如果不為只讀則返回False。
object.AtEndOfStream
object 應(yīng)為 TextStream 對象的名稱。
AtEndOfStream 屬性僅應(yīng)用于以只讀方式打開的TextStream 文件,否則會出現(xiàn)錯誤。
下列代碼舉例說明如何使用AtEndOfStream 屬性:
Function ReadEntireFile(filespec) Const ForReading = 1 Dim fso, theFile, retstring Set fso = CreateObject("Scripting.FileSystemObject") Set theFile = fso.OpenTextFile(filespec, ForReading, False) Do While theFile.AtEndOfStream <> True retstring = theFile.ReadLine Loop theFile.Close ReadEntireFile = retstringEnd Function
到此,相信大家對“VBS下AtEndOfStream屬性的用法”有了更深的了解,不妨來實(shí)際操作一番吧!這里是創(chuàng)新互聯(lián)建站,更多相關(guān)內(nèi)容可以進(jìn)入相關(guān)頻道進(jìn)行查詢,關(guān)注我們,繼續(xù)學(xué)習(xí)!
網(wǎng)頁題目:VBS下AtEndOfStream屬性的用法-創(chuàng)新互聯(lián)
網(wǎng)頁URL:http://www.rwnh.cn/article22/csicjc.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供全網(wǎng)營銷推廣、App開發(fā)、網(wǎng)站排名、ChatGPT、App設(shè)計(jì)、定制網(wǎng)站
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)
猜你還喜歡下面的內(nèi)容