|
哎,又要交作业了...5 d I; Q" J% z8 C3 H
谁帮帮我啊?6 ?% e" R/ _# B# e1 D8 ~8 i
老师让我们设计一个订单系统,要求:+ [# _# l( `" ^9 H1 r
1 产品系统,字段包括 品名 介绍 产地 价格 小图片 大图片: J4 ^3 G9 D0 S B% i% p5 q8 D/ \
2 关键词查询 可以对品名 介绍 产地等进行组合查询,多页面显示1 `. X& E" H q s
3 在线订单,自动算价格(运费统一),不必注册可以在线提交订单(后台可见) ]4 n* R- \$ G% S9 r' G
4 asp .net php系统都可以) A/ S* _4 }: W4 X8 H" y
一看到我就头大了,我知道学哥学姐来说是小菜一碟...
% |0 k/ ], e7 F8 \: Z/ H头痛,玩游戏去了,谁帮我请我玩游戏阿,嘻嘻0 |+ `0 [: S2 X7 X& {
-------------5 e \6 V5 h8 w) Q4 A5 V
我做了一个简版,大家帮我改改,不要让我功亏一篑阿(这么好的一个词我都能想起来...佩服自己了)。" k5 U; y0 }- _( O
页面一 index.asp
7 R# D5 S( e% o6 Y( J. Y% t: s<html>9 b: \! v6 N. I+ L0 q
<head>% s2 W# f- ^8 s0 u1 m: z
<meta http-equiv="Content-Language" c>
, Q* G' l( w2 C" ^/ N* \<meta http-equiv="Content-Type" c>
( E& D6 W) j' J* ?<title></title>5 r6 i2 o$ q: u/ E1 P% B6 ^
<style type="text/css">
' D5 E+ z F g' a2 q<!--
! P6 G1 ?! Q% c.style1 {font-family: Arial, Helvetica, sans-serif}
" R# G, [4 {* R( L2 j) Z.style5 {
4 O! [1 `6 G. Q& T, m: u" \ font-family: Verdana, Arial, Helvetica, sans-serif;
! f) a. l% Y* M+ [: _( u! i font-style: italic;1 _2 \9 A+ z3 D( v" O; N
}5 I7 _4 a/ v* A/ t( Y, f W5 ^( C
.style7 {color: #FF0080}
, ~6 \( w; y7 X.style8 {color: #0000FF}/ { D& W0 d' K2 J. q4 x3 C6 F/ Q
-->8 s8 d9 [) m3 m/ i- @) ]1 c
</style>
) I3 j9 `5 ~) W A7 s</head>8 J3 S( W( x Z, P/ ]* r) L
<body>
N! \6 ~* I7 m+ q0 P; r<form action="list.asp" method="post">
5 R: j1 Z5 G0 K0 R2 N<input type="text" size="55" name="intro" value="2 这里填关键字...">
2 @, y d, ^1 t1 Y- T; l s<input type="submit" name="submit" value="就找这样的...">
& z6 Q0 E/ S h</form>- H; \4 c; { H, X+ ]
</body>
) S3 e" D, e9 K3 k+ W ^</html>
# h4 b' F- {" a* j; g3 Y- S6 n% y- H0 ~- \3 b' S
页面二- }) q/ N3 j( o: N g8 U
<!--#include file="conn.asp" -->
3 q# P' }# r: R/ `$ D1 A& c6 h<style type="text/css">; L- y) Q& t" A5 ]+ C) N" f
<!--' G E1 \& A) H) |& E
.style5 { font-family: Verdana, Arial, Helvetica, sans-serif;1 D$ [2 M6 [+ o# h- y, w$ T1 [( b
font-style: italic;0 c9 X8 [4 l0 U+ E( \
}
: n, Z3 {4 E3 W+ S4 R2 z.style6 {color: #FF0080}
}; Z9 s0 U6 `# Q* Z1 y1 q.style7 {color: #0080FF}
+ S0 u% p2 T7 ?$ O/ m2 ]) _-->
# O4 m: ~- L# l1 x</style>
1 ^! M6 l5 o2 m <%6 c& l k9 Y' a
intro=request.form("intro")
: L$ l1 ]$ u% U8 G% ~Set rs = Server.CreateObject ("ADODB.Recordset")% ?' _' T3 I! z
sql = "Select * from biao1 where intro like '%"&intro&"%' order by zd desc "4 [) @0 G3 |* n) \+ q: o+ g
rs.Open sql,conn,1,1
- l# A( {( I, }3 \4 `& C- X- ~2 c, N: e%>
5 \$ s+ |9 F# p! o <%
% S9 N7 ?/ F" D: S1 H9 ^. P4 l6 s! Z3 Uif rs.EOF and rs.BOF then7 w6 n g: L( J& H) j- d
response.write ("这样的天才发明家还没生出来呢")
- ]% }9 K' ]& _" C" delse%>6 d) B2 k' s0 e& l
</p>
* C# k$ t5 ^9 W$ b<table width="784" border="1">
3 f8 ^2 G& z' K3 t; k) B <tr>
# g' n* B% a7 Z& l) |- C <td width="53">编号</td>1 P- B3 S/ c$ a: P* y7 n( Q7 Z5 ]4 m
<td width="254">商品名</td>; S5 W4 j9 q5 f. r$ A4 _
<td width="53">产地</td>
+ _; c' H" D9 v0 M+ P9 Z <td width="277">简介</td>
( a. `7 z F( ]9 i7 K g9 n% r <td width="80">图片</td>
0 i9 A; B* v1 i5 n _6 Y2 a <td width="42">价格</td>
) G: m/ k8 C5 _2 w( E! ] </tr>
- g% V/ e: N: a w+ k <%do while not rs.eof%>
' \6 z4 O: K5 v9 e4 @- K" n9 P. B( q( U U <tr>/ T6 `/ T% }- f: V* w
<td><%=rs("id")%></td>
* |" I+ J0 T! W <td><%=rs("name")%></td>* Q5 Q3 ?" `9 M1 Y' X
<td><%=rs("kind")%></td>
9 @$ C3 Q$ I7 J1 ^1 _0 p <td><%=rs("intro")%></td>
' S1 V4 m2 T% G. L+ I3 i <td><a href="pic/<%=rs("pic")%>.jpg" target=_blank>点击看图</a></td>
5 y; k, B7 `( H6 P# g% Y4 ?9 k <td><%=rs("pri")%></td>4 I* T2 G$ {9 h3 }6 L ?
</tr>. o- v9 A3 Z1 {: m/ Y
<%
8 f% V9 a) J! Drs.MoveNext
* l& \& @! v: cLoop
% }% Q$ F U2 U% p) Vend if
- n2 k2 _8 X, Q; k* ~6 l%>) z5 ?! u" E/ @" r
</table>, P0 D/ I2 r( ~7 {& j1 p: w
<br>" d( o/ b2 N: p3 N9 V
<a href="index.asp">回首页继续寻找</a>+ r5 K% M( U2 ^: L- m6 b
<%
# M3 P& m/ u0 V! r& Zrs.close : p6 M& f4 A) N( A7 L3 p
Set rs = Nothing
' ^; v' n+ D" L+ Y) A- Iconn.close 2 Z+ O' J; P( ^1 _8 I* X1 N" d2 F" Y
set conn=Nothing
) |, s9 j4 S/ b: a9 e4 O6 g%>! M$ Q( ^6 I) _% ]
1 B8 L( W7 ^' D- i3 J" ~$ @3 ?' Y* u[ 本帖最后由 工商小丫 于 2009-5-11 08:43 编辑 ] |
|