搜虎精品社区 › 〖源码互助悬赏〗 › 请问临沂市场信息网CMS8.0怎样绑定域名

jiaxin11 发表于 2009-9-9 10:27:58

请问临沂市场信息网CMS8.0怎样绑定域名

我在网上下载个临沂市场信息网CMS8.0，但是提示数据库连接出错，请检查连接字串。
我知道要绑定域名的但是不知道怎样绑定请问大家怎样绑定？？？

阿浩 发表于 2009-9-9 11:41:26

分析一下源码
这个你找连接数据库conn文件，用dw新建站点后全站搜索一下就可找到

jiaxin11 发表于 2009-9-9 13:51:57

<%@ LANGUAGE = VBScript CodePage = 936%>
<!--#include file="mdbname.asp"-->
<%
'本程序作者：中国蓝狐
'官方网站：快网科技[www.kuaiwww.com]
'如果您商用，请联系购买正版，本程序受法律保护
'尊重劳动，享受服务，售后跟踪支持
%>
<%
Response.Buffer =True
Response.ExpiresAbsolute = Now() - 1
Response.Expires = 0
If err.number<>0 Then   
Response.Write(err.description)   
Response.End()   
End If
On Error Resume Next
Dim strTemp,hk
If Trim(Request.QueryString) <> "" Then strTemp =Trim (Request.QueryString)
strTemp = LCase(strTemp)
hk=0
'以下是定义要过滤的字符，不够可以自己添加。
If Instr(strTemp,"%")<>0 then hk=1
If Instr(strTemp,"count(")<>0 then hk=1
If Instr(strTemp,"asc(")<>0 then hk=1
If Instr(strTemp,"mid(")<>0 then hk=1
If Instr(strTemp,"char(")<>0 then hk=1
If Instr(strTemp,"xp_cmdshell")<>0 then hk=1
If Instr(strTemp,"'")<>0 then hk=1
If Instr(strTemp,"union")<>0 then hk=1
If Instr(strTemp,"document.cookie")<>0 then hk=1
If Instr(strTemp,"document")<>0 then hk=1
If Instr(strTemp,"javascript")<>0 then hk=1
if hk=1 then
'当有以上任一特征码的时候就弹出提示阻止。
Response.Write "<script language='javascript'>"
Response.Write "alert('含有非法字符！！');"
Response.Write "history.back();"
Response.Write "</script>"
response.end
hk=0
End If

Dim Startime,Conn
Dim SqlString
Dim ConnStr
Startime = Timer()
'主数据
connstr = "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = " & Server.MapPath(MyDbPath & Dbname)
        On error Resume Next
        Set conn = server.createObject("ADODB.Connection")
        conn.open ConnStr
        if err Then
                err.clear
                Set Conn = nothing
                response.Write "数据库连接出错，请检查连接字串。"
                response.end
        end if
'//-------------------------------------------------------------
'IP地址
                Set CiP=server.createobject("ADODB.CONNECTION")
                costr="Provider = Microsoft.Jet.OLEDB.4.0;Data Source =" & Server.MapPath(MyDbPath & Las真美妙bName)
                CiP.open costr
        if err Then
                err.clear
                Set CiP = nothing
                response.Write "数据库连接出错，请检查连接字串。"
                response.end
        end if
Sub CloseConn()
    Conn.close
    set Conn=nothing
    Cip.close
    set CiP=nothing
End Sub
%>

jiaxin11 发表于 2009-9-9 13:53:54

上面哪个是麻烦帮忙看看·

fengliuqiao. 发表于 2009-9-9 23:35:30

看看``学习学习```

飘云 发表于 2009-9-13 08:15:55

你用的是什么数据库呢？

show5 发表于 2009-9-26 12:22:43

临沂市场信息网CMS8.0 需要域名授权的 不知道你的版本是否是的破解版!

苦涩 发表于 2009-10-15 03:45:03

临沂市场信息网CMS8.0域名授权?

caizai 发表于 2009-12-1 10:33:07

我也想知道。。。

wwwsdcn 发表于 2010-1-23 15:31:36

那是银狐的作品，上传到您的空间，通过网页 http://您的域名/install.asp,进行安装，安装过程中自动**您的域名。

查看完整版本: 请问临沂市场信息网CMS8.0怎样绑定域名