<% dim infoid infoid=request("infoid") %> <% if infoid="" then response.write "

请选择您要查看的信息。

" response.end() end if set rs=server.createobject("adodb.recordset") sql="select * from User as a,Product as b where a.UserName=b.Product_Id and b.ID="&infoid rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write "没有找到该信息" response.end() else %>

公司介绍

<%=rs("CompanyName")%>

<% if rs("Qyjj")<>"" then response.write replace(rs("Qyjj"),chr(13)," ") end if %>

地    址：<%=rs("Add")%>   邮    编：<%=rs("Postcode")%>   联 系 人：<%=rs("Receiver")%>   电    话：<%=rs("Phone")%>   传    真：<%=rs("Fax")%>   电子邮箱：<%=rs("Email")%>   公司主页：<%=rs("HomePage")%>

产品信息

<% if rs("DefaultPicUrl")<>"" then %> " target="_blank"> 放大图片 <% else response.write "" end if %> 产品名称：<%=rs("Title")%> 产品类别：<%=rs("BigClassName")%>（<%if rs("SmallClassName")="" then response.write "无" else response.write rs("SmallClassName") end if%>） 产品售价：<%=rs("Price")%>（元）    发布时间：<%=formatdatetime(rs("UpdateTime"),1)%>    <% if rs("Content")<>"" then response.write replace(rs("Content"),chr(13)," ")&" " end if %>

<% end if rs.close set rs=nothing %>