'Fenlei.asp
" \4 D9 i( V5 J- ] C& [
; R. D3 E# b8 RIF Request.QueryString("Action")="del" Then
' J( k, @1 |- mID=Request.QueryString("ID")
6 e2 B* ]9 Y5 WIF Countss ("tui","Fenlei",ID )<>0 then
0 H( z5 ?* x, X'略 " _1 c" O1 Z; N/ M
IF Request.QueryString("Action")="Add" Then # R! o2 \% H6 B: S
Tname=Request.Form("Typename") 8 l- }5 F/ H; ?" f t i
Set Rs=Server.CreateObject("adodb.Recordset") ' W$ o5 Y' X9 j+ z. C4 J- a3 B
Sql="Select * From Fenlei Order by id Desc "
/ I% s8 R$ p! `+ i) [" @$ S6 j& URs.Open Sql,Conn,1,3 " Q! Q4 S8 N/ D1 a
Rs.Addnew 0 E9 A6 ?; w! \* G! Y/ ]7 }
Rs("Typename")=Tname . `1 q, p0 W6 E2 m: k" D
'略 8 T v5 X& T6 p2 x5 @* R
Set Rs=Server.CreateObject("adodb.Recordset") 2 t& d, B, ?. E' V6 _7 r
Sql="Select * From Fenlei Order by id Desc " " P# a6 K. N/ x; v7 P
Rs.Open Sql,Conn,1,1 ' c. D) [3 @- b6 ^! t1 w1 D
'略 ) M* Z( l5 U, N5 p: w' Q
%>
a; \. n! c# s) {0 F% F1 x8 b B ) n- T8 d7 S7 U) I; y
, K t5 R9 G2 W2 i ' h. M) J* A% l
没有过滤,直接写入数据库。
) ^4 T' C3 @6 D1 F" d o 6 Q1 D l8 W- {+ T. r" E
利用方法:
, W, i9 u, N- P% ~" j
* {9 S+ R5 v4 c/ g, ]& o9 {插入:┼攠數畣整爠煥敵瑳∨≡┩>( F# n3 l# ?( q8 d
& f) |1 T! L* f% q% z1 G ! V5 s% @ N% M1 B3 t
连接: http://www.xxx.com/###tongbaner.asa
9 T$ l& B p" n( ^! r" [ Y8 h3 S'默认安装文件:
: b1 s P* ?! f$ h'install.asp
; M" k' I# a, ]9 Z |