标题: VBS 之CreateObject介绍（转） [打印本页]

---

作者: rokersong     时间: 2007-12-19 12:03    标题: VBS 之CreateObject介绍（转）

ADO对象
Connection
Command
RecordSet
Record
Stream


Server.CreateObject("Scripting.FileSystemObject")
Server.CreateObject("Scripting.Dictionary") HashTable
Server.CreateXObject("Word.Application") //Server
ActiveXObject("Word.Application") //Client
Server.CreateObject("Excel.Application") //Server
ActiveXObject("Excel.Application") //Client
CreateObject("PowerPoint.Application")
Server.CreateObject("Microsoft.XMLHTTP")
Server.CreateObject("Microsoft.XMLDOM")
Server.CreateObject("MSXML2.XMLHTTP.4.0")
Server.CreateObject("WScript.Shell")
Server.CreateObject("wscript.network")
Server.CreateObject("MSWC.AdRotator")
CreateObject("Excel.Sheet")
MS FrontPage: oFP = CreateObject("FrontPage.Application")
MS Access: oAccess = CreateObject("Access.Application")
MS Graph: oGraph = CreateObject("MSGraph.Application")


CreateObject("PhotoShop.Application")

CreateObject("SQLDMO.SQLServer")
CreateObject("SQLDMO.Login")
CreateObject("SQLDMO.Backup")
CreateObject("SQLDMO.User")
Server.CreateObject("SQLDMO.BackupDevice")
Server.CreateObject("SQLDMO.Database")
Server.CreateObject("SQLDMO.Restore")

Server.CreateObject("MSMQ.MSMQQueueInfo")
CreateObject("MSMQ.MSMQQuery")
Server.CreateObject("ixsso.Query")
Server.CreateObject("ixsso.Util")

AccPac Advantage Corporate:
oAccPac=CreateObject("ACCPAC.xapiSession")

AccPac Report Master for Windows:
oImpApp=CreateObject("Impromptu.Application.30")

BarTender:
oBarTender = CreateObject("BarTender.Application")

CrystalReports:
oCRApplication = createobject ("CrystalRuntime.Application")
This doesn't invoke an IDE actually.

EUDORA:
oEud = CreateObject("Eudora.EuApplication.1")

FaxMaker:
oFax = CREATEOBJECT("fmfaxapi.application")

GroupWise:
oGroupWise = CreateObject("NovellGroupWareSession")

LotusNotes:
oNotes = CreateObject("Notes.NotesSession")
oNotes = CreateObject("Notes.NotesUIWorkspace")
oNotes = CreateObject("Lotus.Notessession") (Domino 5.0.3)

MS Common Dialog:
oCommmonDialog = CreateObject("MSComDlg.CommonDialog") && !!! You can't directly create this object without a development licence, so for dynamically doing it on another machine, see below. -- PeterCrabtree

MS Internet Explorer:
oIE = CreateObject("InternetExplorer.Application")
IEAutomationExample

MS MapPoint:
oMapPoint = CreateObject("MapPoint.Application")

MSN Messenger:
oMessenger = CREATEOBJECT("MSNMessenger.MessengerApp")

MS NetMeeting:
oNetMeeting=CREATEOBJECT("netmeeting.app.1")

MS Outlook:
oOutlook = CreateObject("Outlook.Application")

MS Outlook Express: None - It is not a COM server!

MS PowerPoint:
oPP = CreateObject("PowerPoint.Application")

MS Project:
oProj = CreateObject("msProject.Application")

MS SourceSafe:
oVSS = CreateObject("SourceSafe.0")

MS Word:
oWord = CreateObject("Word.Application")

MS Visio:
oVisio = CreateObject("Visio.Application")


MS VisualCPlusPlus: (VC++)
oCpp = CreateObject("MSDev.Application")

MS VisualFoxpro:
oVFP = CreateObject("VisualFoxPro.Application")

MS WindowsScriptingHost:
oWSH = CreateObject("WScript.Shell")

Novell GroupWise:
oGroupWise = CreateObject("NovellGroupWareSession")

PCAnywhere (host):
oPCAHost = CreateObject("WinAWSvr.BeHostDataManager")

PCAnywhere (remote):
oPCARem = CreateObject("WinAWSvr.RemoteDataManager")

QuickBooks:
QBSessionManager = CreateObject("QBFC2.QBSessionManager")

RationalRose:
oRose = CreateObject("Rose.Application")

TAPIFax:
oTAPIFax = CreateObject('FaxServer.FaxServer')

WindowsShell:
oWSH = CreateObject("Shell.Application")

Windows Media Player:

oWMP = CREATEOBJECT("WMPlayer.OCX")
oPlayList = oWmp.PlaylistCollection.GetAll()
oWmp.currentPlaylist = oPlayList.Item(0) && Zero based array
*!* Music starts!

Windows Messenger:
oMessenger = CREATEOBJECT("Messenger.MessengerApp")

WinFax:
oWinFax = CreateObject("WinFax.SDKSend")

WinPrint :
oWinPrint = CreateObject("WinPrint.WinPrintX")

SQL-DMO object:
loSQL = CREATEOBJECT("SQLDMO.Application")

Others:

Scripting Shell:
oShell = CreateObject("WScript.Shell")

Scripting Network Object:
oNet = CreateObject("WScript.Network")

Scripting Regular Expression Parser:
oReg = CreateObject("VBScript.RegExp")

SQL DMO SQL Server:
CreateObject("SQLDMO.SQLServer")

---

作者: wjjchrdw     时间: 2007-12-19 17:07
不错，挺多不知道的对象。

---

作者: HAT     时间: 2007-12-19 20:59
VBS初学者前来收藏

---

作者: zerocq     时间: 2007-12-20 10:38
原来有这么多,收藏

有中文介绍吗

---

作者: patrol     时间: 2007-12-20 11:31
请问server是做什么的？用在服务器端的？

---

作者: jia332     时间: 2008-11-18 10:41
ding 楼主辛苦了

---

作者: kioskboy     时间: 2008-11-18 11:14
好