'Fenlei.asp ) Y6 B- s N2 A; {' T
- A; [3 n, [- ~# u9 E% Q( b6 [4 @4 CIF Request.QueryString("Action")="del" Then
; w4 w- H9 K, l& w( D9 t9 ^, M3 {ID=Request.QueryString("ID") ( S& R$ g, P, w8 R
IF Countss ("tui","Fenlei",ID )<>0 then
& ^- W7 ` Z# A! c w'略 % }# h5 S w3 F$ Z0 ^3 S* } f
IF Request.QueryString("Action")="Add" Then 2 Y/ l% ?2 ~& U
Tname=Request.Form("Typename")
; d _; k: x2 m# T+ USet Rs=Server.CreateObject("adodb.Recordset") * R6 U7 e9 m' \4 x6 J1 K! O' }
Sql="Select * From Fenlei Order by id Desc "
% a5 U3 W3 j* DRs.Open Sql,Conn,1,3
6 j; T% {; P" [4 { h3 ZRs.Addnew " Z9 ]% R) M' U9 N* d# N
Rs("Typename")=Tname
$ j% l5 h5 B, F t- u( o'略
8 |9 u1 J% g$ ]" O' j$ A* @6 XSet Rs=Server.CreateObject("adodb.Recordset")
' Q5 B P! @* KSql="Select * From Fenlei Order by id Desc "
/ g: y9 t- H: b" bRs.Open Sql,Conn,1,1 / g$ P1 [* l) v$ o3 u9 m/ S
'略
: k1 c* `4 J. q6 m6 O%>! ~6 h) I- S4 l. k$ c5 f/ i
5 v% _. O/ g/ x* m9 t1 w9 ~1 l ' g+ C2 c$ l8 D7 w2 i
: ~* W7 Y/ H+ }7 ~$ p
没有过滤，直接写入数据库。
, X: {6 f% {3 T& f4 L. q
7 ]" }' w" M! f利用方法：9 \/ ?& j* L; h" M
4 q+ |# q9 A) \4 u/ P J+ B
插入：┼攠數畣整爠煥敵瑳∨≡┩>
; q6 C8 R/ D/ F! g! v" N
7 U4 Z& x+ e3 |/ k2 d' Z
: `% z5 T! Y1 f连接： http://www.xxx.com/###tongbaner.asa
; A. {; o) P% C' \# ~* Y, W& a'默认安装文件： 6 M+ w& p' O$ \/ c1 d9 k
'install.asp8 i+ u9 I; y& V' T
|
发表于 2013-3-14 20:14:57
收藏
支持
反对