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")