[求助]脚本运行超时错误

程序运行报告脚本运行超时，请大家帮忙看看是不是程序有错误，谢谢。（数据库在局域网服务器上，BODY是服务器名）
conn.asp
<%
'''''''''''''''''''''''''''''''''SQL数据库 ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
SqlLocalName ="body" '连接IP [ 本地用 (local) 外地用IP ]
SqlUsername ="sa" '数据库用户名
SqlPassword ="newsun-sqlserver" '用户密码
SqlDatabaseName="keanenew" '数据库名
ConnStr = "Provider=Sqloledb;User ID=" & SqlUsername & "; Password=" & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source=" & SqlLocalName & ";"
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
%>
<%
On Error Resume Next
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.open ConnStr
%>
<%
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "<div style='font-size:14px;color=#ff0000' align='center'>数据库连接出错，请检查数据库连接字串</div>"
Response.End
End If
%>


diaoyong.asp
<!--#include file="conn.asp" -->
<%
conn.open connstr
sql="select * from bt_ybfzxx where (yqdh='AU600')"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<%do while not rs.eof%>
<td><%=rs("yqdh")%></td>
<td><%=rs("cdrq")%></td>
<td><%=rs("ybbh")%></td>
<td><%=rs("xmdh")%></td>
<td><%=rs("xmcdz")%></td>
</tr>
<%
rs.movenext
loop
%>
<%
conn.close
set conn=nothing
%>