Anonymous user
Include a file: Difference between revisions
→{{header|VBScript}}
(Added example) |
|||
Line 1,150:
<lang vbscript>
<script id="Connections" language="VBScript" src="D:\include\ConnectionStrings.vbs"/>
</lang>
If you use the following form then you can define an environment variable, %INCLUDE% and make your include library more portable as in
<lang vbscript>
Include "%INCLUDE%\StrFuncs.vbs"
Function Include ( ByVal file )
Dim wso: Set wso = CreateObject("Wscript.Shell")
Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
ExecuteGlobal(fso.OpenTextFile(wso.ExpandEnvironmentStrings(file)).ReadAll)
End Function
</lang>
| |||