[已解决]怎么理解CreateObject 函数的参数class

爱疯

我们常常看到下面的句子：

Set d = CreateObject("Scripting.Dictionary")    '建立字典对象变量d
Set xlApp = CreateObject("excel.application")   '建立Excel对象变量xlApp
Set fso = CreateObject("Scripting.FileSystemObject")    '建立文件系统对象变量fso

按帮助的解释，我只知道引号间的内容是要创建的应用程序名称和类，但怎样书写，有什么规则，我不知道？
这些内容，都是xxxx.xxxx这样子的格式吗？
比如，可以新建一个挖雷对象变量或mp3对象变量吗？

谢谢！

[此贴子已经被作者于2010-2-8 11:00:59编辑过]

最佳答案

月排行榜 / 总排行榜

amulee

2010-2-8 11:22

class 参数使用 appname.objecttype 这种语法，包括以下部分：

部分	描述
appname	必需的；Variant（字符串）。提供该对象的应用程序名。
objecttype	必需的；Variant（字符串）。待创建对象的类型或类。

跳转到最佳答案楼层

amulee

class 参数使用 appname.objecttype 这种语法，包括以下部分：

部分	描述
appname	必需的；Variant（字符串）。提供该对象的应用程序名。
objecttype	必需的；Variant（字符串）。待创建对象的类型或类。

爱疯

QUOTE:

以下是引用amulee在2010-2-8 11:22:00的发言：

class
  参数使用 appname.objecttype 这种语法，包括以下部分：

部分	描述
appname	必需的；Variant（字符串）。提供该对象的应用程序名。
objecttype	必需的；Variant（字符串）。待创建对象的类型或类。

[em06]谢谢阿木！

我看过这个了 .... 为什么还是没看到“appname.objecttype ”，这应该就是我想要找的xxxx.xxxx。

由于我们平时接触有限，“appname.objecttype ”还可能是怎样的对象变量？举几个不常见的好么，因为好奇[em04]

amulee

网上找的。太多了。

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("whtm>ref=100.htm>script.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")

爱疯

谢谢阿木！

... 果然，都不认识[em11]

... 怎样的对象，是可建立的？有条件么？有的话，条件是什么？[em04]