中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » VBS 之CreateObject介绍（转）

rokersong
初级用户

包身工

积分 74
发帖 20
注册 2007-11-7
来自广东东莞
状态离线

『楼主』: 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")

此帖被 +21 点积分

点击查看详情