主页

令我极端头痛的问题

nana12588 2009-08-13 10:19:36

本人的网站几乎没够都出现一次请求问题，服务商说我程序有问题，说请求是出现死循环，导致服务器无法正常请求，可是我不知道从程序的哪哪些文件着手，还请大虾指教

不胜感激

...全文

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

jim8590251 2009-08-17

无能为力!~我只想说这一句!~

回复赞

nana12588 2009-08-17

老大狂飙(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


<%
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

<%
....
sql=...
conn.Open connstr
set rs=...
%>
[泸州]石头(544367754) 09:13:04

<%
....
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
不要长时间开着

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

回复赞

nana12588 2009-08-17

谢谢各位

回复赞