<% dim wdid wdid=request("wdid") %> <% if wdid="" 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="&wdid 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")%>

求购信息

产品名称： <%=rs("Title")%>     产品类别： <%=rs("BigClassName")%>(<%if rs("SmallClassName")="" then response.write "无" else response.write rs("SmallClassName") end if%>)     等级： <%=rs("Spec")%>     产地： <%=rs("EnSpec")%>     求购数量： <%=rs("Unit")%>     单价： <%=rs("Price")%>     产品所在地： <%=rs("EnUnit")%>     质量检验证明： <%=rs("EnTitle")%>     产品说明： <%=rs("Content")%>

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