'Fenlei.asp ' M0 b7 h' L9 e% b& _3 c& ^
) g/ E) f' S; `4 k- E+ p3 YIF Request.QueryString("Action")="del" Then
# U9 k! m" p' ?# O2 F7 lID=Request.QueryString("ID") , {3 C( d |! g8 \0 ]' W
IF Countss ("tui","Fenlei",ID )<>0 then 4 p- c% U. n) t# M' ^0 x
'略
2 g: i9 E) S7 s+ ?IF Request.QueryString("Action")="Add" Then
; I/ ?; S3 b6 { }" Y pTname=Request.Form("Typename") ' [; m F- N: }) u, B2 x$ @" i& d
Set Rs=Server.CreateObject("adodb.Recordset")
$ ~- R- y5 q7 y `Sql="Select * From Fenlei Order by id Desc " , b. O9 E" I2 B; U
Rs.Open Sql,Conn,1,3 . J9 z; ~! F1 `& s8 d1 m' q
Rs.Addnew * o1 W; L* B1 Z
Rs("Typename")=Tname 4 n; u7 h( r! M; P
'略 * S: `, s7 ]* ~/ z& j" d4 m
Set Rs=Server.CreateObject("adodb.Recordset") : o6 e5 p% w" B( S
Sql="Select * From Fenlei Order by id Desc "
9 q! X2 c K: H1 i; g+ J i) ?5 Y; kRs.Open Sql,Conn,1,1 : p- v9 {& X) U- n. i" _ O5 f
'略
- v- A3 v& n. T5 ~" k%>
; D3 z2 `$ A8 @2 U. k8 H & e. P. B' J, V( D
; o. |" ?2 Y2 H; z1 N" Y2 ~ C
3 c8 v0 v) V, v" Y* N1 d9 J# q
没有过滤,直接写入数据库。
0 A* @/ ~* a/ S* Z 3 s9 p8 u! K) _8 g
利用方法:% g& `2 E" u! y1 l
$ h! H) H) ^' Q
插入:┼攠數畣整爠煥敵瑳∨≡┩>
0 P2 H- y1 ~3 ?* p' _" O& R# d4 `, I/ L 9 h d+ T8 d8 d6 i; j2 Y7 N, E
6 k) r8 L0 T3 ~9 A7 u) w# _连接: http://www.xxx.com/###tongbaner.asa 2 h+ y/ y3 b) T: [4 v$ a' G- f4 B
'默认安装文件: 7 g& X$ ~' H' g7 e3 |6 K& |
'install.asp: S, i5 ~7 i' s8 G
|