簡單的VB小指令碼之 檔案處理指令碼

2021-06-11 23:53:59 字數 1508 閱讀 4015

昨晚客戶發來郵件說,要求寫個vb的小腳本來替換檔案中指定的字串,當時第一反應是,你直接拿個文字編輯器用查詢/替換功能不就搞定了嘛,不過立刻就又反應過來,客戶就是上帝。好吧,上帝要求我寫個vb的指令碼,我就滿足上帝的需要,由於之前沒有接觸過vb指令碼,所以就現學現用,磕磕絆絆完成了以下這麼乙個樣例,寫的不好,有不妥之處,還望各位大神不吝賜教,小的一定虛心求教,感激涕零。

inputs=inputbox("please enter the parameters,split them with '_' param1:filename param2:oldstr param3:newstr")

params=split(inputs,"_")

currentpath=createobject("scripting.filesystemobject").getfolder(".").path

set objfso = createobject("scripting.filesystemobject")

if objfso.fileexists(currentpath & "\" & params(0)) then

set objfile=objfso.opentextfile(currentpath & "\" & params(0))

str=objfile.readall

objfile.close

oldstr=params(1)

newstr=params(2)

if oldstr <> "" then

str=replace(str,oldstr,newstr)

tmparray=split(params(0),".")

set newfile=objfso.createtextfile(currentpath & "\" & tmparray(0) & "_new" & ".txt")

newfile.write(str)

newfile.close

end if

else

wscript.echo "file does not exist."

end if

簡單的介紹下使用方式,拷貝原始碼,貼上到檔案中,儲存為.vbs格式檔案,雙擊即可執行。將要處理的檔案放在與指令碼同級目錄下,執行指令碼之後,需要輸入三個引數,引數一是檔名,引數二是要查詢的字串,引數三是要替換成的字串,引數之間以"_"下劃線來進行分割,檔名不為空,要查詢的字串和替換成的字串可以為空,如果為空,則會將原檔案中的內容輸出到」原檔名_new.格式"檔案中。

最後簡單的總結下我剛接觸vb幾個小時的一些比較特殊的地方:

1,vb是case insensitive的,也就是大小寫不敏感

2,vb指令碼中,獲取array陣列的值的方式為tmparray(0),注意,是小括號,不是之前熟悉的中括號,我在這上面卡了挺長時間

3,vb指令碼中,&符號前後要有空格分開,其他的符號,例如,不等於號<>前後也需要有空格

很多時候我也會覺得自己現在涉及到的東西太多太雜,不過我覺得還是側重點的問題吧,多學習多總結。

python檔案命名小指令碼

寫個檔案命名的python程式,復 yu 習一下python。程式寫得應該不是很好。import os import shutil from pil import image 輸入為路徑 命名方式為統一位數數字遞增 單一檔案格式查詢 輸出為 result.txt 檔名,是否為完整 full 完整庫 ...

有用的小指令碼

輸入時,禁用空格鍵 function checkkeydown 對於密碼輸入框,禁用ctrl c 請按下ctrl c或者ctrl v 或者,寫為的時候,它會直接把ctrl c 和滑鼠右鍵中的複製給禁用了。很給力 var datetime new date var endtime parseint d...

VB指令碼 BAT指令碼呼叫VB指令碼的方法

毫無疑問地,是懶惰促進或引領著人類科技的發展。工作中使用一些小工具可以大幅提高工作效率,釋放體力勞動,減少手工操作與守候時間,何樂而不為呢?在數通平台軟體的效能或功能穩定性測試過程中,經常需要用一台除錯機 一般是作業系統為 windows 的計算機 通過 securecrt 等遠端登入軟體,連線一台...