VBScriptでは、Cのようにincludeの.vbsスクリプトを使用します.

基本的な考え方は、スクリプトファイルをロードし、その内容を読み取り、実行することです.

Include "C:\workspace\vbs\Libraries\MySQLDB.vbs"

Sub Include(sInstFile) 
	Dim oFSO, f, s 
	Set oFSO = CreateObject("Scripting.FileSystemObject") 
	Set f = oFSO.OpenTextFile(sInstFile) 
	s = f.ReadAll 
	f.Close 
	Set f = Nothing
	Set oFSO = Nothing
	ExecuteGlobal s 
End Sub

現在のパスを取得する機能を追加すると、相対パスを使用できます.

Dim strWorkDir 
strWorkDir = Left(WScript.ScriptFullName,instrrev(WScript.ScriptFullName,"\")-1)

Include strWorkDir & "\MySQLDB.vbs"
 
''''''
''' Required
''''''

Sub Include(sInstFile) 
	Dim oFSO, f, s 
	Set oFSO = CreateObject("Scripting.FileSystemObject") 
	Set f = oFSO.OpenTextFile(sInstFile) 
	s = f.ReadAll 
	f.Close 
	ExecuteGlobal s 
	Set f = Nothing
	Set oFSO = Nothing
End Sub