发布新日志

  • 转)vbs之createobject大全收藏

    2009-04-22 16:23:45

    ADO对象
    Connection
    Command
    RecordSet
    Record
    Stream


    Server.CreateObject("scrīpting.FileSystemObject")
    Server.CreateObject("scrīpting.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("Wscrīpt.Shell")
    Server.CreateObject("wscrīpt.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 WindowsscrīptingHost: 
    oWSH = CreateObject("Wscrīpt.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:

    scrīpting Shell: 
    oShell = CreateObject("Wscrīpt.Shell")

    scrīpting Network Object: 
    oNet = CreateObject("Wscrīpt.Network")

    scrīpting Regular Expression Parser: 
    oReg = CreateObject("VBscrīpt.RegExp")

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