11 Únor 2010
Include file ve Visual Basic Scriptu
kategorie Ostatní, Windows, napsal pavoocek, 11.02.2010

V případě, že používáte Visual Basic Script pro nejrůznější drobné i robustnější aplikace, hodí se používat „knihovny“. Jenže oproti ASP v klasickém VB Scriptu neexistuje nativní includování souborů. Naštěstí existuje poměrně elegantní způsob, jak to zařídit pomocí procedury ExecuteGlobal, viz příklad procedury IncludeFile, která „přilinkuje“ knihovnu:

sub IncludeFile(aFileName)
ExecuteGlobal LoadStringFromFile(aFileName)
end sub

function LoadStringFromFile(aFilename)
Set fs = CreateObject("Scripting.FileSystemObject")
Set f=FS.OpenTextFile(aFileName,1,false,-2)
LoadStringFromFile=f.ReadAll
f.Close
Set f=Nothing
Set fs = Nothing
end function

více    přidat komentář


Napsat komentář
Jméno: 
Email: 
URL: 
Komentář: