|
哎,又要交作业了.../ |, H6 s% W! s! T
谁帮帮我啊?( W I6 }& l! B5 e" ^' f( k
老师让我们设计一个订单系统,要求:4 x- _$ I$ U3 d/ b q
1 产品系统,字段包括 品名 介绍 产地 价格 小图片 大图片
9 b" h2 A- Y+ {& y& L* o0 [2 关键词查询 可以对品名 介绍 产地等进行组合查询,多页面显示 V$ w) V- R# x1 x6 T
3 在线订单,自动算价格(运费统一),不必注册可以在线提交订单(后台可见)
# x, @$ q$ X/ b, A: Y5 o2 x- c4 asp .net php系统都可以 `1 y3 R* `" w" v& P
一看到我就头大了,我知道学哥学姐来说是小菜一碟...- V" x$ T" u: A, S
头痛,玩游戏去了,谁帮我请我玩游戏阿,嘻嘻
6 b: P% G- C/ J* u. ~- }5 [: _-------------: h1 _/ e- c9 Q4 ~* V' b' U8 K% d
我做了一个简版,大家帮我改改,不要让我功亏一篑阿(这么好的一个词我都能想起来...佩服自己了)。& X( b5 {3 B/ c4 k5 j
页面一 index.asp
( v& J9 e$ k( H8 D<html>
9 a0 q4 s r# w$ m4 b5 o/ h<head>* D F) g) l, Y/ o, h q
<meta http-equiv="Content-Language" c>2 r/ r3 D* C/ b6 l0 X
<meta http-equiv="Content-Type" c>
+ r' A6 p8 k5 x+ W$ G$ a% t& d<title></title>+ A) K/ C& Y+ k) K3 g0 C/ y
<style type="text/css">' ]+ R1 }4 l+ j1 |- w9 h
<!--$ P3 X4 B# Y W$ C
.style1 {font-family: Arial, Helvetica, sans-serif}3 C! {6 Q, Y- e" u5 m8 L7 ~& M
.style5 {# J! c. P6 X' \+ c5 S3 i
font-family: Verdana, Arial, Helvetica, sans-serif;
3 C( A, B3 |; }' K m font-style: italic;% X. \8 A6 S1 X( D- i! o6 x. V+ _. Z
}7 h; l+ u! I: M6 G4 g
.style7 {color: #FF0080}9 _3 B$ ? P+ c3 f
.style8 {color: #0000FF}
7 `; ^, V' H: G% H8 Z4 r-->
& P4 S6 D |' y8 D9 H5 F</style>1 S; A g( O0 s# s2 H
</head>
- t3 j; p$ w: O/ W3 c: @' t% d1 S<body>3 O, m4 s$ q/ X4 ?) ~4 d1 x
<form action="list.asp" method="post">4 w( X4 n" K. B7 N9 q% Y1 g
<input type="text" size="55" name="intro" value="2 这里填关键字...">
" t; `9 y1 n4 _5 T<input type="submit" name="submit" value="就找这样的...">
6 `! n" j( @, \. ~. u: }</form>
+ a- y5 `0 r5 P; g</body>
2 z5 j1 V# e% U; a0 q</html>3 H) P% f! @9 H2 A+ e# C
2 u0 }& N, _4 T; H9 M6 n页面二2 ?6 ^. j3 Q' t6 y
<!--#include file="conn.asp" -->
/ @" X5 z5 Q0 {* u<style type="text/css">
" r4 |" N. U1 q4 y: _6 I( M<!--
3 s6 A K) ^, e l.style5 { font-family: Verdana, Arial, Helvetica, sans-serif;0 z7 a" R% [- @! B- r9 D
font-style: italic;7 F3 S5 {# J4 m& g+ D6 [
}
2 H6 z Z% x. R. {+ a0 \! @$ R% N) t1 s2 x.style6 {color: #FF0080}" ~, E# \3 D& {6 H& m+ Y% Z
.style7 {color: #0080FF}. a: c( J$ r0 t. R' c+ h
-->
. R- z) I! Y. J7 |% Y$ d</style>
& L8 B( ^& P2 p* b1 ~* L+ b& H% {3 E <%
4 U& L5 v+ u8 `3 S+ u( I$ s. `intro=request.form("intro")
0 p# b# o0 ^, Y& i' A3 |$ `3 WSet rs = Server.CreateObject ("ADODB.Recordset")
; ]% V% b' I; N8 \- Ysql = "Select * from biao1 where intro like '%"&intro&"%' order by zd desc "
+ j) v* E9 r l) ~" I, nrs.Open sql,conn,1,1, f# L. p% z- p% z- \
%>
0 }% }- U' I; j- q" t <%
4 e& m: J* Q% q4 B3 Nif rs.EOF and rs.BOF then/ H/ c/ d! F8 l' _
response.write ("这样的天才发明家还没生出来呢")
( J8 K1 w/ k9 F& U9 pelse%>
$ h& t- C% Q% @7 l( I7 h3 R</p>
9 S" D' _# y0 Q" r e<table width="784" border="1">* f7 a! s3 \5 P' L$ }6 W8 P% p4 d; o
<tr>
# {7 G5 W J4 Y! T Q) u: X <td width="53">编号</td>
& h" Y4 I5 K! C4 x( X <td width="254">商品名</td>& Z# u7 i( T" [0 n% j: K
<td width="53">产地</td>
- x# T# | s2 O/ S0 Z/ b! f <td width="277">简介</td>
& P3 y4 B* ~7 W, i <td width="80">图片</td>
! X8 K* r# o; G <td width="42">价格</td>
5 o' i6 n# D- [ </tr>
6 s* M0 ^. C' k e' u0 o <%do while not rs.eof%>8 n1 k" q" d% y9 |/ A ]2 v# I
<tr>% P1 \( z2 o' u. N
<td><%=rs("id")%></td>
/ [$ u/ p" x8 ~0 s; I: r3 } <td><%=rs("name")%></td>& E1 _1 b& U# {4 U
<td><%=rs("kind")%></td>
8 o$ } j1 t4 D8 j <td><%=rs("intro")%></td>
2 O/ C9 y4 W( \, Y+ q, i <td><a href="pic/<%=rs("pic")%>.jpg" target=_blank>点击看图</a></td>; o# o8 F y$ Y+ m3 v% B9 z* K
<td><%=rs("pri")%></td>
3 Y. P. J/ j% \. \/ [5 W4 O </tr>" q4 J& P; ^# g' B9 @
<%5 U5 m7 d; o/ B, G% k( G$ U
rs.MoveNext
! ~( W# H2 h2 a% E+ n5 iLoop* ^: N8 I- m+ V: m) y5 Z
end if; E7 v$ o' M7 d1 V- J$ C
%>
7 i) L4 y( @, t& e) |</table>7 T W2 w1 {% c6 X; h7 c/ a
<br>. I D0 ^' w+ H' o0 t. i1 a
<a href="index.asp">回首页继续寻找</a>- T; F( D- n" P) e8 w
<% J) t# d* j8 Y. N: l9 s' P
rs.close ) }8 a6 m4 E l
Set rs = Nothing: X$ l, C0 @6 S! y# G2 C, Z% w& h
conn.close " g- Q" s7 H, |5 A& l- \! g
set conn=Nothing
6 s' R* C7 ^' ~* f% z, Y# o%>( A9 [) [6 I/ V. h9 m( T& A) F
. Z% L: [- u" a* z {3 `; M[ 本帖最后由 工商小丫 于 2009-5-11 08:43 编辑 ] |
|