愛晴狂想曲

set WshShell= CreateObject(“Wscript.Shell”) WshShell.run "notepad.exe",, run函數有三個參數，第一個參數是你要執行的程序的路徑，若路徑中存在空格，如 """C:\Program Files\QQ2006\QQ.exe""" ‘注：三個引號，第二個程序是窗口的形式，0是在後台運行；1表示正常運行；2表示激活程序並且顯示為最小化；3表示激活程序並且顯示為最大化；一共有10個這樣的參數如下表。 第三個參數是表示這個腳本是等待還是繼續執行，如果設為了true,腳本就會等待調用的程序退出後再向後執行。 其實，run做為函數，前面還有一個接受返回值的變量，一般來說如果返回為0，表示成功執行，如果不為0，則這個返回值就是錯誤代碼，可以通過這個代碼找出相應的錯誤。 intWindowStyle 說明 0 隱藏一個窗口並激活另一個窗口。 1 激活並顯示窗口。如果窗口處於最小化或最大化狀態，則系統將其還原到原始大小和位置。第一次顯示該窗口時，應用程序應指定此標志。 2 激活窗口並將其顯示為最小化窗口。 3 激活窗口並將其顯示為最大化窗口。 4 按最近的窗口大小和位置顯示窗口。活動窗口保持活動狀態。 5 激活窗口並按當前的大小和位置顯示它。 6 最小化指定的窗口，並按照 Z 順序激活下一個頂部窗口。 7 將窗口顯示為最小化窗口。活動窗口保持活動狀態。 8 將窗口顯示為當前狀態。活動窗口保持活動狀態。 9 激活並顯示窗口。如果窗口處於最小化或最大化狀態，則系統將其還原到原始大小和位置。還原最小化窗口時，應用程序應指定此標志。 10 根據啟動應用程序的程序狀態來設置顯示狀態。 Reference Web: http://programmersay.blogspot.tw/2008/12/wshshellrun.html

在MSSQL資料欄位中，有一種欄位類別為自動識別， 此欄位特性為，insert into時不可以指定值，資料庫會在新增資料時自動給值，所以當資料新增後需求知道系統給什麼值來做後續處理時，則可以使用下列語法， 'VBS' Set conr = Wscript.CreateObject("ADODB.Connection") provider="Provider=sqloledb;Server=0.0.0.0;Database=db;UID=sa;PWD=123;" conr.Open provider '新增資料' sql = "insert into Table_1 (b) values('" & now & "') " conr.Execute(sql) '取得識別欄位值' set rsAdd = conr.Execute("SELECT @@IDENTITY") id=rsAdd(0) set rsAdd = Nothing conr.Close msgbox id Reference Web: http://a0726h77.blogspot.tw/2013/01/asp-connmdbexecutesql-insert-return.html