'Fenlei.asp
7 A9 I& W5 ~' A4 t
( [1 H6 p/ k4 H1 S7 ?, s$ D4 h- pIF Request.QueryString("Action")="del" Then
0 o7 D2 t+ i. w+ O% P6 HID=Request.QueryString("ID") & ]6 m( Q8 m( |* {5 q( F. ^
IF Countss ("tui","Fenlei",ID )<>0 then 0 l0 X6 V* t( @$ G
'略 : X3 H6 W5 c ~1 O8 u, L2 r, n9 x
IF Request.QueryString("Action")="Add" Then
7 u- T+ h$ A2 t. C8 \3 |Tname=Request.Form("Typename")
9 K" D4 b/ ^7 n0 R) l1 M/ O4 _# n+ fSet Rs=Server.CreateObject("adodb.Recordset")
3 [4 r* z$ o% c6 CSql="Select * From Fenlei Order by id Desc " ; a) @: V, |/ g% p8 K9 \
Rs.Open Sql,Conn,1,3
" X7 `1 h1 n5 L2 V. R6 kRs.Addnew
3 C* E9 O- j# C4 @Rs("Typename")=Tname
7 f$ V- m. r- U' y'略 / H3 L3 i6 T5 R
Set Rs=Server.CreateObject("adodb.Recordset")
3 q0 w$ ?% D8 E2 h, P1 MSql="Select * From Fenlei Order by id Desc " 3 Z0 u) ^* F3 f( ^/ Q2 A4 P% n8 F
Rs.Open Sql,Conn,1,1
' U% x- v. t) Z% A'略 $ z5 \% x: U. q' @& N: V5 w5 w
%>
6 {+ {9 _0 u) o
+ T% ?% o; E9 Q ; r* U" h7 ^6 b
0 H9 N' I& e; H6 e/ r
没有过滤，直接写入数据库。( p* i' k1 d4 h, P
% s; N. c3 X: H3 `% s& S
利用方法： \; c2 z8 Z+ n7 n
% k7 N. ?. t/ d- t2 y4 S# v
插入：┼攠數畣整爠煥敵瑳∨≡┩>
V4 ~. s5 W) m) h6 C0 b) K4 S . N7 Y# N$ j: `9 I0 X. f% t
) \, s2 }% x; L2 O3 C, g
连接： http://www.xxx.com/###tongbaner.asa
) n. x6 @$ z# v; [9 j'默认安装文件：
# H- ~5 Y6 e/ ]# L! n6 g'install.asp+ `6 _$ I" |; p" o0 O8 v9 o
|
发表于 2013-3-14 20:14:57
收藏
支持
反对