<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% strID = request("ID") %> <% Dim rsDetail Dim rsDetail_numRows Set rsDetail = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM Ads WHERE Add_ID = " & strID rsDetail.Open SQL, objADO, 1, 3 Set rscontact = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM TblLogin WHERE UserName = '" & rsDetail("cl_UserId") & "'" rscontact.Open SQL, objADO, 1, 3 strViewed = rsDetail("cl_viewed") strViewed = strViewed + 1 rsDetail("cl_viewed") = strViewed rsDetail.update %> <% %> <% %>

<%= rsDetail("Ad_Title")%>
<%If rsDetail("Ad_Photo") <> "" then%> " width="75" height="75" border="1"> <% else %> <% End If %>
<%=(rsDetail.Fields.Item("Ad_description").Value)%>

&AdID=<%= rsDetail("Add_ID") %>','','430','445','1','0','100','100');">Contact Seller
This Ad Has Been Viewed <%=(rsDetail.Fields.Item("cl_Viewed").Value)%> Times Back to Classifieds Home