Comments on: Importing VBS Files In Your VBScript Project http://gazeek.com/coding/importing-vbs-files-in-your-vbscript-project/ Geeks Blog .. Cos Others Just Dont Understand Wed, 21 Jul 2010 07:11:13 +0000 http://wordpress.org/?v=2.9.1 hourly 1 By: GroLis http://gazeek.com/coding/importing-vbs-files-in-your-vbscript-project/comment-page-1/#comment-74 GroLis Wed, 24 Feb 2010 08:56:38 +0000 http://gazeek.com/?p=61#comment-74 Hello! I have a problem with your function. I get an "File not found" error, when I run my script with this function. Here is my code: Sub Import(strFile) Dim WshShell : Set WshShell = WScript.CreateObject("WScript.Shell") Dim objFs : Set objFs = CreateObject("Scripting.FileSystemObject") strFile = WshShell.ExpandEnvironmentStrings(strFile) strFile = objFs.GetAbsolutePathName(strFile) Dim objFile : Set objFile = objFs.OpenTextFile(strFile) strCode = objFile.ReadAll objFile.Close ExecuteGlobal strCode End Sub Do you have an idea, what the error is? I import a file with Import "Common.vbs". The file is in the same folder as the running script. Thanky you for your help. :) Hello! I have a problem with your function. I get an “File not found” error, when I run my script with this function.

Here is my code:
Sub Import(strFile)
Dim WshShell : Set WshShell = WScript.CreateObject(“WScript.Shell”)
Dim objFs : Set objFs = CreateObject(“Scripting.FileSystemObject”)

strFile = WshShell.ExpandEnvironmentStrings(strFile)
strFile = objFs.GetAbsolutePathName(strFile)

Dim objFile : Set objFile = objFs.OpenTextFile(strFile)

strCode = objFile.ReadAll
objFile.Close
ExecuteGlobal strCode
End Sub

Do you have an idea, what the error is? I import a file with Import “Common.vbs”. The file is in the same folder as the running script.
Thanky you for your help. :)

]]> By: Frank http://gazeek.com/coding/importing-vbs-files-in-your-vbscript-project/comment-page-1/#comment-15 Frank Sat, 27 Dec 2008 02:13:24 +0000 http://gazeek.com/?p=61#comment-15 That is exactly what I am looking. I was about to learn perl so that I could have the same functionality. If it works without any hiccups, you will have saved me hours and hours of work. Thanks!!! That is exactly what I am looking. I was about to learn perl so that I could have the same functionality. If it works without any hiccups, you will have saved me hours and hours of work.

Thanks!!!

]]>