| 对于ASP程序，用到的变量有全局变量，以及一些建立的对象。良好的ASP程序员都有释放它们的习惯，但释放与不释 放之间到底有多少差别呢？所以今天特地对它们进行了一翻测试。 测试内容：测试的全局变量有一个，对象是采用连接SQL的connection对象。 第一次测试：不释放全局变量而结束程序执行。 第二次测试：释放全局变量而结束程序执行。 测试前准备：在运行测试前等待服务器休息5分钟，保证内容及CPU已经稳定下来。 测试软硬件：服务器为平常的PIII550，内存256M。装有Win2000+IIS5.0+SQL2000 客户端一台为Win2000，采用IE5.5，开一个浏览窗口 另一客户端是Win98,IE5.0，开两个浏览窗口 共测试次数：三个客户端累计执行到20000停止。 第一次测试报告（不释放）： 开始时内存占用：146464K 开始一个客户端后内存占用：146996K CPU资源占用31-32% 开始两个客户端内存占用：147316K CPU资源占用49-52% 后面的内存变化为 -> 147304K -> 147328 开始三个客户端内存占用：147868K CPU资源占用59-69% 后面的内存变化为 -> 147868K -> 147864K -> 147856K -> 147724K -> 147828K -> 147860K -> 147868K -> 148084K -> 148076K -> 148088K -> 148040K -> 147940K 结束时内存占用：147940K 三个客户端停止请求后内存释放情况: 147940K -> 148000K -> 147988K -> 146472K -> 146448K -> 146452K 第二次测试报告（释放）： 开始时内存占用：146652K 开始一个客户端后内存占用：146996K CPU资源占用35-38% 开始两个客户端内存占用：147700K CPU资源占用55-62% 开始三个客户端内存占用：148252K CPU资源占用53-71% 后面的内存变化为 -> 148248K -> 148060K .... -> 148080K -> 148076K 结束时内存占用：147940K 三个客户端停止请求后内存释放情况: 148076K -> 147956K -> .... -> 146452 下面是两次测试在结束客户端稳定下来的内存差别： 第一次：146464-146716 = 252K 第二次：146652-146452 = -200K 第一次耗去了内存约252K，最好服务器好像再也释放不掉了 第二次很奇怪，到最后内存却节约了200K，不知是什原因。 下面是两次开始测试和结束测试一瞬时的内存使用情况： 第一次：146464-147940 = 3476K 第二次：146652-148076 = 1324K 内存使用情况第一次比第二次多了将近一倍。 这次测试说明释放变量还是有益处的，特别是当系统长期运行的，更是要注意释放变量，放可保证服务器资源不会白 白浪费而到穷尽。 ---------------------------------------------------------- 附部分测试代码test.asp： <%Option Explicit If Request("qian")="qian" Then Application("TestNumer") =0 Response.Write "重置为0!" Response.end End If If Application("TestNumer") > 20000 Then Response.Write "结束！！已经达到2000次" Response.end End If %> <!-- #include file=inc/setup.asp --> <!-- #include file=inc/popu_fun.asp --> <html> <head> <title>Untitled Document</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta http-equiv="refresh" content="0"> </head> <body bgcolor="#FFFFFF" text="#000000"> </body> </html> <%dim yp Application("TestNumer") = Application("TestNumer") + 1 Response.Write "TestNumer: " & Application("TestNumer") initDatabase("YP") initDatabase("YP") initDatabase("YP") initDatabase("YP") yp=second(time) Set yp=nothing closedatabase%> |