|
原创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"[bbs]",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就可以了。这样,我们就不用登陆,直接发布文章到系统里去了。
要生成的话选生成栏目或内容就可以了。 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?加入会员
x
|