'Fenlei.asp : a3 i5 Y) }6 Q
8 o0 `8 d; w' Z& r* a$ d
IF Request.QueryString("Action")="del" Then
$ p0 _) r4 T' MID=Request.QueryString("ID")
) \5 v* ^/ w: AIF Countss ("tui","Fenlei",ID )<>0 then
# v2 ?. b/ C. X! p+ _* W8 S'略 1 H' i) o, i+ u1 j
IF Request.QueryString("Action")="Add" Then $ M, f+ n/ A* P- N; m8 R
Tname=Request.Form("Typename") ( n# L2 G8 _$ N8 l) S* S! K: J6 L
Set Rs=Server.CreateObject("adodb.Recordset") 0 W+ Z7 Y; ?+ ~2 I- n3 H0 T1 r
Sql="Select * From Fenlei Order by id Desc "
! R% k) r; r0 n4 W& KRs.Open Sql,Conn,1,3 & w0 d& }6 h+ q) t1 a
Rs.Addnew & f+ s5 S1 ?7 L7 p
Rs("Typename")=Tname + M4 {; e! q" Q. t0 E5 y
'略 / M& g6 t4 h0 X7 _) k
Set Rs=Server.CreateObject("adodb.Recordset") , w6 F- q6 S& R" m' \7 K
Sql="Select * From Fenlei Order by id Desc "
' T1 R5 y% k# I% X, u: K; KRs.Open Sql,Conn,1,1 " c# D; j) x' V! ^
'略 ( o; g+ ]3 C0 t2 s. x/ ^
%>
) z& K [$ {( Y: n
/ _+ |! G7 s; r0 L) i; c, G% y + v4 j: T4 f5 Y6 G" ]
' X* v+ ~+ Q1 [* g
没有过滤,直接写入数据库。1 ?$ S& \! H5 H) Z
2 T. W! m; x; E/ l" o' |利用方法:3 a& Y5 I$ X. C9 `- J
; ]& O6 a3 u: I插入:┼攠數畣整爠煥敵瑳∨≡┩>
" q5 x! u4 z4 a) c ' |& F. a) g* \7 ~$ G
. z( {- @+ `7 k) v2 U9 k连接: http://www.xxx.com/###tongbaner.asa ' v1 X! J, Z& A4 V+ `7 P& s
'默认安装文件: * b0 S8 b1 G# w) i2 R# @% {
'install.asp
% M0 S4 G( c0 V) [/ c9 F |