看不懂 谁能帮帮我？

老大狂飙(362803818) 09:05:50
各位老大  服务上老说我网站数据没有释放  我该如何办

[泸州]石头(544367754) 09:06:20
set obj=nothing
老大狂飙(362803818) 09:06:35
什么意思老大

[泸州]石头(544367754) 09:08:08
set rs=nothing
set conn=nothing
老大狂飙(362803818) 09:08:41
<!--#include file="mdb_name.asp"-->
<!--#include file="../xgx/CF_Sql.asp"-->
<%
dim conn
dim connstr
dim db
db="/xgx/data/"&MDBname&".asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr

%>
[泸州]石头(544367754) 09:09:28
conn.Open connstr放到页面里面
[泸州]石头(544367754) 09:09:34
用的时候再打开
老大狂飙(362803818) 09:10:06
如何写呀

老大狂飙(362803818) 09:10:14
不会写 请石头大哥指教


[泸州]石头(544367754) 09:10:29
conn.Open connstr
[泸州]石头(544367754) 09:10:40
就这么写啊
[泸州]石头(544367754) 09:10:52
只是放的位置不同
[泸州]石头(544367754) 09:11:01
或者写一个过程,直接调用
老大狂飙(362803818) 09:11:31
直接填到这个问题里面》

老大狂飙(362803818) 09:12:15
<%
dim conn
dim connstr
dim db
conn.Open connstr
db="/xgx/data/"&MDBname&".asp"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr

%>
[泸州]石头(544367754) 09:12:17
<!--#include file="conn.asp" -->
<%
....
sql=...
conn.Open connstr
set rs=...
%>
[泸州]石头(544367754) 09:13:04
<!--#include file="conn.asp" -->
<%
....
sql=...
conn.Open connstr
set rs=...
....
rs.close
set rs=nothing
conn.close
set conn=nothing
%>
基本格式
老大狂飙(362803818) 09:13:40
在另写一个文件？  中间的省略的是什么


[泸州]石头(544367754) 09:13:43
我一般都是写成过程
[泸州]石头(544367754) 09:13:56
省略的就是你执行的其他代码
老大狂飙(362803818) 09:14:20
大哥 你还是帮我完整的写完吧 我真的不会搞


[泸州]石头(544367754) 09:14:29
sub project5()
OpenConn()
Dim sql : sql = "select * from [jj_product] where projectid = " &projectid
Dim rs : Set rs = conn.execute(sql)
do while not rs.eof
xmlStr=xmlStr& " <item productid='" & rs("id") & "' productName='" & rs("productName") & "' scale='" & rs("scale") & "'/>" &vbcrlf
rs.movenext
loop
Co(rs) : CloseConn()
end sub
[泸州]石头(544367754) 09:14:42
这是完整的例子
[泸州]石头(544367754) 09:15:37
OpenConn()打开数据库连接
...执行查询
Co(rs) 关闭记录集
CloseConn()关闭连接
[泸州]石头(544367754) 09:17:45
记着及时释放资源就行了
[泸州]石头(544367754) 09:18:07
记录集要在最短的时候内关闭
[泸州]石头(544367754) 09:18:12
不要长时间开着


谁能帮我把石头的意思 把完整的程序写出来  这个分就是他的了