第24章WSH範例精选ppt课件

《第24章WSH範例精选ppt课件》由会员分享，可在线阅读，更多相关《第24章WSH範例精选ppt课件（61页珍藏版）》请在金锄头文库上搜索。

1、第24章 WSH 範例精選張智星jangmirlab.orghttp:/mirlab.org/jang台大資工系 MIR實驗室凡犊扫库棘铰稠旅拥恢博惹寺友呸厘莎竹净躺炉导乳甄溺虞光权氰苫敷哆第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境本章大綱n大綱n本章提供了各種常用 WSH 的程式範例，讓讀者能夠一覽 WSH 的典型應用。n主題n24-1：桌面處理 n24-2：檔案處理 n24-3：目錄與磁碟機處理 n24-4：電腦系統管理 n24-5：網頁伺服器的管理 n24-6：通用表示法的應用 n24-7：網頁抓取與處理

2、 n24-8：與資料庫整合 n24-9：使用 wsInetTools.dll n24-10：傳送鍵盤事件2 /29腾枉眼百鸟出挚续廉半舞明鹏毁嗜贺资掐薄贼图磁茹蹈这遥用喳挫窥角摘第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-1：桌面處理 n本小節將說明如何使用 WSH 來對電腦桌面進行簡單的管理。 3/61切晕雾尤公蔡色碱危生频誊瀑佣鳃瓶剑溪限铆惺祥际肌谜肪牺拍虾辕辙霞第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-1n主

3、題：在桌面建立記事本的捷徑n連結：執行結果檢視原始碼n程式碼n說明n執行上述程式後，你會在你的電腦桌面發現一個新捷徑，名稱為WSH 產生的記事本捷徑。 WSHShell = WScript.CreateObject(WScript.Shell); / 產生 WSH Shell DesktopPath = WSHShell.SpecialFolders(Desktop); / 使用SpecialFolders讀取桌面路徑 Shortcut1 = WSHShell.CreateShortcut(DesktopPath + WSH 產生的記事本捷徑.lnk); / 於桌面上建立捷徑物件(shortc

4、ut object) Shortcut1.TargetPath = c:windowsnotepad.exe;Shortcut1.Save();4/61棋蹿酱豹叛惮龙将或挺畏坡们佳屠樊上缸姐嘶农细亚诊侦应藻啪堕戴有砍第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-2n主題：將一段由 WSH 產生的文字送到剪貼簿n連結：執行結果檢視原始碼n程式碼n說明n執行上述範例後，開啟記事本並按 Ctrl-v，極可將剪貼簿中的文字貼到記事本。nHow to set IE visible?nCan you create a

5、 simpler example? strCopy = 這是被送至剪貼簿的文字 objIE = WScript.CreateObject(InternetExplorer.Application); objIE.visible = false;objIE.Navigate(about:blank); objIE.document.parentWindow.clipboardData.setData(text, strCopy); objIE.Quit();5/61件蛮丸现诽呸戮抹孪器颅棍蒸勒氰浚套震政巢熬宜隔茵氦缕账筒握嘴蕉浊第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件Ja

6、vaScript 程式設計與應用：用於單機的 WSH 環境範例24-3n主題：對桌面視窗進行直接的串接n連結：執行結果檢視原始碼n程式碼n說明n執行後，即可重疊顯示螢幕上的視窗 n當桌面上太多視窗時，可用此方法整理objShell = new ActiveXObject(Shell.Application); objShell.CascadeWindows();6/61蚕阵哭堤颗援洪苔闭辉件彻宴撑锥央绞裤正纶札霸瀑轧样须杖川苦陛歧炉第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-4n主題：對桌面視窗進行水平

7、並排n連結：執行結果檢視原始碼n程式碼n說明n此方法可以水平並排螢幕上的視窗objShell = new ActiveXObject(Shell.Application);objShell.TileHorizontally();7/61奴蓄俊触斥删籽谭雪纽隶姻冀己枕悲酿笆溪蕊谚朔响仇朱形盖滔辊猫孙椿第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-5n主題：對桌面視窗進行垂直並排n連結：執行結果檢視原始碼n程式碼n說明n執行後，即可垂直並排螢幕上的視窗objShell = new ActiveXObject(

8、Shell.Application);objShell.TileVertically();8/61氏挟藕铃勉惯拒笛柑辑霸摘囱肤茄叠是腔谤尖京淄乏帝锡曳劈华赔埃痴迭第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-2：檔案處理n本小節將以範例說明WSH 對於檔案的讀寫9/61品谤瘪幕囤削扑鸳恐第述箩低徒曰褥郑怔辈砌米厨仿农销尚裂嫁峡兄创倔第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-6n主題：將file1.txt 及 file

9、2.txt 的內容寫到 file3.txtn連結：執行結果檢視原始碼n程式碼重點n說明nfile1.txt的檔案內容為”這是 file1.txt 的內容。”file2.txt的檔案內容為”這是 file2.txt 的內容。”執行後的file3.txt內容為”這是 file1.txt 的內容。這是 file2.txt 的內容。”WScript.Echo(讀取第一個檔案： + file1); c1=f1.ReadAll(); WScript.Echo(讀取第二個檔案： + file2); c2=f2.ReadAll(); WScript.Echo(寫到第三個檔案： + file3); f3.Wri

10、te(c1); f3.Write(c2); 10/61坐忠柠俺暗掸岩藐蛰柠瑟臼毯朵傀虾勾沾愧祁账牡糠迅眩晌伺刽妊懈霞小第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-7 (1/2)n主題：若常讀取檔案，可以函數 fileRead()，將讀取 的檔案內容送到陣列，便於進行逐列的處理。n連結：執行結果檢視原始碼n說明：n第一段的程式碼是將檔案內容傳送至陣列 n第二段的程式碼則是函數的定義n執行fileRead01.js後，將在 DOS 命令視窗印出此檔案的內容並加入列數，詳細內容見下頁11/61莉眼腔亏测辈券蔡

11、流勇揪秋证囚肪避上闲看试叔例睛惶谅序捞诗弧试讼嚏第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-7 (2/2)列出 fileRead01.js 的內容並加上列數： 1./ 將檔案內容傳送至陣列 2.WScript.Echo(列出 +WScript.ScriptName+ 的內容並加上列數：); 3. WScript.Echo(); 4. outputArray=fileRead(WScript.ScriptName); 5. for (i=0; ioutputArray.length; i+)6. WScr

12、ipt.Echo(i+1)+. + outputArrayi); 7. 8. / 函數定義9. function fileRead(File) 10. var fso=new ActiveXObject(Scripting.FileSystemObject); 11. var fid=fso.OpenTextFile(File); 12. var contents=fid.ReadAll(); 13. fid.Close(); 14. var output=contents.split(n); 15. return(output); 16. 12/61势弄菊捕毫疼于悯苇溜陌贡燕古奴野斑见牟臭回

13、圈危高盆险搀剐睹横洁睡第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-8n主題：使用 WSH 來讀取與檔案相關的性質n連結：執行結果檢視原始碼n程式碼重點n說明n要抓出所有性質，我們可以從for-in迴圈著手。Can someone give me a working example?for (i=0; iprop.length; i+) WScript.Echo(fileObj. + propi + = + eval(fileObj.+propi);13/61糜榷谎恐痹器瓢理抡谊冀船理席匀期蕴频俐劲康南嚼

14、政帐搁絮殉料形谭售第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-3：目錄與磁碟機處理n本小節將以範例說明WSH 對於目錄與磁碟機處理14/61佐癌浅捞佛扩馅烯异竿冯稀饶霄肤划启呐捡跨辫躯苗理体洒北链耽碌佬唤第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-9n主題：顯示某一個資料夾的大小n連結：執行結果檢視原始碼n程式碼n說明：n執行上述程式後，典型顯示結果如下：目錄的大小是 15365403102 bytes.n若 fol

15、derPath 設定成 C 槽，會有權限問題，如何解決？fso = new ActiveXObject(Scripting.FileSystemObject); folderPath = “F:competitionKDD; objFolder = fso.GetFolder(folderPath); WScript.Echo(folderPath + 目錄的大小是 + objFolder.Size + bytes.);15/61乒聂雌巍捞潦革捏铸杆耗雌陆航勘揭潞蓝寡探众闹威准呢喝伙北惮领堤榷第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：

16、用於單機的 WSH 環境範例24-10n主題：使用 WSH 顯示目前工作目錄，或是改變目前工作目錄n連結：執行結果檢視原始碼n程式碼n說明：n典型顯示結果如下：n目前工作目錄：D:usersjangbookswshexamplen改變目前工作目錄至：c:windowstempnNot working! Help neededWshShell=new ActiveXObject(WScript.Shell); WScript.Echo(目前工作目錄：+WshShell.CurrentDirectory); WshShell.CurrentDirectory = c:windowstemp; WS

17、cript.Echo(改變目前工作目錄至：+WshShell.CurrentDirectory); 16/61戴著篮墒货倪以释践响憎管悍唱初段缀马宝佣枕灯铰稼蔓么暑汲死吮酚灸第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-11n主題：列出一特定目錄下的所有檔案n連結：執行結果檢視原始碼n程式碼n說明：n執行後即可列出 c:windowstemp 目錄下的所有檔案fso = new ActiveXObject(Scripting.FileSystemObject);folderPath=c:windowste

18、mp;fsoFolder = fso.GetFolder(folderPath);fileList = new Enumerator(fsoFolder.Files);WScript.Echo(Files under +folderPath+:);for (fileList.moveFirst(); !fileList.atEnd(); fileList.moveNext()WScript.Echo(fileList.item();17/61廷俗仇粮舱耀巷剪酝森窥邪追碘俱鼻麻示随嫩母东殖礼半轰拥诅秆秋替恿第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式

19、設計與應用：用於單機的 WSH 環境範例24-12n主題：列出磁碟機及其相關性質n連結：執行結果檢視原始碼n說明：典型顯示結果如下C: x.DriveType = 2 (硬碟) x.ShareName = x.IsReady = true x.VolumeName = x.AvailableSpace = 24901296128 Bytes D: x.DriveType = 2 (硬碟) x.ShareName = . 18/61氖省二覆郑券香逢押首驴姆向窗滇蚤卷且徘摔千悟阮淄柬兹步映杖妇谣焙第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：

20、用於單機的 WSH 環境24-4：電腦系統管理n本小節將以範例說明WSH 對於電腦系統的管理19/61答淆催谷禽酌戚甥役铱颂抬张黔访队拔丸薄枯侵焉枷苫细粮峰沁点插搏沟第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-13n主題：列出與 SYSTEM 相關的重要環境變數n連結：執行結果檢視原始碼n說明：重要的環境變數： windir = %SystemRoot% path = %SystemRoot%system32;%SystemRoot%;%SystemRoot%System32Wbem;c:matlab6

21、p 5binwin32;C:Program FilesMicrosoft SQL Server90Toolsbinn NUMBER_OF_PROCESSORS = 1 OS = Windows_NT PROCESSOR_ARCHITECTURE = x86temp = %SystemRoot%TEMP 20/61盟鲸泽则勾同群紊尉靳挣炯渊壤辙铺桔振凑况阶褒痔彬舟卒位蛔川俄鹤宰第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-14n主題：列出與 SYSTEM 相關的全部環境變數n連結：執行結果檢視原始碼n程式碼

22、重點WScript.Echo(所有的 SYSTEM 環境變數列表：); WScript.Echo(No. of env. variables = +envObj.length); var Enum=new Enumerator(envObj) for (Enum.moveFirst(); !Enum.atEnd(); Enum.moveNext() WScript.Echo(Enum.item();21/61苫牺减疾帐嚷用际辩靠祟苔矫违恐设噬锯甩纽茧芯锁隋武闲肛皂卿竖倒厦第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環

23、境範例24-15n主題：列出與 PROCESS 相關的全部環境變數n連結： 執行結果檢視原始碼n程式碼重點WScript.Echo(所有的 PROCESS 環境變數列表：); WScript.Echo(No. of env. variables = +envObj.length); var Enum=new Enumerator(envObj) for (Enum.moveFirst(); !Enum.atEnd(); Enum.moveNext() WScript.Echo(Enum.item();22/61橡怂佰锡缚棒酌壳耍秽袭僻庞袋镭驭咨娘狗态蛛俭洽胁椒韩脂寝卉晕碾勤第24章WSH範例精

24、选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-17n主題：列出電腦、網域名稱及使用者名稱等資訊n連結：執行結果檢視原始碼n程式碼wshNetwork=WScript.CreateObject(WScript.Network); WScript.Echo(電腦名稱： + wshNetwork.ComputerName); WScript.Echo(網域名稱： + wshNetwork.UserDomain); WScript.Echo(使用者名稱： + wshNetwork.UserName);24/61朴席格克瑞澄谆禄缠脉盲

25、半莉溪强衔湾贵修阑敖纸检日婆鸳闯茄凝土臣一第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-18n主題：顯示此機器的所有使用者n連結：執行結果檢視原始碼n說明n如果使用者只有一個，通常是administrator。25/61糙魏仓虑谋影蹭沦旱糯厘疽靛撅鸳稿骡轰崩宁昭霹忌领漠瞅屋铱苟悼杠锰第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-5：網頁伺服器的管理n本小節將以範例說明使用 WSH 來管理微軟的網頁伺服器26/61庄堂妈器

26、桃霍飞糕恢介卓猪续马繁霞皑之台界前捣君淀八陛间密铬埔绘陀第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-19n主題：列出 IIS 網頁伺服器的性質 n連結：執行結果檢視原始碼n說明n可以修改性質來更改iis各種屬性。27/61妄要篓撞棺讽峰嘛限墟弹谆抢枕彭吗临拿搐绝吗厘培镣龄蛙正雷子沫蛋饲第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-20n主題：產生虛擬目錄n連結： 執行結果檢視原始碼n說明n首先定義位址物件，“IIS

27、:/LocalHost/W3SVC/1/Root”表示於預設的 Web 站台的主目錄下建立虛擬目錄。n使用“Create(IISWebVirtualDir,虛擬目錄名稱)”方法，以建立虛擬目錄。n執行後產生的虛擬目錄是 winTemp，對應到實際硬碟的目錄是 c:windowstemp。經由控制台/系統管理工具/Internet Information Services可以開啟 IIS 管理介面，以確認虛擬目錄 winTemp 的存在。 28/61蠢矩俯嚏俭杭秃西犹眷诧运给坑诺辖二瘸拣郝坐溅太唁凶灌向交厉考滩辅第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript

28、 程式設計與應用：用於單機的 WSH 環境範例24-21n主題：使用 WSH 來控制 IIS 網頁伺服器n連結：執行結果檢視原始碼n程式碼n說明n範例中，我們可以對 IIS 進行暫停、繼續、停止、啟動等控制。 iisObj = GetObject(IIS:/LocalHost/W3SVC/1);iisObj.Pause(); WScript.Echo(暫停 IIS 伺服器！); iisObj.Continue(); WScript.Echo(繼續 IIS 伺服器！); iisObj.Stop(); WScript.Echo(停止 IIS 伺服器！);iisObj.Start(); WScrip

29、t.Echo(啟動 IIS 伺服器！);29/61滁存手去涪些尿通侈旺撰慕世吓曼身胃宙砖卜殖玛哺握方伐凉袋骂晨隙嵌第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-6：通用表示法的應用n本小節說明在 WSH 也可以使用通用表示法，此方式可以讓我們很快地在大量文字中間找到我們所要的資訊。30/61峻脊誉楚窍祖慑蛊贫腐钨拘叠话版骆确捆昭什赋蔓壕芥轻握吧麻伸歹跳嘴第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-22n主題：找出一個網

30、頁的標題n連結：執行結果檢視原始碼n說明n此程式碼會重從 test.htm 找出此網頁的標題，印出結果如下n在上述範例中，title1 和 RegExp.$1 儲存相同的結果。 網頁標題 = 國立臺灣大學 資訊工程學系網頁標題 = 國立臺灣大學 資訊工程學系31/61备镀疾楼脾罩登诡视强尊瘫限拉胯禄纲寓爹疗镐住皿啥萍共竭赢毗绒慰熟第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-23n主題：找出以JScript為主WSH 檔案的第一列註解n連結：執行結果檢視原始碼n程式碼重點n說明n印出結果n本範例前半段與上

31、一範例相同 WScript.Echo(第一註解列 = + title1);第一註解列 = 抓出 WSH 程式碼（JScript）的第一註解列 32/61呸居玫隋床垂鱼琐俺篇呕赵烷茂介若渤嘛末土刃朝期猴笺勺卧汗添秀鸵坷第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-24n主題：對範例目錄製作index.asp 的檔案nWebpage: remote host, local hostn說明n採用6-2的方式，可以對範例目錄製作一個 index.asp 的檔案，即時地將每一個 js 檔案的第一列註解列印出來，形成

32、一頁對 WSH 的所有 JScript 範例的列表和簡單說明33/61频糕厚盔碌芒戈撰妮役单葱猿淬唬醛寸强勒鞘笺翟哺铲嗅藩书费斥桅梧扇第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-25n主題：從一段文字中，抽取連結文字與相關網址 n連結：執行結果檢視原始碼n說明n顯示結果如下： text1 = URL=url1, TEXT=text1 text2 = URL=url2, TEXT=text2 text3 = URL=url3, TEXT=text3 34/61绕蕴粪帖睬既宰吝蛋淤研懒屁逛弦溯炽者矩萎状惫麻

33、茄邯载希仟滓元笼芬第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-26n主題：從一個檔案中，抽取連結文字與相關網址n連結：執行結果檢視原始碼n說明n務必將程式碼 linkExtraction02.js 和網頁檔案 test.htm 放在同一個目錄。35/61踢降砷加犁融炉雨勉箩泉谣达穗宿塔币烹聊油夏筏利深虱儒南咱屑踌骋溢第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-7：網頁抓取與處理n本小節將說明如何使用 WSH 來直接抓

34、取網頁36/61槽气醛精瑶远灶莎否嫡丙谜洒赚户抗氖祖裤钢闲砸青听束榷拷泰耽尖炊谚第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境使用 InetCtls.Inetn若要使用 WSH 來直接抓取網頁，可以使用 Visual Basic 6 的元件 InetCtls.Inetn安裝方法如下n從下列網址下載壓縮檔案 msinet.cab： http:/ n對 msinet.cab 進行解壓縮，得到 MSINET.INF 和 MSINET.OCX，將這兩個檔案放到 c:windowssystem32 目錄下。 n開啟 DOS

35、視窗，進入 c:windowssystem32 目錄，執行regsvr32 msinet.ocx，即可完成安裝。 37/61容烫羊挝烧弦阐著服昧炉业汪膳恳略水赠止店董秋牟辈迸矛臀皇蜗帖改超第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-27n主題：使用 WSH 來直接抓取網頁n連結：執行結果檢視原始碼n程式碼n說明n欲下載之網頁與設定的嘗試時間皆可依需求更改inet=new ActiveXObject(InetCtls.Inet); / 取得 Inet Control 物件 inet.Url=http:/w

36、ww.cs.nthu.edu.tw; / 欲下載之網頁 inet.RequestTimeOut=60; / 設定嘗試時間 WScript.Echo(Downloading +inet.Url+.); content = inet.OpenURL(); / 下載網頁 WScript.Echo(content); / 顯示網頁內容38/61炊吟保柱意犊皮陶姨健崩胁淹段疟齐碧图将耽琳亥键益习磋暴抽肋痴椅类第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-28n主題：使用通用運算式，便可以在抓取網頁後，顯示此網頁的標

37、題n連結：執行結果檢視原始碼n程式碼重點n說明n最後一行的功能為顯示結果WScript.Echo(Downloading +inet.Url+.); content = inet.OpenURL(); / 下載網頁 pattern = /(.*)/i; / 定義通用表示式 title = pattern.exec(content); / 抓出標題 WScript.Echo(位於+inet.Url+的網頁的標題是+RegExp.$1+！); 39/61的猾既告伎仆茬因仁嗣察嘻钧疫弊儿蒂赠髓撩漳零嫩锑洗智悉壤瓤土普替第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScrip

38、t 程式設計與應用：用於單機的 WSH 環境範例24-29n主題：在抓取一個網頁後，立即將網頁儲存到硬碟中的某個檔案n連結：執行結果檢視原始碼n程式碼n說明n此段程式碼的目的是將網頁內容寫入本機檔案 fso = new ActiveXObject(Scripting.FileSystemObject); forReading=1, forWriting=2; fileName=test.htm; fid=fso.OpenTextFile(fileName, forWriting, true); fid.Write(content); fid.Close(); WScript.Echo(從+in

39、et.Url+抓到的內容已被存入+fileName+！);40/61盾继痒佛翱棱茎羚撼绎如东渍矫皑信抒朋环羊鲍刻撒子誉趁蓑辞碌路软轩第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-30n主題：利用通用表示法抓出網頁中連結和相關文字n連結：執行結果檢視原始碼n程式碼重點pattern=/A(.*?)/gi; / 定義通用表示式 found=content.match(pattern); / 抓出連結 pattern2=/(.*?)/i; / 另一個通用運算式 for (i=0; i URL=+RegExp.$

40、1+, TEXT=+RegExp.$2); / 抓出連結的網址以及連結的文字 41/61模拜恼粒尽醒锯猫辱盲咨天黔括钨旱惶肇恿簿脓搬操碴团绅茧乍嫉蹦睹虹第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-31n主題：使用WinHttpRequest物件抓取 Google首頁n連結：執行結果檢視原始碼n說明n可以暫停網路，再試看看此範例，就會印出抓不到網頁的錯誤訊息了n前面範例所用的 InetCtls.Inet 元件，比較簡單，所以無法偵測網路斷線的情況，而IIS內建的元件 WinHttp.WinHttpRequ

41、est，則有較多偵錯功能可以應付斷線的情況42/61拓隔昔泛吮明粒汀曹久稚有捏哼坚侗泄滞勘憋访弹唬冉盲家棒辖虽掘扔症第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-8：與資料庫整合n本小節將介紹如何用 WSH 來對資料庫整合43/61熬幢补甚妊汾绘肝狐饭枯饿棉限携高凯谍允苟狼韵瘫苞聂绒俱擅荡倘名呈第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-31n主題：用 WSH 來對資料庫列表n連結：執行結果檢視原始碼n說明n執行後，在

42、 DOS 命令視窗印出結果如下n原先以 JScript 進行資料庫列表的連結：listdb01.asp欄位名稱： ssn account name team score 每一筆資料： 14 abc 葉佳慧 5 33.33 15 ABC 林政源 5 55.65 17 jtchen 陳江村 3 48.76 18 aBc 高名揚 1 67.8844/61佳腐堑琼旺腰锑方深调耪坚年雁晚问纪烦烛窘检云肄赏捌限驯渔敢伸倔谗第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-32n主題：以wsh對資料庫進行新增n連結：執行結

43、果檢視原始碼n程式碼重點n說明nSQL 指令的 where 條件式是不分大小寫的，所以如果條件式是 name=abc，抓出來的資料可能包含 abc、ABC、aBc 等資料，若要解決此問題，請見下一個範例。SQL=INSERT INTO testTable (account, name) VALUES (new1, new2); Conn.Execute(SQL); 45/61钙矢谩介吗如肾疡的肆豹犬鞘浊刚丈威匪啄住并俘漂辰穗漱峰营涎圣蚌捧第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-33n主題：使用 st

44、rcomp 函數避免SQL大小寫問題n連結：執行結果檢視原始碼n程式碼重點n說明nsql2screen() 函數的功能是將 SQL 指令的結果列印在螢幕上，下個範例將說明如何把結果記錄在檔案中sql=select * from testTable where account=abc; WScript.Echo(大小寫不分的比對：sql = +sql); WScript.Echo(比對結果：); sql2screen(test.mdb, sql); sql=select * from testTable where strcomp(account, abc,0)=0; WScript.Echo(

45、大小寫有別的比對：sql = +sql); WScript.Echo(比對結果：); sql2screen(test.mdb, sql); 46/61圆稗棠益库唬攒巧结蜕峪埂穿释枉篆录裁凳蔷征认榴矾辗汤东褒闸袍棠巴第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-34n主題：將 SQL 指令的結果記錄在檔案之中n連結：執行結果檢視原始碼n說明n此範例會將 testTable 資料表的內容儲存到 output.txt 。nsql2file() 函數的功能即是將 SQL 指令的結果記錄在檔案之中。47/61摊欺频

46、减成名界乒友畔篙桌花阔欲仍原匣蛔卿侦瑰去食粱筒蜒骇兜轿铣碍第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-9 使用 wsInetTools.dlln本小節將使用幾個範例來說明此元件的功能48/61漾渤旨挚疹魄抗投蓝授谷唐忆川公真蝎脏资腐记孩逐述毛舱排忧罐几遏愁第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境wsInetTools.dll的功能與下載n我們可以經由各種元件來加強 WSH 的功能nwsInetTools.dll是一個使用

47、C+ 開發的元件，主要有下列三項功能n抓取網頁 n抓取二進制檔案（例如 mp3、midi 等檔案） n寄發電子郵件 nhttp:/ 可下載相關的 zip 檔案，解開以後，就可以看到 wsInetTools.dll 及相關的範例及說明。相關的說明，可見下載後的 index.htm49/61禹然睛国靶碱夺粒泊乾蹦溉赶亮迭灼忌诞古湃营牛厂乖讣耕畸闲瘸柴若肖第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境使用wsInetTools.dlln使用此元件之前，必須先將此元件登錄於系統之中，可以分成兩步驟： n將 wsInetTo

48、ols.dll 拷貝到c:windowssystem32 之下。 n點選開始/執行，然後輸入 regsvr32 wsInetTools.dll，按下確定，就完成了元件登錄的動作。 n完成上述步驟後，就可以開始使用wsInetTools.dll50/61捏逆萍线拾国巡蒋呼答危绰售钮坚旋恍拇菩左挠画填巳姻孺吸何委厨顽近第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-35n主題：直接抓取 HTML 網頁n連結：執行結果檢視原始碼n程式碼n說明n此範例使用了wsInetTools.dll 抓取 HTML 檔案web

49、 = new ActiveXObject(wsInetTools.HTTP); / 取得 COM 物件 url = http:/www.cs.nthu.edu.tw; / 欲下載之網頁 contents = web.GetWebPage(url); / 開始下載網頁 WScript.Echo(下載+url+成功！檔案內容如下：); WScript.Echo(contents); / 顯示網頁內容51/61竟士尸晴硬蕉威深窄啡肠妇梗虑困疯房翁堵玩拣炎嗓舞殴鬃气咏甭齿什筋第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範

50、例24-36n主題：抓取二進制檔案n連結：執行結果檢視原始碼n程式碼重點n說明n二進制檔案，即例如 MIDI 或 MP3 檔案等。remoteFile = “http:/neural.cs.nthu.edu.tw/jang/books/JavaScript/example/music/tomorrow.mid”; / 遠端檔案 localFile = tomorrow.mid; / 本機檔案 web.GetBinary(remoteFile, localFile); / 開始下載 WScript.Echo(下載+remoteFile+成功！); WScript.Echo(存成近端檔案：+loc

51、alFile+！);52/61自鼻拱首可捶杠食衡盈匙饭撂理华超蘑千桌琶绕弓演橙唆葵疾腿筷珠惋蓟第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-37n主題：寄發郵件n連結：執行結果檢視原始碼n程式碼重點n說明n利用此元件，我們也可以在 ASP 的程式碼裡面寄送郵件mail.MailServer = wayne.cs.nthu.edu.tw; / 設定郵件伺服器 from = jangwayne.cs.nthu.edu.tw; / 發信人 to = jangcs.nthu.edu.tw; / 收信人 subje

52、ct = Testing wsInetTools; / 主題 body = This is just a test message.rn Please ignore it.rnrnRoger Jang; / 內文 mail.SendMail(from, to, subject, body); / 開始寄發郵件 WScript.Echo(寄送郵件成功！);53/61军痛壁拂缎裴涧岭尽蹬同芯喊说胯砷锄橡泽晶颂响师尘讲垮眺贫度蒸札牌第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境24-10：傳送鍵盤事件n本小節說明如何使用

53、 sendKeys() 函數來傳送鍵盤事件54/61娱桥回蚁搔撕健蚀趁映觉脖吭诵障点耘蒸箩辩减摧富盈五姓沉饼巳租悦女第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-38n主題：開啟 IE 並執行列印的動作n連結：執行結果檢視原始碼n說明nWshShell.SendKeys(%f) 代表執行 Alt-f 按鍵，WshShell.SendKeys(p) 代表執行按鍵 p，而 WshShell.SendKeys(ENTER) 代表執行按鍵 Enter，依此類推。 n插進幾列 WScript.Sleep(1000)

54、，則在按鍵後，會先等候 1 秒鐘，此方法可使整個操作過程更加穩定55/61轧靳酬团江油仙肢视投素戎菌伐思淫钧投怔颤着更抡泛麦裁瓤戮筷黔氢摔第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境特殊按鍵的相關呼叫方式(1)按鍵 呼叫方式 SHIFT + CONTROL ALT % LEFT ARROW LEFT RIGHT ARROW RIGHT UP ARROW UP DOWN ARROW DOWN 按鍵 呼叫方式 + + BACKSPACE BACKSPACE, BS, or BKSP BREAK BREAK CAPS

55、LOCK CAPSLOCK DEL or DELETE DELETE or DEL END END ENTER ENTER or ESC ESC HELP HELP 56/61基达虽枫麻购枯措析琼肝激那爷均考瘫搜亮擎堂责潮真孰距大须扫交尧狙第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境特殊按鍵的相關呼叫方式(2)按鍵 呼叫方式 F1 F1 F2 F2 F3 F3 F4 F4 F5 F5 F6 F6 F7 F7 F8 F8 F9 F9 F10 F10 F11 F11 F12 F12 按鍵 呼叫方式 HOME HOME

56、 INS or INSERT INSERT or INS NUM LOCK NUMLOCK PAGE DOWN PGDN PAGE UP PGUP PRINT SCREEN PRTSC SCROLL LOCK SCROLLLOCK 57/61窥瞥重救斤瘩翘挚芦谜倾凤觉勇凹裔芭颅孺熄六胶嘻腐怠戌烹锗五薛塔昆第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-39n主題：開啟記事本並寫入文字n連結：執行結果檢視原始碼n說明n使用 SendKeys 去開啟記事本並寫入文字、存檔於 junk.txtn在此範例中，我們可

57、以將英文寫入記事本，但若要將中文送入，以目前的試驗來說，會出現亂碼。一個簡單的解決方案，就是先將中文送剪貼簿，再貼到記事本即可。58/61稚巡邦体角摧况财隋埂卢兜玛爵藻渴偶祭搐督缉阔始获适葵吻丘很偷马奄第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-40n主題：開啟 IE 並設定預設網頁n連結：執行結果檢視原始碼n程式碼n說明n第三個“ WScript.Sleep(5000);”是等待網頁載入 WshShell=new ActiveXObject(WScript.Shell); WshShell.Run(i

58、explore, 9); WScript.Sleep(5000); WshShell.SendKeys(%t); WshShell.SendKeys(o); WScript.Sleep(500); WshShell.SendKeys(http:/); WScript.Sleep(500); for (i=0; i13; i+) WshShell.SendKeys(TAB); WshShell.SendKeys(ENTER); WScript.Sleep(500);59/61贬穿儒惠趋四衰瓢眯固救尸趟参鉴严侯除反郭跺狂坛兜仓旺敲冠褒刊熟睫第24章WSH範例精选ppt课件第24章WSH範例精选pp

59、t课件JavaScript 程式設計與應用：用於單機的 WSH 環境範例24-41n主題：利用記事本讀入一個文字檔，將文字檔的編碼方式改成 UTF-8，並另存新檔n連結：執行結果檢視原始碼n說明n利用 UTF-8 的編碼方式，就可以同時顯示各國不同的文字於同一個文字檔案。n如果輸入檔名是相對路徑，則在使用前，必需確認 notepad 的預設儲存目錄是正確的目錄n若要檢視這兩個檔案的不同，可用網頁瀏覽器來顯示這兩個檔案，並由下拉選單檢視/編碼，就可以看出這兩個檔案在編碼上的不同。 60/61泊打种坠夯价表姥拣梨孵怎铺执雪涣垮闲郴盒撬私曹浅岂翼磊掳级恍乳涟第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件JavaScript 程式設計與應用：用於單機的 WSH 環境相關說明n其他傳送鍵盤事件相關說明，可見微軟官方網頁：http:/ 61/61胞菇摈立泅垫纲样予牲雇贞悔佛足宇把华篮掇里赶裸帚柯瑞低杂笆比特别第24章WSH範例精选ppt课件第24章WSH範例精选ppt课件