中国DOS联盟

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

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

中国DOS联盟论坛
现在时间是 2026-08-10 12:04
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » VBS 之CreateObject介绍(转) 查看 870 回复 6
楼 主 VBS 之CreateObject介绍(转) 发表于 2007-12-19 12:03 ·  中国 广东 东莞 电信
初级用户
包身工
积分 74
发帖 20
注册 2007-11-07 15:52
18年会员
UID 101987
性别 男
来自 广东 东莞
状态 离线
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")
本帖最近评分记录 (共 3 条) 点击查看详情
评分人分数时间
knoppix7 +4 2007-12-19 18:07
hackate +2 2008-11-18 18:07
everest79 +15 2008-11-18 18:58
嘘§the genius is sleeping!!!
2 发表于 2007-12-19 17:07 ·  中国 河南 洛阳 涧西区 联通
初级用户
积分 26
发帖 12
注册 2005-10-01 12:19
20年会员
UID 43026
性别 男
状态 离线
不错,挺多不知道的对象。
3 发表于 2007-12-19 20:59 ·  中国 重庆 电信
版主
★★★★★
积分 9,023
发帖 5,017
注册 2007-05-31 19:39
19年会员
UID 89899
性别 男
状态 离线
VBS初学者前来收藏
4 发表于 2007-12-20 10:38 ·  中国 浙江 温州 电信
中级用户
★★
积分 458
发帖 196
注册 2006-10-05 12:04
19年会员
UID 64614
状态 离线
原来有这么多,收藏

有中文介绍吗
5 发表于 2007-12-20 11:31 ·  中国 安徽 合肥 电信
新手上路
积分 2
发帖 1
注册 2007-10-26 17:04
18年会员
UID 100861
性别 男
状态 离线
请问server是做什么的?用在服务器端的?
6 发表于 2008-11-18 10:41 ·  中国 上海 电信
初级用户
★★
积分 160
发帖 81
注册 2006-07-27 17:52
20年会员
UID 59377
性别 男
状态 离线
ding 楼主辛苦了
本帖最近评分记录 (共 1 条) 点击查看详情
评分人分数时间
yishanju -4 2008-11-18 10:49
7 发表于 2008-11-18 11:14 ·  中国 广东 深圳 电信
初级用户
★★
积分 153
发帖 103
注册 2008-03-27 19:38
18年会员
UID 114210
性别 男
状态 离线
论坛跳转: