动易动网整合
动易动网整合
整合过程:
1.下载各个系统,并使之顺利运行。动易为网站根目录,动网在bbs文件夹内,本地访问地址分别为:动易 http://127.0.0.1 动网 http://127.0.0.1/bbs
2、同步各个系统的数据,可以使用动易的数据同步程序。下载动易程序后,可以在“动易通行证——PDO_API统一接口数据同步程序”中找到,具体使用请参考使用说明。同步数据库顺序可以这样:
动网数据库——动易数据库同步; 动易数据库——动网数据库同步;
3、修改整合接口:
动易:在API目录里,修改API_Config.asp为,
Const API_Enable = True
Const API_Key = "同步登录密钥(自己设置)"
Const API_Urls = "论坛@@http://127.0.0.1/bbs/dv_dpo.asp"
动网:在bbs的dv_dpo目录里,修改Api_Config.asp为,
Const DvApi_Enable = True
Const DvApi_SysKey = "同步登录密钥(自己设置同上)"
Const DvApi_Urls = "http://127.0.0.1/api/API_Response.asp"
4. 登录测试;
在测试中,在动网的“登陆”界面(不是首页的登陆框,而是单独的登陆页面)登陆,出现错误提示:Response 对象 错误 'ASP 0156 : 80004005'
HTTP 头错误
/bbs/login.asp,行 229
已将 HTTP 头输出到客户端浏览器。任何对 HTTP 头的修改都必须在输出页内容之前进行。
其实,这是动网的login.asp中有点bug。修改过程很简单,
动网原来login.asp
第210-231行
'系统整合
'-----------------------------------------------------------------
If DvApi_Enable Then
Response.Write DvApi_SaveCookie
Response.Flush ------------------------------!!!这是出现错误的地方!!!
End If
'-----------------------------------------------------------------
TempStr = Replace(TempStr,"{$ray_logininfo}","")
TempStr = Replace(TempStr,"{$comeurl}",comeurl)
TempStr = Replace(TempStr,"{$comeurlinfo}",comeurlname)
TempStr = Replace(TempStr,"{$forumname}",Dvbbs.Forum_Info(0))
Session.Contents.Remove("xcount")
If Not ajaxPro And DvApi_Enable Then'非ajax
Response.Write TempStr
ElseIf Not ajaxPro And Not DvApi_Enable Then
Response.Redirect(comeurl)
Else
Response.Cookies("count")=""'o(清空ajax里写入的cookies)
strString(comeurl&"@@@@1")'o
End If
修改后代码(将以上代码替换成以下代码即可):(其实就是将Response.Flush换了个位置而已)
'系统整合
'-----------------------------------------------------------------
If DvApi_Enable Then
Response.Write DvApi_SaveCookie
End If
'---------------------
5、动易注册 提示:找不到模板
解决方法:登录后台---用户管理---会员模板页管理---所有模板
--2006海蓝注册信息页模板(海蓝方案)---设为系统默认---OK