重复使用相同的变量

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 
%>