当前位置: 代码迷 >> ASP >> 从服务器上下载的网站源代码在本地IIS测试不能运行,怎么处理
  详细解决方案

从服务器上下载的网站源代码在本地IIS测试不能运行,怎么处理

热度:100   发布时间:2012-06-15 19:37:05.0
从服务器上下载的网站源代码在本地IIS测试不能运行,怎么办?
<!--#include file="../include/MainClass.asp" -->
<%
Dim Rs,Conn,SqlConnectionString,Righttrue,SqlCount,UserTrue,MaxP,Territory
SqlCount=0'初始化数据库查询次数
'###############设置开始####################

Const WebDir="/"'网站目录,如果直接放在根目录则为CityBlogDir="/",放别的目录如"/blog/",注意最后要加/
Const DbPath="DataBase/BaseSJ.mdb"
'以上必须设置过,否则系统会出错

Const WebName="XXX"'网站名称
Const CopyRight="后台管理系统 " '网站版权
Const SmtpServer = "smtp.163.com"
Const SmtpUser = "longzhiyu52"
Const SmtpPwd = "61083083"
Const SmtpEmail = " "
Const Mailname="网上反馈"
'###############设置结束####################
UserTrue=false
Righttrue=true
Territory="http://"&Request.ServerVariables("HTTP_HOST")
SqlConnectionString="DBQ="+server.mappath(WebDir & DbPath)+";DRIVER={Microsoft Access Driver (*.mdb)};"
'SqlConnectionString="Provider=SQLOLEDB.1;Password='joleo#**';Persist Security Info=True;User ID='joleo';Initial Catalog='fandian';Data Source='61.129.68.20.'"
'On Error resume next
Set conn= Server.CreateObject("ADODB.Connection")
conn.open SqlConnectionString
If Err.number<>0 Then
  err.Clear
  Set Conn = Nothing
  Response.Write "数据库连接出错,您设置的数据库:<br/>相对路径为:" & WebDir & DbPath & ",<br/>绝对路径为:"& server.mappath(WebDir & DbPath) &"。<br/>请检查数据库路径是否正确!Include/Config.asp文件。"
  Response.End
End If
Set Joleo=New MainClass
%>

这些在服务器上运行http://www.longzhiyu.com都是很正常的啊,是不是在本地测试需要更改一些什么呢? 


------解决方案--------------------
Const WebDir="/"'网站目录,如果直接放在根目录则为CityBlogDir="/",放别的目录如"/blog/",注意最后要加/

本地你应该设置为虚拟目录了,那这个地方就要改
  相关解决方案