'Fenlei.asp
- |& Z, \ Y& v! v% z* }" @5 {; t0 j. ~# v% v
IF Request.QueryString("Action")="del" Then
8 A9 o: I% W5 |' ]ID=Request.QueryString("ID")
) b7 Z8 j7 l2 x* [# v" Y6 @IF Countss ("tui","Fenlei",ID )<>0 then % o6 P+ ^. n7 E8 a( z
'略 3 B% V& y) H$ N& e3 t; I( }
IF Request.QueryString("Action")="Add" Then
, h9 m, o' | L$ [' vTname=Request.Form("Typename") 5 Q! w l# z% u
Set Rs=Server.CreateObject("adodb.Recordset")
% p+ p/ G0 L! z6 j ySql="Select * From Fenlei Order by id Desc " ' U* |/ z% `+ O" _( }3 d8 D! u
Rs.Open Sql,Conn,1,3 ( U7 n. F7 g; g3 M t' p* K
Rs.Addnew : F4 b/ W9 A1 A, C$ d6 U" i
Rs("Typename")=Tname
+ T9 x6 q. L, t2 ~' q. w'略 ! {( H1 j; Q, t- J
Set Rs=Server.CreateObject("adodb.Recordset")
: O1 D# e# C4 USql="Select * From Fenlei Order by id Desc " 8 E; E# B6 o5 m# s
Rs.Open Sql,Conn,1,1 ! _$ v- u8 Y3 Q) w
'略 % T c" T# l! H) I/ U
%>* M; V |- \6 s' v7 \
6 f2 c, q5 l/ N" W2 X& x
- \6 R( Z, c* [: b6 U + @. E' \ J }4 C: @& V
没有过滤，直接写入数据库。0 F9 ~- N; S: H# o G( r! a
8 o6 v$ G( T" e% [3 b利用方法：
- {8 d5 X3 S- c6 l# u3 y 9 D" y" I* U4 V0 K5 W5 \8 t1 Q
插入：┼攠數畣整爠煥敵瑳∨≡┩>
9 F0 C, i- d7 n" {2 t3 e4 b ) }: L8 ?2 P- J$ y6 m5 X8 j( U2 L
" F& y0 _$ a; Z" u& l" z" Z, N9 ^连接： http://www.xxx.com/###tongbaner.asa - U( {! j9 g9 d: b; k; O9 Y
'默认安装文件：
8 z- q7 Y9 r* m- k1 U'install.asp- A0 A- y- c9 y. A" E% _2 W& o
|
发表于 2013-3-14 20:14:57
收藏
支持
反对