实验目的:验证主动释放内存变量是否有价值.

实验原始代码:

<script language=vbscript runat=server>
Dim temp1,temp2

'temp1 = space(1024*1024*50) '50MB

for i = 0 to 5000000 ' 延迟
next


'temp1="" '开关变量

'temp2 = space(1024*1024*50) '50MB

for i = 0 to 5000000 ' 延迟
next

Response.write "<meta http-equiv='refresh' content='4;url=http://localhost/memory_test.ASP'>"
</script>

内存变化截图1:


截图解释:
CPU的波形变化是由页面自动刷新引起的,不必在意!我们要观察的只是内存线的变化.这是原始状态,内存线保持水平无变化.

好,下面实验正式开始:

第一步:

把原始代码中的
'temp1 = space(1024*1024*50) '50MB
前面的注释号 ' 去掉,改成
temp1 = space(1024*1024*50) '50MB

再观察内存变化一段时间

内存变化截图2:


结果:
内存开始出现方波.

第二步:

接着也把
'temp2 = space(1024*1024*50) '50MB
前面的注释号 ' 去掉,改成
temp2 = space(1024*1024*50) '50MB

内存变化截图3:


结果:

方波比原来高了一层,成了阶梯形.

　

第三步:

接着也把
'temp1="" '开关变量
前面的注释号 ' 去掉,改成
temp1="" '开关变量

看看是否能释放第一个变量所占用的内存空间

内存变化截图4:


结果:
很明显,第二个波锋不见了,看来释放成功了.

第四步:

我们先把代码恢复成最初的原始代码,等内存平稳下来后,再把前三步快速做一次,以便在同一个截图里比较内存的变化情况.

内存变化截图5:


结果:
可以很清楚的看到三种情况的不同.无伦执行时间和内存占用,变量主动释放都比不被动释放的好.

　

第五步:

接着第三步的代码,把
temp1="" '开关变量

temp2 = space(1024*1024*50) '50MB
改成
'temp1="" '开关变量

temp1 = space(1024*1024*50) '50MB

内存变化截图6:


结果:
再看下步才给结论吧

第六步:

把
'temp1="" '开关变量

改成
temp1="" '开关变量


看看结果会不会有所不同

内存变化截图7:


结果:
用同一个变量名,即使再重新赋值,原来的占用过的空间也得不到释放或替换,而且等程序被动释放时,使用的时间也比手动的慢.

下面把
temp1="" '开关变量

temp1 = space(1024*1024*50) '50MB

调换一下两句的位置
temp1 = space(1024*1024*50) '50MB

temp1="" '开关变量

后的截图8:


结果:
可以看出主动释放比被动的所需要的时间要少.

实验结论:
主动来释放内存是有作用的,不是某些人所说的要等页面结束才能释放掉,或者只是呆等程序结束再自动释放,而是在执行过程中也可以人为控制的.特别是程序中需要调用到几个大体积的变量时,尽快释放掉已无用的变量,不但可以减轻服务器的负担,也可以加快程序的运行.
如果发现此实验过程或结论有误,欢迎指正.

最后,关于用"" ,empty 或 null 来释放,结果基本是一样,有兴趣的可以自己亲自动手比较试试.至于说用哪个来释放变量更正规或更有效率,我无法在次实验中判断出来,希望知道的朋友来指教.

　

附:另外一个不大相关实验

<% %>内是否有内容的区别(包括注释)

实验代码:

<meta http-equiv='refresh' content='4;url=http://localhost/memory_test.ASP'>
<script language=vbscript runat=server>
Dim temp1,temp2

temp1 = space(1024*1024*50) '50MB

for i = 0 to 5000000 ' 延迟
next

'temp1="" '开关变量

'temp2 = space(1024*1024*50) '50MB

for i = 0 to 5000000 ' 延迟
next


</script>
<%
'
%>

　

实验结果:

1.<% %>内无内容,内存不变化

2.<% %>只有一个 ' 号,内存开始变化

改变前后对比图9:



结果:
<% 与 <script language=vbscript runat=server> 的先后位置无关,但似乎只要 <% %> 内有内容,就会执行 <script language=vbscript runat=server></script> 内的代码.但只要把<script language=vbscript runat=server></script> 替换成 <% %>,就会执行<% %>内的代码,所以以后要注意两者的混用.

还有,在<script language=vbscript>中的这种页面脚本,除非页面被关掉,否则所用过的变量不会像ASP一样自动清除.可以从下面的代码得到证实:

<script language=vbscript>
Dim temp
temp = space(1024*1024*50) '50MB
'temp = ""
</script>

注意去掉注释号前后的内存的占用变化,不再截图说明.