把你的绝对路径改成相对路径,改一下你的数据库链接文件。
| 全能ASP/PHP/ASP.NET主机,支持月付 | 专业 MSSQL 数据库空间,支持月付 | 专业 MySQL 数据库空间,支持月付 | 买域名,送MP3、MP4 |
| 高端软件开发 = 年薪十万不是梦 | 赛孚耐:软件保护加密专家 | 身份认证令牌USB KEY | 买空间,免费送域名(厦门中资源) |
把你的绝对路径改成相对路径,改一下你的数据库链接文件。
可以的话,把你的数据库链接文件发上来。
<%
response.Buffer=True
Db ="database/#6.5.mdb" '数据库路径
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath(db)
SqlNowString="Now()"
SqlChar="'"
'On error Resume Next
Set conn=Server.CreateObject("ADODB.connection")
conn.open connStr
If Err Then
err.Clear
Set conn = Nothing
response.redirect "close.asp?error=1"
End If
On error GoTo 0
Function ReplaceText(fString,patrn,replStr)
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分大小写。
regEx.Global = True ' 设置全局可用性。
ReplaceText = regEx.Replace(""&fString&"",""&replStr&"") ' 作替换。
Set reg=nothing
End Function
sub CloseDatabase
conn.Close
set Rs=nothing
set Rs1=nothing
set conn=nothing
set SiteSettings=nothing
response.End
end sub
%>
是啊..我就不知道他怎么会报那个错.....不会是空间出问题了吧..谢谢你哦