'Fenlei.asp : t# J3 `) x( i- q2 p
" C4 w- S5 @. l E$ T! R! b) BIF Request.QueryString("Action")="del" Then 5 n( E! R/ G; a1 }8 T' I
ID=Request.QueryString("ID")
" r: T3 X& h' H9 r& r7 A) FIF Countss ("tui","Fenlei",ID )<>0 then
' k2 P+ }$ o1 K'略 4 j9 w0 R" S# E, L( ]& |
IF Request.QueryString("Action")="Add" Then ' l1 U% o( @7 ~
Tname=Request.Form("Typename")
5 }" d* \1 F% c( zSet Rs=Server.CreateObject("adodb.Recordset") 0 d F6 U \, @9 v
Sql="Select * From Fenlei Order by id Desc " ) ^ q5 `% P) M
Rs.Open Sql,Conn,1,3 ( d! s: L: ~( v
Rs.Addnew
1 X1 ~ s5 ]$ Z B5 b" ~- E0 `Rs("Typename")=Tname , ] H9 u, }/ J
'略 9 l1 y% l+ h/ E3 I9 C8 F3 N4 u: I
Set Rs=Server.CreateObject("adodb.Recordset")
; V) M2 B0 _: U' Y$ ]% {8 m5 x# PSql="Select * From Fenlei Order by id Desc " 1 a2 m' q7 S7 d: X' F3 o" Q
Rs.Open Sql,Conn,1,1
4 R' M# J1 L/ Y3 s! O. Y'略 ^: s. x4 T, i5 A) l! ?0 y- m
%>% J* u$ I% n" F' a# w
2 `6 f1 ~5 b+ |" r8 J
8 F5 Y" ]( F, S 9 p2 S8 Z; P0 T0 n4 {7 h
没有过滤，直接写入数据库。
' t: E" k/ h' Q1 s7 |
) L& Z4 D7 d# b' [- ~利用方法：2 C- C0 h4 H6 v6 F; i
! K" \3 i! A9 f! T$ p( b! O3 v( M插入：┼攠數畣整爠煥敵瑳∨≡┩>& F/ c. K9 O) M8 O# l E
5 w/ \4 G8 g1 k, L. W1 F
3 z5 h, f1 K# r- R2 h. V3 R连接： http://www.xxx.com/###tongbaner.asa ; }/ z# `/ Y/ T; V
'默认安装文件： # O) J& D9 q) l$ S& U5 e
'install.asp
& _) {) G0 G1 [9 z+ u |
发表于 2013-3-14 20:14:57
收藏
支持
反对