文档介绍：螀Action_Init肇OptionExplicit袆'=====================================================芁Dimfso,file,filename,objTestLib,objmsgbox腿'=====================================================袇'createanewfilesystemobjecttooutputinformation羇SetobjTestLib=createobject("")蚄'createanewsqamsgboxobject袂Setobjmsgbox=CreateObject("")薇'=====================================================螄'"filename","""UI_Flag","""Appno1","""Appno2","""Appno3",""蚁'=====================================================肈'defineaglobalfilenamevariable袇filename="c:\log\log"&mid(date,1,2)&mid(date,4,2)&""芃DataTable("filename",dtGlobalSheet)=filename膀Setfso=CreateObject("")螈Setfile=(filename,2,True)蚅'=====================================================(file,3,"Thebeginningofallthescripts!")"WewillstartdemoforPresidio","AAAutoTest",3,0螆螃'===========================================罿SetobjTestLib=nothing艿Setobjmsgbox=nothing螇Setfso=nothing袂Setfile=nothing蚃肀薅LoginAsAdmin芄OptionExplicit肂'=================================================================螀Dimfso,file,filename,objTestLib,objmsgbox蚆DimUI_Flag,TrueOrFlase莃'fetchfilenameformtheglobalsheet薁'filename="c:\"芆filename=("filename",dtGlobalSheet)蚈'=================================================================螅'createanewfilesystemobjecttooutputinformation羁Setfso=CreateObject("")羇Setfile=(filename,8,True)蒅SetobjTestLib=createobject("")袃'createanewsqamsgboxobject莀Setobjmsgbox=CreateObject("")螇'=================================================================(file,2,"1--Script:LoginAAsystem")蝿objmsg