|
回复小黄牛:该程序使用几天之后会出现“网站日常维护中!” 估计是后台数据库的设置问题! 请高手解决一下!
conn.asp文件
<!--#include file="const.asp"-->
<%
If IsObject(Conn) = false Then
'On Error Resume Next
set conn = Server.CreateObject("ADODB.Connection")
conn.Open conndata
If Err.Number <> 0 Then
Response.write "系统日常维护中!"
Response.End()
end if
end if
%>
================================================
const.asp文件
<!--#include file="ubb.asp"-->
<!--#include file="data.asp"-->
<%If IsObject(contt) = false Then
'if Application("citycss")="" or Application("citycss")<>"" then
On Error Resume Next
set contt = Server.CreateObject("ADODB.Connection")
contt.Open "driver={sql server};server=(local);uid=sa;pwd=sa;database=smt;"
If Err.Number <> 0 Then
Response.write "系统日常维护中!"
Response.End()
end if
'end if
SMT_citytime=now()
SMT_citydate=date()
set rs=server.createobject("adodb.recordset")
sql="select * from SMT_config"
rs.open sql,contt,1,1 |
|