這篇文章給大家介紹如何在VBS中使用CreateObject 函數(shù)，內容非常詳細，感興趣的小伙伴們可以參考借鑒，希望對大家能有所幫助。

創(chuàng)新互聯(lián)公司主營源匯網(wǎng)站建設的網(wǎng)絡公司,主營網(wǎng)站建設方案,app軟件定制開發(fā),源匯h5小程序開發(fā)搭建,源匯網(wǎng)站營銷推廣歡迎源匯等地區(qū)企業(yè)咨詢

CreateObject 函數(shù)

創(chuàng)建并返回對 Automation 對象的引用。

CreateObject(servername.typename [, location])

參數(shù)

servername

必選項。提供對象的應用程序名稱。

typename

必選項。要創(chuàng)建的對象類型或類。

location

可選項。對象所在的網(wǎng)絡服務器將被創(chuàng)建。

說明

Automation 服務器至少提供一種對象類型。例如，字處理應用程序可以提供應用程序對象、文檔對象和工具條對象。

要創(chuàng)建 Automation 對象，將 CreateObject 函數(shù)返回的對象賦值給某對象變量：

Dim ExcelSheet
Set ExcelSheet = CreateObject("Excel.Sheet")

上述代碼啟動創(chuàng)建對象（在此實例中，是 Microsoft Excel 電子表格）的應用程序。對象創(chuàng)建后，就可以在代碼中使用定義的對象變量引用此對象。在下面的示例中，可使用對象變量、ExcelSheet 和其他 Excel 對象，包括 Application 對象和 Cells 集合訪問新對象的屬性和方法。例如：

' Make Excel visible through the Application object.
ExcelSheet.Application.Visible = True
' Place some text in the first cell of the sheet.
ExcelSheet.ActiveSheet.Cells(1,1).Value = "This is column A, row 1"
' Save the sheet.
ExcelSheet.SaveAs "C:\DOCS\TEST.XLS"
' Close Excel with the Quit method on the Application object.
ExcelSheet.Application.Quit
' Release the object variable.
Set ExcelSheet = Nothing

在遠程服務器上創(chuàng)建一個對象，當 Internet 安全關閉時只能完成。通過傳遞計算機名到 CreateObject 服務器名的參數(shù)，能在遠程網(wǎng)絡上創(chuàng)建對象。該名稱如同共享部份的機器名。例如網(wǎng)絡共享名命名為： "\\myserver\public", servername 是 "myserver"。另外,只能指定 servername 使用 DNS 格式或 IP 地址。

以下代碼返回運行在命名為"myserver"的遠程網(wǎng)絡計算機上 Excel 實例的版本號 :

Function GetVersion
 Dim XLApp
 Set XLApp = CreateObject("Excel.Application", "MyServer")
 GetVersion = XLApp.Version
End Function

錯誤發(fā)生在指定的遠程服務器不存在或無法找到。

關于如何在VBS中使用CreateObject 函數(shù)就分享到這里了，希望以上內容可以對大家有一定的幫助，可以學到更多知識。如果覺得文章不錯，可以把它分享出去讓更多的人看到。

本文名稱：如何在VBS中使用CreateObject函數(shù)-創(chuàng)新互聯(lián)
標題URL：http://chinadenli.net/article30/cohpso.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供建站公司、動態(tài)網(wǎng)站、品牌網(wǎng)站建設、電子商務、小程序開發(fā)、面包屑導航

廣告

聲明：本網(wǎng)站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經(jīng)允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯(lián)