自动建站.实现虚拟二级目录
2004-11-11 11:05
621 查看
以前写了一个自动生成网站的建站系统.可是最近要写一个不要自动生成,而是要做到:
http://www.cnsnc.cn/用户名
所以我想一个用户建立一个目录.可是我想如果上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.cnsnc.cn/用户名
所以我想一个用户建立一个目录.可是我想如果上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多个目录了.
相关文章推荐
- 用Ole Automation实现Delphi和AutoCad之间的数据交换
- oracle中的分页
- Hibernate Tool & Files
- 獲取SQL SERVER用戶表信息游標
- 一个画图类,类似ms_chart的线图,适用于科学仿真数据分析(二)
- 一个画图类,类似ms_chart的线图,适用于科学仿真数据分析(一)
- Ant应用(1)
- Ant应用(2)
- Thinking in C++ 卷2中文版
- 如何在VB例程中接收自定义消息
- UML应用点滴积累
- servlet的2种重定向方法
- Mysql中左连接的使用
- 移居csdn,今天想到自己的写shell的能力需要提高~
- SymbianOS Series 60学习笔记三:数据库初探
- 让IIS启动成功!
- Self-Deleting Executables
- Phrack最新公布的内核态RootKit的技术细节(e文)
- Advances in Windows Shellcode
- UBB代码的实现(ASP)