首页 > CMS > 动易CMS > 正文

浅谈动易+动网+Oblog三方整合教程

2024-09-10 21:55:59
字体:
来源:转载
供稿:网友

整合前准备:动易目录为根目录,bbs文件夹下放置论坛源文件,blog文件夹下放置Oblog源文件。

                            一定要确保单独运行各系统正常

操作步骤一:

1、下载各个系统,并使之顺利运行。动易为网站根目录,动网在bbs文件夹内,Oblog在blog文件夹内。本地访问地址分别为:动易 http://127.0.0.1 动网 http://127.0.0.1/bbs Oblog http://127.0.0.1/blog (如果启用了域名,则这里为域名)

 

2、同步各个系统的数据,可以使用动易的数据同步程序。下载动易程序后,可以在“动易通行证——PDO_API统一接口数据同步程序”中找到,具体使用请参考使用说明。同步数据库顺序可以这样:动网数据库——动易数据库同步;Oblog数据库——动易数据库同步;动易数据库——动网数据库同步;动易数据库—— Oblog数据库同步。同步后,请进入Oblog后台,生成用户目录和相关文件

 

3、修改整合接口:

动易:API目录里,修改API_Config.asp为,

Const API_Enable = True
Const API_Key = "zdg1980"
Const API_Urls = "博客@@http://127.0.0.1/blog/api/API_Response.asp|论坛@@http://127.0.0.1/bbs/dv_dpo.asp"  

 

动网:bbsdv_dpo目录里,修改Api_Config.asp为,

Const DvApi_Enable = True
Const DvApi_SysKey = "zdg1980"
Const DvApi_Urls = "http://127.0.0.1/blog/api/API_Response.asp|http://127.0.0.1/api/API_Response.asp"

 

Oblog:blogAPI目录里,修改Api_Config.asp为,

Const API_Enable = True  
Const oblog_Key = "zdg1980"
Const strTargetUrls = "http://127.0.0.1/bbs/dv_dpo.asp|http://127.0.0.1/api/API_Response.asp"  

 

操作步骤二:

1、修改动易系统下的JS文件:JS/checklogin.js

找到下面代码处进行修改,第189行起

原文件待修改代码开始处:

$('UserLogin').innerHTML = tempstr;

            if(alogin==0)

{

   var ifrm1 = document.createElement("IFRAME"); ----------这里是要开始修改处

 

修改后代码:

if(alogin==0)
{
      var myAPIUrls = getAPIUrls(root,username,userpass)
     for (var i=0; i<myAPIUrls.length; i++){     
      var ifrm1 = document.createElement("IFRAME");
      ifrm1.src = myAPIUrls[i];
      ifrm1.height = "1";
      ifrm1.width = "1";
      ifrm1.frameborder= "0";
      document.body.insertBefore(ifrm1);
      }
                alogin = 1;
            }

function getAPIUrls(root,username,userpass){


        var iUrls = root.item(0).getElementsByTagName("apiurl");
        for (var i=0; i<iUrls.length; i++){
            strTempHTML += iUrls.item(i).text + "?syskey=" + syskey + iName + iPass + savecookie + "|";
        }
    }
       var strTempHTML = strTempHTML.substr(0, strTempHTML.length-1);
       var strTempHTML = strTempHTML.split("|");
       return strTempHTML;
}

 

或者在这里下载修改好的文件:点击下载   

         -------- (此文件适用于SW6.6版本,并向下兼容,动易程序新版本将会修正这个问题)

 

2、修改动网文件 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

       '-----------------------------------------------------------------

       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

 

 

至此,已经完成整合操作

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表

图片精选