WANTED ITEM

<%if request("upload") = "done" then%>

Thank you for advertising your wanted item on our noticeboard. ">Click here to view our listings.

<%else%> <% Set MyCmd = Server.CreateObject("ADODB.Command") MyCmd.ActiveConnection = MyConn MyCmd.CommandText = "SELECT * FROM Forces_Wanted WHERE ItemID = ?" MyCmd.Parameters.Append MyCmd.CreateParameter("", 3, 1, , request("id")) Set RSInfo = Server.CreateObject("ADODB.RecordSet") RSInfo.Open MyCmd Do While Not RSInfo.EOF %>

Wanted item

"> <%if RSInfo("thumb1") <> "" then%> <%end if%> <%if RSInfo("thumb2") <> "" then%> <%end if%> <%if RSInfo("thumb3") <> "" then%> <%end if%> Category: <%GETCat = "SELECT * FROM Forces_ItemCategories WHERE CatID = '"&RSInfo("CatID")&"' " SET RSCat = MyConn.execute(GETCat) Do While NOT RSCat.EOF%> <%=RSCat("Category")%> <%RSCat.Movenext Loop%>   Item Title: <%=RSInfo("Title")%>   Price : <%=RSInfo("Price")%> in <%=RSInfo("currency")%>   Description: <%=Replace(RSInfo("Description"),vbCrLf," ")%>   Condition: <%=RSInfo("Condition")%>   Location: <%=RSInfo("location")%>   Telephone No: <%=RSInfo("telno")%>   Email: <%=RSInfo("email")%>   Listing Duration: <%=RSInfo("listingduration")%>   Image 1: " width="80" alt="" border="0">   Image 2: " width="80" alt="" border="0">   Image 3: " width="80" alt="" border="0">

<%RSInfo.Movenext Loop end if%>