vbs如何調用外部對像和類型庫

這篇文章將為大家詳細講解有關vbs如何調用外部對像和類型庫，小編覺得挺實用的，因此分享給大家做個參考，希望大家閱讀完這篇文章后可以有所收獲。

先舉個例子，最近的flash網馬調用:
var Flashver = (new ActiveXObject("ShockwaveFlash.ShockwaveFlash.9")).GetVariable("$version").split(",");

這個ShockwaveFlash.ShockwaveFlash.9從何而來，用exescope打開flash9f.ocx選擇typelib，即可看到ShockwaveFlash.ShockwaveFlash.9對像的函數，其中就有GetVariable。這就帶來另一個問題，如何知是要打開的是flash9f.ocx呢？如果只是針對這個，可以用IE的組件管理器查看到。

那么我們調用其它的可不可以，像mstsc.exe，3389連接器的組件呢？注冊表查找mstsc.exe，找到的HKEY_CLASSES_ROOT\CLSID\{3523c2fb-4031-44e4-9a3b-f1e94986ee7f}\InprocServer32就是C:\WINDOWS\system32\mstscax.dll，然后用exescope打開也可以看到這個組件的函數、屬性、方法等。可以簡單示例（md，只是能改mstsc.exe的各方面屬性值，一直打不開連接界面，誰來改改？）：

Sub ExecuteConnection(strServer, strUser, strPW)
' create the client
Dim objMsRdpClient
Set objMsRdpClient = CreateObject("MsTscAx.MsTscAx.3")
objMsRdpClient.Server = strServer
objMsRdpClient.UserName =strUser
objMsRdpClient.FullScreen = false
objMsRdpClient.AdvancedSettings2.RedirectDrives = False
objMsRdpClient.AdvancedSettings2.RedirectPrinters = False
objMsRdpClient.AdvancedSettings2.RedirectPorts = False
objMsRdpClient.AdvancedSettings2.RedirectSmartCards = False

objMsRdpClient.AdvancedSettings2.ClearTextPassword = strPW
objMsRdpClient.StartConnected = True
WScript.echo "Before connecting"

wscript.echo objMsRdpClient.version
dim intResult
intResult = objMsRdpClient.Connect
WScript.echo "After connecting Result: " & intResult

End Sub

調用組件，不僅可以使用注冊表中找到的HKEY_CLASSES_ROOT\CLSID\{3523c2fb-4031-44e4-9a3b-f1e94986ee7f}\ProgID（上邊的例子就是CreateObject("MsTscAx.MsTscAx.3")
），也可以用HKEY_CLASSES_ROOT\CLSID，這也就是為什么我們在asp木馬中也可以用到的classid，像海陽頂端2006+源碼中的：

<object runat="server" id = "ws" scope = "page" classid = "clsid:72C24DD5-D70A-438B-8A42-98424B88AFB8"></object>
<object runat="server" id = "fso" scope = "page" classid = "clsid:0D43FE01-F093-11CF-8940-00A0C9054228"></object>
<object runat="server" id = "ws" scope = "page" classid = "clsid:F935DC22-1CF0-11D0-ADB9-00C04FD58A0B"></object>
<object runat="server" id = "sa" scope = "page" classid = "clsid:13709620-C279-11CE-A49E-444553540000"></object>
當然其它別的網馬，基本調用的都是CLSID了，你可以隨便找一些網馬來看。
不過在vbs中好像不可以直接調用classid，放在wsf文件中就可以，當然是html之類的更無所謂了。

關于“vbs如何調用外部對像和類型庫”這篇文章就分享到這里了，希望以上內容可以對大家有一定的幫助，使各位可以學到更多知識，如果覺得文章不錯，請把它分享出去讓更多的人看到。