שאלת תכנות lite - מישהו מכיר קצת VBScript?

כתבתי סקריפט קטן בVBScript שכל תפקידו הוא לאתר מחרוזת מסוימת בקובץ TEXT גדול ולהחליף אותה במחרוזת אחרת, אותה אני מזין דרך שורת הפקודה.

 

מכיוון שאני חורני לחלוטין, הסקריפט שכתבתי פותח חלון של Notepad, ובעזרת הפונקציה Sendkeys וקצת השהיות אני מבצע Replace בתפריטים ועושה לקובץ save as. כן, אני לא יודע לתכנת בשיט

האם יש פונקציה/דרך/קומבינה קצת פחות חורנית מזה? זה עובד, אבל מדובר בקומבינה עצבנית לחלוטין.

 

אני יודע שאפשר לתכנת משהו בשלוש וחצי דקות בכל שפת תכנות נורמלית, אבל מה שזמין לי במחשב ההוא בעבודה זה רק הVBScript וכמובן קבצי Batch.

 

כל עזרה תתקבל בברכה.

פרסים יקרי ערך יוענקו לפותרים נכונה.

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objTextFile = objFSO.OpenTextFile("c:\myfile.txt", ForReading)

strText = objTextFile.ReadAll

Replace(strText ,"bobo","baba")

 

נשאר רק לכתוב את הקובץ בסוף, לא זוכר איך, חפש במתודות הזמינות של

Scripting.FileSystemObject

 

איך עושים write

ואז יהיה לך משהו כמו

objFSO.write(strText)

ObjFSO.close()

כמעט הבנתי מה שכתבת שם.

 

אני אנסה כשאהיה מול המחשב המדובר, תודה!