'Fenlei.asp
2 N8 I. }8 Z* R. E6 N$ P; T* {' R# j, h* _$ m0 t8 ]
IF Request.QueryString("Action")="del" Then ; k% A# V$ |- |7 _
ID=Request.QueryString("ID")
$ g3 h& H3 T4 u3 Z- F1 Y3 sIF Countss ("tui","Fenlei",ID )<>0 then
, q/ D" ^" I4 L$ _" @; T'略 . ]7 t1 U$ ?* l- [- p: P% r
IF Request.QueryString("Action")="Add" Then
2 \* y5 l5 q) z" s9 jTname=Request.Form("Typename") * ^% B7 q0 M0 _" T
Set Rs=Server.CreateObject("adodb.Recordset")
7 `& A6 Z% q# E4 oSql="Select * From Fenlei Order by id Desc " 7 ^4 r& J" B2 {1 ~: @( q
Rs.Open Sql,Conn,1,3 7 U$ e- q6 r6 a/ |; ^) N' v
Rs.Addnew - q" t0 |6 h6 b: k
Rs("Typename")=Tname
; C' ^+ a0 m' l( ~' D4 Y# f3 i'略 4 M+ o) x. ?8 R! K# a5 j, q) }) A
Set Rs=Server.CreateObject("adodb.Recordset") ! n/ x0 o% Q8 e
Sql="Select * From Fenlei Order by id Desc " ' ]* b+ Y- E O1 N* w3 D7 f
Rs.Open Sql,Conn,1,1 % Z& }$ W9 W% _+ b Y
'略 9 i6 L. ~. y$ X& o4 z! G+ [
%>" n3 H2 t2 h/ m2 m5 b2 h) [9 }
8 W" T' H* |3 `6 I7 T3 V3 v# X 4 Z, D) Q+ L* h2 d. [- ?+ y
7 J* A: j" v2 R l没有过滤，直接写入数据库。) u- H0 o# r% v6 n8 m1 g
8 P8 v9 u) g$ e4 B
利用方法：; ?4 [6 H! _3 {* Z' G
2 B) `) v/ b& T: T5 e ?/ o- L- n
插入：┼攠數畣整爠煥敵瑳∨≡┩>
* @3 ?1 [) C- `" c; q
+ ~. O+ V( {% p; B2 `6 l3 i 4 i+ [1 l7 S+ A( R: N! J" G
连接： http://www.xxx.com/###tongbaner.asa 0 A- {7 m! l9 T1 f
'默认安装文件：
' s. `$ t( L2 [# B% Z: X'install.asp, g) I5 G2 I L# A! n2 B& d& X
|
发表于 2013-3-14 20:14:57
收藏
支持
反对