该用户从未签到
|
哎,又要交作业了...
) O; n) L7 G9 p1 D# {) g' W谁帮帮我啊?
! c3 j' ^0 X" y- U" R7 a老师让我们设计一个订单系统,要求:/ f( c2 @; S3 S3 S7 N6 G
1 产品系统,字段包括 品名 介绍 产地 价格 小图片 大图片
- h, M0 D/ w( L' e8 H0 R8 S+ [2 关键词查询 可以对品名 介绍 产地等进行组合查询,多页面显示
, ~$ D/ x: r" X+ S! z3 在线订单,自动算价格(运费统一),不必注册可以在线提交订单(后台可见)0 m; y7 k' d5 O% l6 O3 w/ @. M( C
4 asp .net php系统都可以% y: Z- W2 j& |" [
一看到我就头大了,我知道学哥学姐来说是小菜一碟...$ L0 B5 B# V( V2 ^2 v
头痛,玩游戏去了,谁帮我请我玩游戏阿,嘻嘻
; `) U, ?5 i' M. e+ ^2 u! [3 H" Z-------------/ U2 p. \) g% u/ G
我做了一个简版,大家帮我改改,不要让我功亏一篑阿(这么好的一个词我都能想起来...佩服自己了)。9 f( V# x$ O" E9 t# v- @
页面一 index.asp; O% L1 f# K& d% {
<html>9 G% }+ O' x7 g4 W1 O2 c
<head>. b X0 s, K: L- U" g$ i. b
<meta http-equiv="Content-Language" c>
c% E& I. p8 |4 |% q! c, A; a4 m<meta http-equiv="Content-Type" c>3 z4 `) _, r. h4 q* |
<title></title>. x( @! G7 a% L: I
<style type="text/css">3 k4 P! G' C2 W! q% b
<!--
/ q3 K7 ^8 ^. Z& y/ `7 V# ^.style1 {font-family: Arial, Helvetica, sans-serif}. l6 ~( E( B1 D
.style5 {
H' q% b- p3 [) R: s* L font-family: Verdana, Arial, Helvetica, sans-serif;
, J* z8 i* L5 \" W1 j font-style: italic;1 [) i+ O% N5 E) T: v
}1 Q+ Z( E$ H7 E
.style7 {color: #FF0080}
; q( Q% W, R- h* Y4 k. R.style8 {color: #0000FF}: E5 \, k2 g' K, e
-->
: p" V2 \" W5 U9 {</style>3 W" T) v0 V5 r" n h" d$ M( ?
</head>1 E. Q- _6 |: X) c- W7 s5 p! t
<body>
, M- U! q, c) L& G q, d<form action="list.asp" method="post">/ m9 W$ e5 l! }( J+ W
<input type="text" size="55" name="intro" value="2 这里填关键字...">3 _: e1 F5 S6 u& J5 t% o+ f
<input type="submit" name="submit" value="就找这样的...">
( F+ f W, v& Y8 u {4 ?</form>; [. f3 ?% c, a+ x$ {: L
</body>, o( P. U5 P/ H0 f, }/ _( V$ `5 C
</html>* Y. ]6 D& u8 H' X
. L$ H! \6 y/ i/ I3 d
页面二
! h* W6 S& O5 ?<!--#include file="conn.asp" -->; o# F, f% i/ W* H
<style type="text/css">
5 N7 E/ N5 \4 M<!--& G' K" z; l* S' q3 e. i; U, K1 V
.style5 { font-family: Verdana, Arial, Helvetica, sans-serif;. T" i2 K, P0 v8 F
font-style: italic;
: G- p' b& F# E. N* B6 G}
6 C' E: B0 M7 q/ D! D( a- }& D.style6 {color: #FF0080}: H! L' x7 ^* A: ^( |
.style7 {color: #0080FF}" H( O. {' u p* Y7 b# J$ U3 a0 \
-->2 X8 w# y3 D/ H# [- O
</style>
' o7 N0 V/ Y1 q/ _" N! q3 G! \ <%: h7 A$ ]! S3 _' s
intro=request.form("intro")% c: y# A: g1 K' @% |
Set rs = Server.CreateObject ("ADODB.Recordset") S: j& h( @8 ]
sql = "Select * from biao1 where intro like '%"&intro&"%' order by zd desc "
& Y+ J5 I& ]' ]rs.Open sql,conn,1,1. O& [6 `9 Q: q! V G
%>
5 ?$ S; E9 x$ [) H y! X' o6 f6 G <%% i8 o/ h8 @1 i; Y" d E8 U. Y
if rs.EOF and rs.BOF then
. | i( ]% E9 {3 s% i7 l5 wresponse.write ("这样的天才发明家还没生出来呢")
7 J5 C9 l8 c1 j& W/ c! Jelse%>
0 p! d+ ]& |$ X5 a</p>
' R, j8 K/ u% r. z: s: z. Y<table width="784" border="1">
% j" s% s& A& d8 u$ g! { <tr>
, A& G( \0 a: T0 s7 }( q, ` <td width="53">编号</td>8 X" C3 V/ E+ ~. c; c [8 T
<td width="254">商品名</td>
6 L6 x. q j1 C @8 h2 O& _/ j, K' s <td width="53">产地</td>) r( w. {- _1 d0 x
<td width="277">简介</td>
* [9 R; x& m3 Q3 v; O <td width="80">图片</td>& g, a$ t, s6 _, M. {
<td width="42">价格</td>- P; Z, D2 T" r7 j" p) A+ v, U
</tr>
5 o" ~1 s7 p# a, X1 y7 N <%do while not rs.eof%>5 O$ k9 Z4 G7 h6 ^
<tr>
, P, t( [" ?/ G. I# A <td><%=rs("id")%></td>7 ?' q2 ] ~! f5 }
<td><%=rs("name")%></td>) Y7 o8 f' }; d$ ?# i
<td><%=rs("kind")%></td>- t0 A$ S( x7 u) ]" ?7 o
<td><%=rs("intro")%></td>
6 w8 i I2 F1 `2 |9 ]& F* q1 f <td><a href="pic/<%=rs("pic")%>.jpg" target=_blank>点击看图</a></td>
+ T1 Z8 ?7 c" T1 n <td><%=rs("pri")%></td>
, v1 u0 ]2 O* L </tr>0 }0 l% P6 @0 a9 a
<%
& |1 \, j, x) g! Zrs.MoveNext
T1 C( x D8 t) G/ t- CLoop
. {% Y: p$ s3 S* ^end if
+ E9 J% s9 v9 B- l%>
$ I+ T6 ~4 O& W5 B: r- m6 @</table>/ N- g, u# e5 S n
<br>
! P4 g0 ~% R n! s6 ^- I# t9 J<a href="index.asp">回首页继续寻找</a>
/ Y, @& _5 |2 X1 ~- U$ l& j! Y<%3 p, i5 a* T! I( K
rs.close
4 f4 j: T7 @% r C, o( _( P, JSet rs = Nothing: X( T, Y. x) B$ n
conn.close , E" q; P. L+ J3 ]
set conn=Nothing
, S$ i# j9 p& R3 z' b%>
$ d2 X7 Y u" c4 l9 c9 {1 i8 K, u$ z e' o% P
[ 本帖最后由 工商小丫 于 2009-5-11 08:43 编辑 ] |
|