重複使用相同的變量

Question

是否有方法將dim變量設置爲在同一個fs內和x。或者每次我在頁面上運行代碼時都必須創建一個唯一變量？

<% 
itemnum = 1 
dim fs,fo,x 

fs=Server.CreateObject("Scripting.FileSystemObject") 
set fo=fs.GetFolder(Server.MapPath("/images")) 

... 
%> 

下一節...

<% 
itemnum = 1 
dim fs,fo,x 

fs=Server.CreateObject("Scripting.FileSystemObject") 
set fo=fs.GetFolder(Server.MapPath("/videos")) 

... 
%> 

Answer 1

你只需要在你的頁面的頂部變暗一次，然後你可以爲你喜歡重複使用它多次（無需重新-dim /重新創建fso對象，只要你的代碼具有相同的作用域（頁面/包含集合）） - 即使你進出asp塊。

例（全部在一個ASP文件）：

<% 
'#### Declare objects and initialise FSO (only has to be done once per request) 
dim fs,fo,x 
set fs = Server.CreateObject("Scripting.FileSystemObject") 
%> 
bla bla bla 
<% 
set fo=fs.GetFolder(Server.MapPath("/images")) 
'Do something with the images folder 
%> 
bla bla bla 
<% 
set fo=fs.GetFolder(Server.MapPath("/videos")) 
'Do something with the videos folder 
%> 
bla bla bla 
<% 
'#### Cleanup 
set fo = Nothing 
set fs = Nothing 
%>