用ASP实现自动建站.实现虚拟二级目录
类别: ASP教程
以前写了一个自动生成网站的建站系统.可是最近要写一个不要自动生成,而是要做到:
http://www.4ico.com/用户名
所以我想一个用户建立一个目录.可是我想如果上W个用户.那不是我要建立上W个目录.
所以我采用IIS的404错误和对错误信息的分析写了一个自动转向的代码.
先把IIS的所有404错误.指到:URL:/website.asp?webname=$V
然后在网站的根目录下面建立一个:
website.asp
\'-----------------内容如下-------------------\'
<%@ codepage ="936" %>
<!--#include file="conn/dbconn.asp"-->
<%
WebName=trim(Request.QueryString("WebName"))
WebName=right(WebName,len(WebName)-Instr(WebName,"80")-2)
Set rs = Conn.Execute("Select ID from Qyml where User=\'"&WebName&"\'")
if rs.eof then
Response.write("文件没有找到!")
Else
Response.redirect("/show/index.asp?id="&rs("ID"))
end if
%>
\'------------------------------------------------\'
OK,完全实现了,不用建立N多个目录了.
http://www.4ico.com/用户名
所以我想一个用户建立一个目录.可是我想如果上W个用户.那不是我要建立上W个目录.
所以我采用IIS的404错误和对错误信息的分析写了一个自动转向的代码.
先把IIS的所有404错误.指到:URL:/website.asp?webname=$V
然后在网站的根目录下面建立一个:
website.asp
\'-----------------内容如下-------------------\'
<%@ codepage ="936" %>
<!--#include file="conn/dbconn.asp"-->
<%
WebName=trim(Request.QueryString("WebName"))
WebName=right(WebName,len(WebName)-Instr(WebName,"80")-2)
Set rs = Conn.Execute("Select ID from Qyml where User=\'"&WebName&"\'")
if rs.eof then
Response.write("文件没有找到!")
Else
Response.redirect("/show/index.asp?id="&rs("ID"))
end if
%>
\'------------------------------------------------\'
OK,完全实现了,不用建立N多个目录了.
- 上一篇: 如何使用ASP建立虚拟的FTP服务器
- 下一篇: ASP关于动态数据显示页面得锚点
-= 资 源 教 程 =-
文 章 搜 索