'Fenlei.asp : E& p/ L. \7 h0 U7 z
3 b" _& g0 E$ y; [2 q1 r1 m
IF Request.QueryString("Action")="del" Then 4 V) t* X" m1 F5 k
ID=Request.QueryString("ID")
! C# t$ C" H: s$ h6 S9 vIF Countss ("tui","Fenlei",ID )<>0 then
1 M" Y" W/ R5 J9 I) B7 a4 b'略 # s9 I! m' e% s( r( Z) C* t" p5 X3 A$ [
IF Request.QueryString("Action")="Add" Then / w/ y4 q7 N( |$ @( ~
Tname=Request.Form("Typename") . V' a, l/ S6 F. S
Set Rs=Server.CreateObject("adodb.Recordset")
7 c: R' \8 h# F! }2 y" Z% USql="Select * From Fenlei Order by id Desc " i' s) ^ E4 Y N6 j0 e, K
Rs.Open Sql,Conn,1,3
5 M0 I/ X; K* o1 V6 d' d4 ^; ]Rs.Addnew 4 o* @: P0 D0 I" Y
Rs("Typename")=Tname * m, l. ?- h4 o( ^; A6 ]
'略
2 k3 N) R+ a2 T$ U$ D9 ~' W& TSet Rs=Server.CreateObject("adodb.Recordset")
3 x a7 A, t# }0 }$ WSql="Select * From Fenlei Order by id Desc " ; k% a d/ m+ B: K. x
Rs.Open Sql,Conn,1,1 0 o" X& t/ a* Z3 Y+ S
'略
8 `$ i6 `2 p: l& Y2 k%>+ T0 k3 e" g/ ?8 {8 W
+ H8 v% D+ a- @2 N' J( \" p * {* T6 X! X) i5 R9 M) B8 ~
$ e' t( y/ t# f4 Z- Z没有过滤,直接写入数据库。' f- G8 I. ~, h. ^' ^" T9 `
# C6 P1 H2 a, J$ h' S利用方法:
+ H; @2 m8 T c3 U0 F
$ `$ {' {/ i" C2 e6 ^% P& F/ U插入:┼攠數畣整爠煥敵瑳∨≡┩>
\) b- X4 k" u' p, U3 B/ \7 Q* _$ i - |3 }, N) U5 h, d* j2 d
. |# T _8 j- ?: i- q9 U
连接: http://www.xxx.com/###tongbaner.asa
9 p+ V' e7 g/ Y0 `# R* u'默认安装文件: : z& Q- g: _) D" m4 a" [
'install.asp+ N( W0 t6 V8 h9 y. ]8 G
|