|
哎,又要交作业了...- a/ ]9 M: n. H e$ K/ a- X5 a
谁帮帮我啊?2 z+ R( e, ^7 {# k
老师让我们设计一个订单系统,要求:5 {" H) Y6 W# c) X: K
1 产品系统,字段包括 品名 介绍 产地 价格 小图片 大图片
`' D0 u: ^1 Q) {( h2 关键词查询 可以对品名 介绍 产地等进行组合查询,多页面显示
5 C* {' F: B1 s% I3 在线订单,自动算价格(运费统一),不必注册可以在线提交订单(后台可见)$ m& T s9 Z2 U' d; A# n
4 asp .net php系统都可以
* `+ C- j! N3 v; l6 w# n+ S一看到我就头大了,我知道学哥学姐来说是小菜一碟...( P* G$ R7 W( U
头痛,玩游戏去了,谁帮我请我玩游戏阿,嘻嘻: C l4 j6 { w+ c+ }
-------------$ c% ]/ H4 u$ C; l% I
我做了一个简版,大家帮我改改,不要让我功亏一篑阿(这么好的一个词我都能想起来...佩服自己了)。& @4 K E6 j S
页面一 index.asp6 j" m( z. h! t) ^: f/ ?; \7 U
<html>
* g% s8 p) N( s- ?<head>
; D" M7 J9 h% a, L" P<meta http-equiv="Content-Language" c>, w1 S( }% m$ o3 u7 B; T
<meta http-equiv="Content-Type" c>- t) C4 ]8 w. P
<title></title>
* ~ j2 @9 O6 Q- X. _( Y* K<style type="text/css">
% E4 _2 }/ h" J<!--
: l' X1 i# T% o* c.style1 {font-family: Arial, Helvetica, sans-serif}6 q S" r7 x, ]% U ^
.style5 {( j: M" f' \ M. o9 K4 g
font-family: Verdana, Arial, Helvetica, sans-serif;
0 \0 b7 H! S& e2 i, M" M font-style: italic;
3 q' x. X3 |* H# x, x; J$ ^4 C; R, n5 o) o}7 N( N n! l. A+ U2 t
.style7 {color: #FF0080}! o3 u# @: n3 c% Q) Z, f, x* a% q+ U
.style8 {color: #0000FF}6 t6 z4 j7 B4 p7 t( L7 C8 `
-->4 r. F+ l4 D8 |' ^% o9 a
</style>8 j; P* d" u0 C) j( [2 }$ q
</head>) K8 v4 w( E9 r* z
<body>
0 i" `6 Y7 L) S) R! Y<form action="list.asp" method="post">2 q0 A$ i2 g" S9 A
<input type="text" size="55" name="intro" value="2 这里填关键字...">
' w j* }% |- Z2 L<input type="submit" name="submit" value="就找这样的..."> B4 b5 ]% F1 w7 V7 {: G# w; ?+ r4 o
</form>
9 f" F* I$ ?" S! r$ ~7 C</body>2 |9 b; I* y/ @# {0 c! P7 l4 ^
</html>
% V7 w. B5 ], C; l
7 O$ O$ U) j; U" s页面二
& r" ^" B1 \3 `) h+ ~3 @<!--#include file="conn.asp" -->
' n" U6 p% O3 M H* _, T* }<style type="text/css">
- X& o( Z6 q# ^4 Q) M9 F. O<!--
3 L$ k# x9 `) W$ n- J2 q.style5 { font-family: Verdana, Arial, Helvetica, sans-serif;
; x% S, S' g2 Z" l' a font-style: italic;
( ]4 l' r Z4 W' c}$ f: L: R: s: N; D3 I
.style6 {color: #FF0080}
+ a: _. s: X" x: O.style7 {color: #0080FF} m7 g" _3 @; d# O0 k8 J6 D! Y# Z
-->
3 |9 M4 R+ j# _2 A. L [" a! s</style>
. {6 Y" o( w3 q' I <%
1 J( ]$ m) u ?1 t& Z. f( Xintro=request.form("intro")
# S8 m6 \* F6 aSet rs = Server.CreateObject ("ADODB.Recordset")& W/ C" h% t0 X; B( x: ^5 f$ a
sql = "Select * from biao1 where intro like '%"&intro&"%' order by zd desc "/ h; p2 g1 Y3 D: R7 F. s! [! M
rs.Open sql,conn,1,1
+ K4 T2 B ^. r: z%>! S9 C3 h- {' W- _! F3 b
<%/ u/ i, Y- j/ {9 d5 e7 x/ R) r/ D
if rs.EOF and rs.BOF then
) o3 r9 h8 M" [' |response.write ("这样的天才发明家还没生出来呢")
5 y+ I4 z |# f9 D k! m2 relse%>
. f9 I( n- D. u: e( L9 i2 t</p>
9 Y+ N9 p! C3 b8 H8 Z8 b<table width="784" border="1">& g6 }* [7 |- N- B
<tr>
1 i g. ?! Y3 ?; k s; ^1 b( n' V <td width="53">编号</td>
; i- ^3 ]1 H& }2 E# R2 n' ] <td width="254">商品名</td> C0 F; t7 y/ b. T. V4 \$ m' N
<td width="53">产地</td>% ~' \1 d- l& A
<td width="277">简介</td> H) \& ]( R% ~1 m& q
<td width="80">图片</td>+ G0 z B; f' K7 M# u
<td width="42">价格</td>
* l% o& p( ?/ W! k% P- |: i </tr># n( g' H, t/ b0 c) s5 Y
<%do while not rs.eof%>
* ] ]) q. s- \0 H# P <tr>
& [; e5 h! s6 B' X, d0 S I. K) p <td><%=rs("id")%></td>
: b4 R! Q4 E8 T# ]0 c <td><%=rs("name")%></td>- P3 G' D+ b n, M+ B
<td><%=rs("kind")%></td>6 {1 N$ E7 G2 K3 p. r5 e8 T3 y" t
<td><%=rs("intro")%></td>' ~ E* M( E1 n. b& v
<td><a href="pic/<%=rs("pic")%>.jpg" target=_blank>点击看图</a></td>2 j$ W$ x. v% e2 W; h
<td><%=rs("pri")%></td>
8 p P' W5 j" h4 z+ N7 }$ I3 b </tr>% B" ?$ H6 | n5 ~) V' i( h
<%
$ `) ~$ a1 }, i. C# d$ S' D# K2 Nrs.MoveNext+ |0 U" C: r- R) I. G
Loop" n3 z. j8 S% h9 L4 e3 `8 ^
end if
! a4 {& a$ V/ E) l* ?: a%>6 Z4 l3 v% c5 Y/ {/ E8 m5 f
</table>9 @4 ` H' s" u2 s( A' s. Y
<br>) T$ D f2 s; m
<a href="index.asp">回首页继续寻找</a>6 v) S& H( G' c* c: O8 F+ H* y
<%- X6 [% b# I' C/ m" ^9 s! U6 j4 H% c
rs.close 4 s$ T# V$ O6 ]
Set rs = Nothing! B; m ~, R9 {
conn.close , t0 Q9 b: i% h$ E% f8 p6 k" Z
set conn=Nothing
* T% C" U! y& u2 }& ~9 ~%>0 K6 k$ T$ G3 N) A
x" b+ x" o3 q( c# |
[ 本帖最后由 工商小丫 于 2009-5-11 08:43 编辑 ] |
|