創(chuàng)建 COM 對象引用的特定類名.
ObjCreate ( "類名稱" [, "服務器名稱" [,"用戶名",
["密碼"]]] )
類名稱 | 對象的類名稱, 格式如下: "程序名.對象類型" 也可以是一個字符串表示形式的 CLSID. |
服務器名稱 | [可選參數(shù)] 遠程計算機名稱. 從對象獲取. |
用戶名 | [可選參數(shù)] 登錄遠程計算機時的用戶名 格式為 "計算機名稱\用戶名", 或者 "域名\用戶碼". |
密碼 | [可選參數(shù)] 登錄遠程計算機時的密碼. |
成功: | 返回一個對象. |
失敗: | 返回 0, 設置 @error 為非 0 值. |
; 示例 1
;
; 計算打開 shell(命令解釋程序) 窗口的數(shù)量
Local $oShell
= ObjCreate("shell.application")
; 獲取窗口 Shell 對象
Local $oShellWindows = $oShell.windows ; 獲取窗口 Shell 集合
If IsObj($oShellWindows) Then
Local
$string =
"" ; 用于顯示用途的字符串
For
$Window In
$oShellWindows ; 計數(shù)現(xiàn)有
Shell 窗口
$string = $string & $Window.LocationName &
@CRLF
Next
MsgBox(0, "窗口
Shell","您打開以下 Shell
窗口:" & @CRLF & @CRLF & $string);
EndIf
Exit
; 示例 2
;
; 打開遠程計算機的 MediaPlayer
Local $oRemoteMedia
= ObjCreate("MediaPlayer.MediaPlayer.1",
"name-of-remote-computer")
If Not @error Then
MsgBox(0, "創(chuàng)建遠程對象測試", "ObjCreate() 創(chuàng)建遠程 MediaPlayer 對象成功 !")
$oRemoteMedia.Open(@WindowsDir & "\media\Windows XP Startup.wav") ; Play sound if file is
present
Else
MsgBox(0, "創(chuàng)建遠程對象測試", "無法打開遠程對象. 錯誤代碼: " &
Hex(@error, 8))
EndIf
provider with jb51.net (unicode) |