自定义发布模块的制作
原创RQ204先说一下什么叫自定义接口，我们在发布的时候，是将数据交给网站的程序去处理，自定义接口也是一个程序，我们是将数据交给它去处理。
我们以翼帆文章系统为例，因为它简单，易懂。主要还是讲流程，会了其它的也就不难了。看下边，这个是发布内容的页面，
这个页面是say.asp，发布时将数据提交给save.asp ,我们看一下处理的代码。
<%if session("adminlogin")<>true then response.Redirect("login.asp")%>
<!--#include file="../inc/conn.asp"-->
<%typeid=Replace(Request.Form("typeid"),"'","''")
weather=Replace(Request.Form("weather"),"'","''")
level=Replace(Request.Form("level"),"'","''")
title=Replace(Request.Form("title"),"'","''")
bz=Replace(Request.Form("message"),"'","''")
%>
<%IF weather=Empty Then weather="sunny"
IF Level=Empty Then Level="level3"%>
<%if bz="" then%>
请<a href="javascript:history.go(-1)">后退</a>填写你的内容，你才能发表日记！
<%elseif title="" then%>
请<a href="javascript:history.go(-1)">后退</a>填写标题！
<%elseif typeid="" then%>
请<a href="javascript:history.go(-1)">后退</a>选择分类！
<%else %><%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open"",conn,1,3
rs.addnew
rs("typeid")=typeid
rs("weather")=weather
rs("level")=level
rs("title")=title
rs("bz")=bz
rs("date")=now()
rs.update
newid=rs.Fields("ID")
rs.close
response.write("<script>window.open(""fsomake/show_save.asp?id="&newid&""","""",""width=200,height=100,resizable=yes,scrollbars=yes,status=yes,toolbar=no,menubar=no,location=no"")</script>")
%>
发表成功!请生成首页及相关栏目!<a href="list.asp">查看日记</a>
<%end if
set rs=nothing
%>
我们就来改造一下这个代码，实现火车的自定义接口。先去掉登陆验证代码 <%if session("adminlogin")<>true then response.Redirect("login.asp")%>，然后去掉那个生成页面的代码
response.write("<script>window.open(""fsomake/show_save.asp?id="&newid&""","""",""width=200,height=100,resizable=yes,scrollbars=yes,status=yes,toolbar=no,menubar=no,location=no"")</script>")
最后的就是我们的接口了，将这个save.asp另存为 locoy.asp ，将翼帆文章的WEB发布模块那里的发布页改为 locoy.asp就可以了。这样，我们就不用登陆，直接发布文章到系统里去了。
要生成的话选生成栏目或内容就可以了。 学习了ali68ls ali68ls呵呵！学习咯！ caijibbs.com的空间被停了 高难度，努力ing！ 支持谢谢超级版主大人 呵呵！学习咯！ 不错呀，有php接口的讲解吗？ 好贴 ~~~~~~~ 这东西如果看不懂程序语言还是做不了的~
页:
[1]
2