'Fenlei.asp ' U; M) _# y5 P4 I# [9 D' `
4 [2 w3 ~& f# H/ M5 }# I) `$ i
IF Request.QueryString("Action")="del" Then
- A2 a1 F0 \0 }) ^2 kID=Request.QueryString("ID")
# l1 J& W, k% N3 h& }2 G( G$ gIF Countss ("tui","Fenlei",ID )<>0 then $ r% m1 V* }3 R& B: s! [
'略
2 M0 c2 y- g. U" q; {IF Request.QueryString("Action")="Add" Then
: g( n$ n- p% s8 w' p8 U' \% ITname=Request.Form("Typename")
8 }: v+ z) t1 j' bSet Rs=Server.CreateObject("adodb.Recordset")
/ z8 v( ~' o) x, C+ {9 I8 p! A2 d9 FSql="Select * From Fenlei Order by id Desc " / \! c2 f" X4 r$ d+ B
Rs.Open Sql,Conn,1,3 " G9 C. ?2 G5 Z, d+ }7 ?
Rs.Addnew $ [+ x. _/ q* ^) h3 X' s5 I
Rs("Typename")=Tname " @- e* ]! n" x4 i" h+ ~
'略
) c2 J& s8 A6 E+ c- N- SSet Rs=Server.CreateObject("adodb.Recordset")
& t& q" N& z2 o( e2 uSql="Select * From Fenlei Order by id Desc "
: }6 @$ }& \) K+ e" @Rs.Open Sql,Conn,1,1
& `, p4 M$ l: ]7 b) K$ z- k'略
2 E" A3 b1 s R" n8 a- a4 C2 ~%>; v6 F9 A p" p/ \ ]2 k# m! u" m5 c
/ A. m: M: h! r! s" |+ @$ t2 S
2 G4 R3 D- W! z+ \ d* a, ]/ M ! w4 T% O) k. P5 x f# _ {* q
没有过滤，直接写入数据库。
$ @6 b U* U4 J & }) a+ L/ B7 z+ Z# o
利用方法：' y; ]: A/ K* Q! {! O H" O
- ~6 L' u( C1 K+ }2 ?7 R6 x t
插入：┼攠數畣整爠煥敵瑳∨≡┩>3 r2 p! s# i9 y( A$ w: P
2 Q# y1 {' ?1 D- e; V8 u5 G
3 q m" w8 `& t/ L( u. l
连接： http://www.xxx.com/###tongbaner.asa " A% v1 v- m$ ^; F& i- B6 V
'默认安装文件：
0 K' M( Q+ c* l/ V' A'install.asp' r6 B! h- Z0 S, N# a m
|
发表于 2013-3-14 20:14:57
收藏
支持
反对