这么简单的程序居然在释放内存有问题

[citymice]

option explicit
dim g_Cnn
dim sql
dim rs
Const strPwd = "XXXXXX"
set g_Cnn = server.createobject("adodb.connection")
g_Cnn.CommandTimeout = 30
g_Cnn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=True;User ID=" _
& "sa" & ";Initial Catalog=" & "ttzf2004" & ";Data Source=" _
& "jerry" & ";pwd=" & strPwd
g_Cnn.Open

sql="select * from house"

set rs= g_cnn.execute(sql)

do while not rs.eof
response.write rs("address") & "<BR>"
rs.movenext
loop

rs.close
set rs=nothing

g_Cnn.Close
set g_Cnn = nothing

用windows任务管理器察看sqlservr.exe 内存使用执行之后居然不会释放

奇怪，郁闷