实验目的:验证主动释放内存变量是否有价值.
实验原始代码:
<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
<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>
再观察内存变化一段时间
内存变化截图2:
结果:内存开始出现方波。
第二步:
接着也把
'temp2 = space(1024*1024*50) '50MB
前面的注释号 ' 去掉,改成
temp2 = space(1024*1024*50) '50MB
<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>
内存变化截图3:
结果:方波比原来高了一层,成了阶梯形。
第三步:
接着也把
'temp1="" '开关变量
前面的注释号 ' 去掉,改成
temp1="" '开关变量
<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>
看看是否能释放第一个变量所占用的内存空间
内存变化截图4:
结果:很明显,第二个波锋不见了,看来释放成功了。
第四步:
我们先把代码恢复成最初的原始代码,等内存平稳下来后,再把前三步快速做一次,以便在同一个截图里比较内存的变化情况。
内存变化截图5:
结果:可以很清楚的看到三种情况的不同。无伦执行时间和内存占用,变量主动释放都比不被动释放的好。
第五步:
接着第三步的代码,把
temp1="" '开关变量
temp2 = space(1024*1024*50) '50MB
改成
'temp1="" '开关变量
temp1 = space(1024*1024*50) '50MB
<script language=vbscript runat=server>
Dim temp1,temp2
temp1 = space(1024*1024*50) '50MB
for i = 0 to 5000000 ' 延迟
next
'temp1="" '开关变量
temp1 = 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>
内存变化截图6:
结果:再看下步才给结论吧
第六步:
把
'temp1="" '开关变量
改成
temp1="" '开关变量
<script language=vbscript runat=server>
Dim temp1,temp2
temp1 = space(1024*1024*50) '50MB
for i = 0 to 5000000 ' 延迟
next
temp1="" '开关变量
temp1 = 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>
看看结果会不会有所不同
内存变化截图7:
结果:用同一个变量名,即使再重新赋值,原来的占用过的空间也得不到释放或替换(截图6说明),而且等程序被动释放时,使用的时间也比手动的慢(综合截图6、7说明)。
下面把
temp1="" '开关变量
temp1 = space(1024*1024*50) '50MB
调换一下两句的位置
temp1 = space(1024*1024*50) '50MB
temp1="" '开关变量
<script language=vbscript runat=server>
Dim temp1,temp2
temp1 = space(1024*1024*50) '50MB
for i = 0 to 5000000 ' 延迟
next
temp1 = space(1024*1024*50) '50MB
temp1="" '开关变量
for i = 0 to 5000000 ' 延迟
next
Response.write "<meta http-equiv='refresh' content='4;url=http://localhost/memory_test.ASP'>"
</script>
后的截图8:
结果:可以看出主动释放比被动的所需要的时间要少(波峰尖)
实验结论:
主动来释放内存是有作用的,不是某些人所说的要等页面结束才能释放掉,或者只是呆等程序结束再自动释放,而是在执行过程中也可以人为控制的。特别是程序中需要调用到几个大体积的变量时,尽快释放掉已无用的变量,不但可以减轻服务器的负担,也可以加快程序的运行。
如果发现此实验过程或结论有误,欢迎指正。
最后,关于用"",empty 或 null 来释放,结果基本是一样,有兴趣的可以自己亲自动手比较试试。至于说用哪个来释放变量更正规或更有效率,我无法在此实验中判断出来,希望知道的朋友来指教。
(出处:Viphot)
实验原始代码:
<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
<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>
再观察内存变化一段时间
内存变化截图2:
结果:内存开始出现方波。
第二步:
接着也把
'temp2 = space(1024*1024*50) '50MB
前面的注释号 ' 去掉,改成
temp2 = space(1024*1024*50) '50MB
<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>
内存变化截图3:
结果:方波比原来高了一层,成了阶梯形。
第三步:
接着也把
'temp1="" '开关变量
前面的注释号 ' 去掉,改成
temp1="" '开关变量
<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>
看看是否能释放第一个变量所占用的内存空间
内存变化截图4:
结果:很明显,第二个波锋不见了,看来释放成功了。
第四步:
我们先把代码恢复成最初的原始代码,等内存平稳下来后,再把前三步快速做一次,以便在同一个截图里比较内存的变化情况。
内存变化截图5:
结果:可以很清楚的看到三种情况的不同。无伦执行时间和内存占用,变量主动释放都比不被动释放的好。
第五步:
接着第三步的代码,把
temp1="" '开关变量
temp2 = space(1024*1024*50) '50MB
改成
'temp1="" '开关变量
temp1 = space(1024*1024*50) '50MB
<script language=vbscript runat=server>
Dim temp1,temp2
temp1 = space(1024*1024*50) '50MB
for i = 0 to 5000000 ' 延迟
next
'temp1="" '开关变量
temp1 = 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>
内存变化截图6:
结果:再看下步才给结论吧
第六步:
把
'temp1="" '开关变量
改成
temp1="" '开关变量
<script language=vbscript runat=server>
Dim temp1,temp2
temp1 = space(1024*1024*50) '50MB
for i = 0 to 5000000 ' 延迟
next
temp1="" '开关变量
temp1 = 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>
看看结果会不会有所不同
内存变化截图7:
结果:用同一个变量名,即使再重新赋值,原来的占用过的空间也得不到释放或替换(截图6说明),而且等程序被动释放时,使用的时间也比手动的慢(综合截图6、7说明)。
下面把
temp1="" '开关变量
temp1 = space(1024*1024*50) '50MB
调换一下两句的位置
temp1 = space(1024*1024*50) '50MB
temp1="" '开关变量
<script language=vbscript runat=server>
Dim temp1,temp2
temp1 = space(1024*1024*50) '50MB
for i = 0 to 5000000 ' 延迟
next
temp1 = space(1024*1024*50) '50MB
temp1="" '开关变量
for i = 0 to 5000000 ' 延迟
next
Response.write "<meta http-equiv='refresh' content='4;url=http://localhost/memory_test.ASP'>"
</script>
后的截图8:
结果:可以看出主动释放比被动的所需要的时间要少(波峰尖)
实验结论:
主动来释放内存是有作用的,不是某些人所说的要等页面结束才能释放掉,或者只是呆等程序结束再自动释放,而是在执行过程中也可以人为控制的。特别是程序中需要调用到几个大体积的变量时,尽快释放掉已无用的变量,不但可以减轻服务器的负担,也可以加快程序的运行。
如果发现此实验过程或结论有误,欢迎指正。
最后,关于用"",empty 或 null 来释放,结果基本是一样,有兴趣的可以自己亲自动手比较试试。至于说用哪个来释放变量更正规或更有效率,我无法在此实验中判断出来,希望知道的朋友来指教。
(出处:Viphot)
华山资源网 Design By www.eoogi.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
华山资源网 Design By www.eoogi.com
暂无评论...
稳了!魔兽国服回归的3条重磅消息!官宣时间再确认!
昨天有一位朋友在大神群里分享,自己亚服账号被封号之后居然弹出了国服的封号信息对话框。
这里面让他访问的是一个国服的战网网址,com.cn和后面的zh都非常明白地表明这就是国服战网。
而他在复制这个网址并且进行登录之后,确实是网易的网址,也就是我们熟悉的停服之后国服发布的暴雪游戏产品运营到期开放退款的说明。这是一件比较奇怪的事情,因为以前都没有出现这样的情况,现在突然提示跳转到国服战网的网址,是不是说明了简体中文客户端已经开始进行更新了呢?
更新日志
2024年12月24日
2024年12月24日
- 小骆驼-《草原狼2(蓝光CD)》[原抓WAV+CUE]
- 群星《欢迎来到我身边 电影原声专辑》[320K/MP3][105.02MB]
- 群星《欢迎来到我身边 电影原声专辑》[FLAC/分轨][480.9MB]
- 雷婷《梦里蓝天HQⅡ》 2023头版限量编号低速原抓[WAV+CUE][463M]
- 群星《2024好听新歌42》AI调整音效【WAV分轨】
- 王思雨-《思念陪着鸿雁飞》WAV
- 王思雨《喜马拉雅HQ》头版限量编号[WAV+CUE]
- 李健《无时无刻》[WAV+CUE][590M]
- 陈奕迅《酝酿》[WAV分轨][502M]
- 卓依婷《化蝶》2CD[WAV+CUE][1.1G]
- 群星《吉他王(黑胶CD)》[WAV+CUE]
- 齐秦《穿乐(穿越)》[WAV+CUE]
- 发烧珍品《数位CD音响测试-动向效果(九)》【WAV+CUE】
- 邝美云《邝美云精装歌集》[DSF][1.6G]
- 吕方《爱一回伤一回》[WAV+CUE][454M]