我写了一段，但是有点问题。帮忙看看。
<%
action=request("action")
if action="make_excel" then'只有获取指令才进行操作
dim conn,ConnStr
ConnStr="DBQ="+server.mappath("../db/#sdoa.asa")+";DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.CreateObject("adodb.connection")
conn.Open ConnStr
dim rs,sql,filename,fs,myfile,x
Set fs = server.CreateObject("scripting.filesystemobject")
'定义文件路径，直接为当前目录
filepath=Request.ServerVariables("APPL_PHYSICAL_PATH")
'定义文件名，以当前时间作文件名，不会重复
filename = filepath&year(now)&month(now)&day(now)&".xls"
response.Write(filepath&"sss <br>")
response.Write(filename)
if fs.FileExists(filename) then
fs.DeleteFile(filename)
end if
set myfile = fs.CreateTextFile(filename,true)
Set rs = Server.CreateObject("ADODB.Recordset")
sql&nbs
<form id="form1" runat="server">
<div>
<script type="text/javascript">
function oo(a){
document.getEleme ......
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
最近我通过学习，感觉自己学的还可以了，想做一网站，但是一直都找不到题材，不知道做什么，希望各位给我点意见，如果有需求文档就更好了！希望大家给我点意见，谢谢！
先做个企业网站吧，我感觉一个人做网站不适宜 ......
我找了一个伪静态代码，如下：
index.asp
<!--#include file="config.asp"-->
<ol>
<%
Set rs=server.CreateObject("adodb.recordset") & ......
