<%@ language="vbscript" %>
<%
if session("username")="" then
   response.redirect "login.htm"
   response.end
end if
set conn=server.createobject("ADODB.connection")
conn.open "DBQ=" & server.MapPath("datebase.mdb") & ";DRIVER={Microsoft Access Driver (*.mdb)}"
idname=trim(request("id"))
if idname="" then
   response.write "操作錯(cuò)誤"
   response.end
else
   id=Cint(idname)
end if
set rs=conn.execute("select * from goodslist where id=" & id)
set ur=conn.execute("select * from onsell where 商品id='" & idname & "' order by 叫價(jià) desc")
if ur.eof then
   jj="本商品還沒(méi)有任何叫價(jià)"
else
   jj=ur("叫價(jià)") & "元"
end if
%>
我要叫價(jià)
本商品的目前最高叫價(jià)是：<%=jj%><Br>
本商品的叫價(jià)單位是：<%=rs("叫價(jià)單位")%>元
<form method="post" action="addjj.asp?id=<%=id%>">
價(jià)格：<input type=text name="price">(建議<%
    if jj="本商品還沒(méi)有任何叫價(jià)" then%>
          <%=rs("底價(jià)")%>
    <%else%>
       <%=ur("叫價(jià)")+rs("叫價(jià)單位")%>
    <%end if%>元)<br>
您是否要代理？<input type="radio" value=yes name="proxy" checked>是<input type="radio" value=no name=proxy>否<br>
代理叫價(jià)：<input type=text name="pp"></br>
留言：<textarea cols=30 rows=2 name="mess"></textarea><br>
<input type="submit" value="叫價(jià)"><input type="reset" value="重叫">
</form>