📄 body_item_information.asp
字号:
<%@ Language=VBScript%>
<%option explicit%>
<%Response.Expires=-1%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2 FINAL//EN">
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=ISO-8859-1">
<META NAME="Generator" CONTENT="NetObjects Fusion 4.0 Trial for Windows">
<TITLE>Item Information</TITLE>
<BASE TARGET="_parent">
</HEAD>
<BODY BACKGROUND="../FunkshowBackgr.gif" LINK="#99CCCC" VLINK="#CCCC99" TEXT="#FFFFCC" TOPMARGIN=2 LEFTMARGIN=2 MARGINWIDTH=2 MARGINHEIGHT=2>
<%
Server.Execute "../ValidateUser.asp"
dim auction_id
dim dbConnItem,dbRecItem,SqlString
Dim ItemId,ItemSeller,Category,title,itemdescription,Quantity,startBid
Dim Location,Country,Picture,Sound,ShippingCost,PaymentMode
auction_id=Request.QueryString("key")
set dbConnItem=Server.CreateObject("ADODB.Connection")
set dbRecItem=Server.CreateObject("ADODB.RecordSet")
dbConnItem.mode=adModeRead
dbConnItem.open "BidBase","Scott","tiger"
SqlString="select * from auctiondetails where auction_id="&auction_id
dbRecItem.open SqlString,dbConnItem
if not dbRecItem.EOF then
ItemId=auction_id
ItemSeller=dbRecItem("seller_login")
Category=dbRecItem("i_category")
title=dbRecItem("item_title")
itemdescription=dbRecItem("item_description")
Quantity=dbRecItem("item_quantity")
Location=dbRecItem("item_location")
Country=dbRecItem("item_country")
Picture=dbRecItem("item_picture")
Sound=dbRecItem("item_sound")
ShippingCost=dbRecItem("item_shipping_info")
PaymentMode=dbRecItem("item_payment_info")
end if
dbRecItem.close
dbRecItem.open "Select auction_start_bid from auction where auction_id="&auction_id,dbConnItem
StartBid=dbRecItem("auction_start_bid")
dbRecItem.close
dbConnItem.close
%>
<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=479 NOF=LY>
<TR VALIGN=TOP ALIGN=LEFT>
<TD WIDTH=11 HEIGHT=12><IMG SRC="../clearpixel.gif" WIDTH=11 HEIGHT=1 BORDER=0></TD>
<TD></TD>
</TR>
<TR VALIGN=TOP ALIGN=LEFT>
<TD HEIGHT=355></TD>
<TD WIDTH=468>
<FORM NAME="LayoutRegion1FORM" ACTION="./buy_this_item/body_buy_this_item.asp" TARGET="body" METHOD=POST>
<TABLE CELLPADDING=0 CELLSPACING=0 BORDER=0 WIDTH=419>
<TR VALIGN=TOP ALIGN=LEFT>
<TD>
<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 NOF="LayoutRegion1">
<TR VALIGN=TOP ALIGN=LEFT>
<TD WIDTH=19 HEIGHT=14><IMG SRC="clearpixel.gif" WIDTH=19 HEIGHT=1 BORDER=0></TD>
<TD></TD>
</TR>
<TR VALIGN=TOP ALIGN=LEFT>
<TD></TD>
<TD WIDTH=240>
<TABLE ID="Table1" BORDER=0 CELLSPACING=3 CELLPADDING=1 WIDTH=240>
<TR>
<TD WIDTH=113><P><b>Item ID<b></TD>
<TD WIDTH=114><%=ItemID%></TD>
</TR>
<TR>
<TD WIDTH=113><P><b>Item Seller</b></TD>
<TD><%=ItemSeller%></TD>
</TR>
<TR>
<TD WIDTH=113><P><b>Starting at</b></TD>
<TD>Rs.<%=startBid%></TD>
</TR>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>Category ID</b></TD>
<TD><%=category%></TD>
</TR>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>Title</b></TD>
<TD><%=title%></TD>
</TR>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>ItemDescription<b></TD>
<TD><%=ItemDescription%></TD>
</TR>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>Quantity</b></TD>
<TD><%=Quantity%></TD>
</TR>
<TR>
<TD WIDTH=113><P><b>Location</b></TD>
<TD><%=Location%></TD>
</TR>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>Country</b></TD>
<TD><%=Country%></TD>
</TR>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>Picture</b></TD>
<TD><%Response.Write "<A HREF='http://"&Picture&"' TARGET='_blank'>"&Picture&"</A>"%></TD>
</TR>
<TR>
<TD WIDTH=113><P><b>Sound</b></TD>
<TD><%Response.Write "<A HREF='http://"&Sound&"' TARGET='_blank'>"&Sound&"</A>"%></TD>
</TR>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>ShippingCost</b></TD>
<TD><%
if Cint(ShippingCost)=0 then
Response.Write "Seller will pay"
else
Response.Write "Buyer will pay"
end if
%>
</TD>
<TR>
<TD WIDTH=113 HEIGHT=19><P><b>PaymentMode</b></TD>
<TD><%
if Cint(paymentmode)=0 then
Response.Write "Visa/Master Card"
elseif Cint(paymentmode)=1 then
Response.Write "Cheque"
elseif Cint(paymentmode)=2 then
Response.Write "Direct Payment"
elseif Cint(paymentmode)=3 then
Response.Write "By Bonds"
end if
%>
<INPUT ID="auction" TYPE=hidden NAME="auction_id" VALUE="<%=ItemID%>" SIZE=20 MAXLENGTH=30>
<INPUT ID="startbid" TYPE=hidden NAME="start_bid" VALUE="<%=startbid%>" SIZE=20 MAXLENGTH=30>
<INPUT ID="quantity" TYPE=hidden NAME="quantity" VALUE="<%=Quantity%>" SIZE=20 MAXLENGTH=30>
</TR>
</TD>
</TR>
</TABLE>
</TD>
</TR>
</TABLE>
<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=213 NOF="LayoutRegion1">
<TR VALIGN=TOP ALIGN=LEFT>
<TD WIDTH=59 HEIGHT=37><IMG SRC="clearpixel.gif" WIDTH=59 HEIGHT=1 BORDER=0></TD>
<TD></TD>
</TR>
<TR VALIGN=TOP ALIGN=LEFT>
<TD HEIGHT=24></TD>
<TD WIDTH=154><INPUT TYPE=SUBMIT NAME="BuyThisItem" VALUE="Bid Item" ID="FormsButton8"></TD>
</TR>
</TABLE>
</TD>
<TD>
<TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH=160 NOF="LayoutRegion1">
<TR VALIGN=TOP ALIGN=LEFT>
<TD WIDTH=13 HsEIGHT=77><IMG SRC="clearpixel.gif" WIDTH=13 HEIGHT=1 BORDER=0></TD>
<TD WIDTH=147><IMG SRC="clearpixel.gif" WIDTH=147 HEIGHT=1 BORDER=0></TD>
</TR>
<TR VALIGN=TOP ALIGN=LEFT>
<TD></TD>
<TD WIDTH=147><P><A HREF="../View_Feed_Backs/body_view_feed_backs.asp?chk=<%=itemseller%>" TARGET="_blank">(View Seller FeedBack)</A></TD>
</TR>
</TABLE>
</TD>
</TR>
</TABLE>
</FORM>
</TD>
</TR>
</TABLE>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -