티스토리 뷰

OS-서버-서비스/Windows

[VBS] VBScript 에서 include 효과를 내는 ExecuteGlobal 서브루틴

공허공자 2009. 12. 13. 01:26 
텍스트 문장 그대로를 스크립트 명령으로 해석하여 실행해준다.
Dim result : result = 0
Dim a : a = 5
Dim b : b = 10
ExecuteGlobal "result = a + b"
Speak result

외부 스크립트를 인클루드 하듯 실행
Dim fsObj : Set fsObj = CreateObject("Scripting.FileSystemObject")
Dim vbsFile : Set vbsFile = fsObj.OpenTextFile("myfunctions.vbs", 1, False)
Dim myFunctionsStr : myFunctionsStr = vbsFile.ReadAll
vbsFile.Close
Set vbsFile = Nothing
Set fsObj = Nothing
ExecuteGlobal myFunctionsStr
 

http://www.gwmicro.com/mediawiki/index.php/Using_ExecuteGlobal_to_Include_VBScript_Code

'OS-서버-서비스 > Windows' 카테고리의 다른 글

IIS FTP PASV 포트 고정  (0) 2009.12.25
[보안] IIS 웹 서버 보안 설정  (1) 2009.12.25
Wscript Print 명령들  (0) 2009.11.26
XP 기본 윈도우 검색 도구 변경  (0) 2009.11.23
블루스크린 덤프 뷰어  (0) 2009.09.28
공유하기 링크
댓글