'Fenlei.asp $ ^# Y) K' Z5 |/ c6 d) C4 R
: G9 Y2 o) C5 E# g4 V, OIF Request.QueryString("Action")="del" Then
3 K$ k3 B7 |$ W% M oID=Request.QueryString("ID")
, X$ a+ y7 z/ ]8 s* oIF Countss ("tui","Fenlei",ID )<>0 then 3 r0 m6 h. j/ j* I2 q* d
'略
4 j# ^# _9 I5 g! x F: Z7 J& qIF Request.QueryString("Action")="Add" Then
. ?' u+ m& r7 W; QTname=Request.Form("Typename")
# Y$ @- z: R% @Set Rs=Server.CreateObject("adodb.Recordset") * |2 r/ V1 j$ O& I( f, Y& c* j
Sql="Select * From Fenlei Order by id Desc "
, y$ T' R6 r* h* jRs.Open Sql,Conn,1,3 + b, M9 q& ^" g3 W& J( Z. ?
Rs.Addnew
: v4 n' n8 [, C. m( URs("Typename")=Tname
0 a2 h; N# T( G$ f3 [& j'略 % t- [, M# @) u2 e7 F
Set Rs=Server.CreateObject("adodb.Recordset")
( {/ I. g+ T7 [2 w' XSql="Select * From Fenlei Order by id Desc "
7 I5 ^+ z! ]& ]6 I0 S B: U6 i% qRs.Open Sql,Conn,1,1 6 A2 \& q# N# {/ l, U& ~. E, p5 _
'略
$ F! I* P1 e8 z- ]$ d%>
! r# X- ~7 d5 B+ | 5 S; l+ P8 z/ A
7 f- ~' [, F( u; i! A - M' B$ T6 H J% Z! H; }& ^, m
没有过滤,直接写入数据库。
3 J& p4 ~. \$ T8 h3 R e/ D% I
% H% g( O3 [3 N利用方法:/ b) D! C' M2 J9 w3 W l x
S9 k a" q% _' a插入:┼攠數畣整爠煥敵瑳∨≡┩>
- }6 K' r+ K7 B$ P
- Y% e+ k1 I) g5 t! ^2 {
0 T8 X2 r% a) U8 ` Z0 P5 j& b连接: http://www.xxx.com/###tongbaner.asa
9 p. l( l. c- O) ]6 [( X' ~ b) q'默认安装文件: ) H8 J* |1 h9 i0 Y+ x; D
'install.asp
* A' v. G y5 i, G# e$ T |