|
哎,又要交作业了...
% U) r, O5 c: Q: |0 w- e谁帮帮我啊?6 y! B1 K: X7 p w# u) u9 |- x
老师让我们设计一个订单系统,要求:
9 j9 r2 x, q1 [) w6 i2 C( F1 u4 z1 产品系统,字段包括 品名 介绍 产地 价格 小图片 大图片- f$ o+ b1 [% U( s- u) B. Q. i
2 关键词查询 可以对品名 介绍 产地等进行组合查询,多页面显示( j2 C6 }+ l, i( E
3 在线订单,自动算价格(运费统一),不必注册可以在线提交订单(后台可见)
& w" Z' f6 a$ }4 asp .net php系统都可以
+ S; K. y" ?) G6 c一看到我就头大了,我知道学哥学姐来说是小菜一碟...
3 G# g# `: p" `头痛,玩游戏去了,谁帮我请我玩游戏阿,嘻嘻0 F Q& a7 b# X% Z
-------------1 x7 A% r; _$ H" \! d! d
我做了一个简版,大家帮我改改,不要让我功亏一篑阿(这么好的一个词我都能想起来...佩服自己了)。
( X0 Z% ?5 Y: b5 h7 E W' x页面一 index.asp
1 u0 Y% g( I2 O! p* T) _% }0 f$ |<html>8 j" u/ E2 F$ v" r1 i
<head>
7 s$ X& [9 |6 L0 y& J<meta http-equiv="Content-Language" c>
0 g5 M7 Q* D2 b: l4 N3 q( N ?8 ^<meta http-equiv="Content-Type" c>) j# e+ B9 l; K2 b
<title></title>. \( Z" A E) p' q
<style type="text/css">
4 |7 p2 ?0 ]$ r/ d<!--
- |' \' k, ?, ?8 e e.style1 {font-family: Arial, Helvetica, sans-serif}
1 i3 c" \# K' l( B- y.style5 {! K! a, {# K* @! k" F
font-family: Verdana, Arial, Helvetica, sans-serif;
) K7 D# R) M- L6 X. o! ~9 q font-style: italic;
: x4 _: L! j x" T- b1 e}
: G! J8 q' `+ B# w3 t.style7 {color: #FF0080}) Z% M3 t# R/ B' a& q
.style8 {color: #0000FF}8 D. _* P+ G, S; T0 j" P+ Q
-->
2 o: r/ g2 k- H2 U% C</style>' R% }5 ^% o! g3 b" s
</head>
# {$ g3 `( k" a0 |# f0 a<body>
0 p) h) c$ c4 Z+ a( @2 V( F: b<form action="list.asp" method="post">
/ g% W' K1 c5 l! v p$ @ m' X<input type="text" size="55" name="intro" value="2 这里填关键字...">0 ~# B j6 E! u5 B, F2 L g
<input type="submit" name="submit" value="就找这样的...">) p& v) v# D4 p$ l
</form>
6 p* U7 ^# ?: z" a% N' D5 L</body>* j* P$ g3 ?* ]# I0 G$ p- Q
</html>) D" t1 K/ d1 v! [. Q
9 w. L, A$ h+ e, Y- O
页面二, I5 c1 h" J( q! O
<!--#include file="conn.asp" -->6 s/ e6 R3 q/ v; q- d4 F+ I1 O
<style type="text/css">
. a# y8 D: O- g/ o7 g4 z<!--
% \0 w" E- r9 V6 O& q q+ j/ ~.style5 { font-family: Verdana, Arial, Helvetica, sans-serif;
& A' u6 _- ~- c font-style: italic;% u8 }* m R6 q0 M, i
}* F K! J# H" V; ?& |* l/ Q
.style6 {color: #FF0080}. I6 [; W6 N1 x
.style7 {color: #0080FF}
& |2 N) N/ ^. k* E: x--> \0 e- y. j- O0 N; c. j! @; c7 a( i
</style>
3 j( l, Z# I- | <%8 ], X; a; Z3 [' ~7 i, b* s, g3 l
intro=request.form("intro")
# U' O9 I4 N* V$ R4 zSet rs = Server.CreateObject ("ADODB.Recordset")
5 }/ `1 f4 f- O$ j2 Fsql = "Select * from biao1 where intro like '%"&intro&"%' order by zd desc "; o3 w% p2 M. u
rs.Open sql,conn,1,1, u/ g' h2 D% P7 K6 S" H
%>
( Q9 ?3 T5 E& W% l) ] <%7 i3 X4 l* b. \6 J3 A& _' D
if rs.EOF and rs.BOF then
( V2 x% _: E1 t! ~; D" p/ Xresponse.write ("这样的天才发明家还没生出来呢"), `& j# s0 h7 U. P
else%>
: D7 U& ]& q$ d. e( T% S3 w</p>
/ N: ~; b# l2 a& h! G7 K<table width="784" border="1"># }; I( z( F1 q& i: l0 j8 L
<tr>
( O0 K5 |7 g0 A4 k6 o <td width="53">编号</td>
, n" C: a# F5 S6 I <td width="254">商品名</td>
; p- l) P% O" g( F4 Y( V3 W <td width="53">产地</td>
9 j$ F& x, s7 N. P9 s5 d4 O6 \ <td width="277">简介</td>
9 j* K2 P; i% ]4 F1 h- x; M <td width="80">图片</td>6 y }( H/ \0 U9 C) b. z0 w/ {
<td width="42">价格</td>+ X* |5 r' Q! G! X# {
</tr>
x7 r6 @- \* | <%do while not rs.eof%>3 C9 r: c( s L( t* |; F9 ~1 B) h
<tr>
6 q# n9 d- ]% X* z; u5 [ <td><%=rs("id")%></td>1 ]! F" ] \7 V, }
<td><%=rs("name")%></td>; r0 r% k/ K( M5 S2 E
<td><%=rs("kind")%></td>3 l' W% W$ Q: [9 z, `) q
<td><%=rs("intro")%></td>
' t, A ?2 F3 Y4 F5 h/ z <td><a href="pic/<%=rs("pic")%>.jpg" target=_blank>点击看图</a></td>8 f3 f0 [3 r7 Y4 z, R6 @* K$ J3 J
<td><%=rs("pri")%></td>
: A' f! ]3 ?, x( k </tr>2 L( A0 F' ]+ F, k$ c3 c" V$ {
<%0 Z4 o; N$ u9 ?. L+ P3 y" R) t$ R
rs.MoveNext. R$ c+ `) r- o% h6 G, i. K$ g
Loop
. y! L) v2 o- E; u) {: p" H5 Yend if$ a/ J4 {. H/ A _
%>
. H2 D. e! h' y7 u4 d5 [/ n</table>
7 `6 Z5 ^9 u5 V" y, S4 F<br>
" V) F$ r" Z \<a href="index.asp">回首页继续寻找</a>
- a$ p7 B1 ?& s<%
# b3 D, j$ t7 [8 O w$ prs.close
8 ~1 ?( z% A# n/ {Set rs = Nothing
5 y) {. }! ~2 {5 N4 Y5 Cconn.close
/ q5 F/ Y$ U! g( l0 @1 M, s9 d. Xset conn=Nothing# m/ a/ S) K% C9 K6 O# _ S/ R
%>
' V$ v5 q. k! `- v/ O4 g4 y
" I$ Q+ r2 a5 U1 P8 Q G) B, o2 s[ 本帖最后由 工商小丫 于 2009-5-11 08:43 编辑 ] |
|