衡水网站建设,衡水网络公司,衡水做网站,衡水网站制作,安平网站建设,安平网站优化,冀州网站建设,武强网站建设,衡水做网站的公司

我们是技术出身,不擅长花言巧语
我们只专心为客户提供实实在在、看得见的技术与服务!

业内动态

无限互联 无尽商机 成就你我 传递价值!

Unlimited Internet endless business opportunities to achieve your value to me!首页  »  新闻中心  »  业内动态

另一个站如何调用最新版本z-blog的最新日志的方法

来源:http://www.chaofan.biz/  发布者:网站建设 发布时间:2011-11-8 8:54:52 浏览量:
 最近,在我的网站衡水网站建设上安装了个z-blog博客程序,想把博客的最新文章调用到网站的首页,到百度上搜索了一些资料,结合自己的方法,终于成功了,它把最新日志直接通过asp的response.write写入到网页源文件里,这样适合百度等搜索引擎的收录,这个方法只能适用于博客和网站是同一个空间里德,不能跨站调用,现在把方法说说:

第一,在z-blog根目录下的FUNCTION目录下找到c_system_base.asp文件,打开此文件找到

Call SaveToFile(BlogPath & "/include/previous.asp",strPrevious,"utf-8",True)这段代码,在它的下面插入

Call SaveToFile(Left(BlogPath,len(BlogPath)-5) & "/include/t_previous.htm",strPrevious,"GB2312",True)这段代码的意思就是在你的网站的blog目录前面的网站的include文件夹里写入你要调用的最新日志的列表页t_previous.htm,保存后到博客后台里重建网页,然后要调用日志的网站include目录下看看,会发现多了一个t_previous.htm的文件,打开看,里面就是你博客的最新日志列表。

第二,在你要调用日志的页面里,插入如下asp代码,比如我的是想在网站的首页http://www.chaofan.biz/index.asp这个页面调用博客http://www.chaofan.biz//blog里最新日志,那么在index.asp需要插入日志列表的地方加入如下代码:

<%
Set fso = Server.CreateObject("Scripting.FileSystemObject")
ProcFilePath=server.MapPath("include/t_previous.htm")
Set templates = fso.OpenTextFile(ProcFilePath,1,true,-2)
str=templates.readall()'读出结果,赋值给str
set fso=nothing
set templates=nothing
str = split(str,"</li>") '分析t_previous.htm的代码,会发现文章跟文章之间都有</li>这个代码,我们通过</li>来把文章列表进行循环输出

response.Write replace(str(0),"<li>","")
Response.Write replace(str(1),"<li>","")
Response.Write replace(str(2),"<li>","")
Response.Write replace(str(3),"<li>","")
Response.Write replace(str(4),"<li>","")

'上面的response.write就是输入日志的标题和链接了,上面输入的是5条最新日志,如果需要更多,可以自己添加如Response.Write replace(str(5),"<li>","")
%>

这样,最日日志列表就调用到首页了,希望对需要的朋友有所帮助


(转载请注明转自:http://www.chaofan.biz 谢谢!)
  • 60天打造网络营销的主战场!

    专业独家定位策划;三站合一网络营销系统助力更多的关键词上百度首页!

  • 180天快速见效

    专业营销人员协助客户进行网络推广有效快速提升网站转化率,180天快速见效!

  • 打破潜规则,帮你打造团队!

    为您打造一支高效率网络营销运营团队,让你自主操盘网络营销!让你的网络营销真正落地!

  • 7*24小时售后服务保障

    云商衡水网站建设团队将以专业的态度,为您提供100%的专业服务!
    网站有问题3分钟内即可作出反馈