'Fenlei.asp 9 _; y$ ~8 a3 X: r# I$ a# ?
6 ?/ C/ Q" M- _3 w4 _/ \IF Request.QueryString("Action")="del" Then 8 l- s, A. D$ e
ID=Request.QueryString("ID")
2 T. G' W$ P9 Y9 J8 fIF Countss ("tui","Fenlei",ID )<>0 then
# k, ?5 D9 C! B$ k" y3 ?'略
. [+ k/ C t- NIF Request.QueryString("Action")="Add" Then
; o9 {0 E9 ~) y% t1 oTname=Request.Form("Typename")
) r* T. I: d$ a' g& ^Set Rs=Server.CreateObject("adodb.Recordset") ( n% Q/ f& R8 R8 Z& ^! S( \
Sql="Select * From Fenlei Order by id Desc " * F' ~' B- m* V+ _5 U
Rs.Open Sql,Conn,1,3 " {+ p6 m' V4 q: P: I
Rs.Addnew
( G) }6 s" G; P% D3 ` m* r! `1 SRs("Typename")=Tname
" y: J- w8 g* ]- p% M' n# w; D'略 " S: O5 e3 b6 V5 M( M1 O1 i
Set Rs=Server.CreateObject("adodb.Recordset")
/ i3 f: c# c' t# E0 C o& }% {Sql="Select * From Fenlei Order by id Desc " 0 S2 U& w- T' w) z, ~
Rs.Open Sql,Conn,1,1
0 I' Z7 Z) |1 R0 U8 m6 N' N4 q'略 & _( v+ \! y; O* h) A8 `
%>) u8 E$ P+ c: b3 w/ B! A. ^
T9 B# x. A z8 _
# T3 _3 I4 b+ B6 I: h 6 J( D' }( j; v& ]1 y
没有过滤，直接写入数据库。0 `7 q. D5 b' X3 c: u0 w% K' a
0 H( Y4 R" {' k* a1 x% B8 ~9 Y利用方法：
$ w. ^* K) d2 y# }: R 7 ?3 m: Y4 {: Q; t) M q. P9 S
插入：┼攠數畣整爠煥敵瑳∨≡┩>
7 x. t* N' [: Q 7 m1 G, @% U: }' W+ H" e5 m6 m
3 t' Z, r+ V! F2 j1 S连接： http://www.xxx.com/###tongbaner.asa ! r, k6 @& }0 _) ~) Q# u' S! {
'默认安装文件： " k1 P# C$ C: [8 H" z% J
'install.asp
( x8 z3 ]) T* O* [6 \5 ], J* a |
发表于 2013-3-14 20:14:57
收藏
支持
反对