急急急急急急！
加我Q~~传你艾恩德无组件上传~458012374
试试这个，无组件上传，里面有好几种的http://www.asp300.com/View/10/28639.html
百度搜索一下“化境无组件上传”或者“eWebEditor在线编辑器”
用ACCESS数据库的
<!--#include file="check.asp" -->
<!--#include file=conn.asp-->
<%
If Request.querystring("act")="del" then
set rs=server.createobject("ADODB.recordset")
id=Request.form("id")
sql="select * from pic where id="&id
rs.open sql,conn,1,3
rs.delete
rs.update
rs.close
set rs=nothing
response.redirect "sbc-pic.asp?xiangmuID="&request.QueryString("xiangmuID")
End if
If Request.querystring("act")="add" then
set rs=server.createobject("ADODB.recordset")
sql="select * from pic"
rs.open sql,conn,1,3
Rs.AddNew
rs("url")=trim(request.Form("pic1"))
rs("xiangmuID")=request.querystring("xiangmuID")
rs.update
rs.close
set rs=nothing
response.redirect "sbc-pic.asp?xiangmuID="&request.QueryString("xiangmuID")
End if
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Ty
由于对页面使用了伪静态
并且对ID进行了加密。
主要代码如下：
httpd.ini
RewriteRule /List-([0-9,a-z]*).html /List.asp\?ComId=$1 [N,I]
程序代码
A为加密，B为解密函数
<a href=&q ......
