<!--#include file="inc/conn.asp"-->
<!--#include file="config.asp"-->
<!--#include file=topcnmai.asp-->
<%
dim rs,sql,cnmai,ThisPage
cnmai=HTMLEncode(request("cnmai")) 
if request("page")="" then
ThisPage=1		
else
ThisPage=request("page")
end if
function HTMLEncode(fString)
if not isnull(fString) then
fString = replace(fString, ">", "&gt;")
fString = replace(fString, "<", "&lt;")
fString = Replace(fString, CHR(32), "&nbsp;")
fString = Replace(fString, CHR(9), "&nbsp;")
fString = Replace(fString, CHR(34), "&quot;")
fString = Replace(fString, CHR(39), "&#39;")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
fString = Replace(fString, CHR(10), "<BR> ")
HTMLEncode = fString
end if
end function
%>
<script language="JavaScript">
function DrawImage(ImgD){
   var image=new Image();
   image.src=ImgD.src;
   if(image.width>0 && image.height>0){
    flag=true;
    if(image.width/image.height>= 160/160){
     if(image.width>160){  
     ImgD.width=160;
     ImgD.height=(image.height*160)/image.width;
     }else{
     ImgD.width=image.width;  
     ImgD.height=image.height;
     }

     }
    else{
     if(image.height>160){  
     ImgD.height=160;
     ImgD.width=(image.width*160)/image.height;     
     }else{
     ImgD.width=image.width;  
     ImgD.height=image.height;
     }

     }
    }
   /*else{
    ImgD.src="";
    ImgD.alt=""
    }*/
   }
</script>
<script LANGUAGE="JavaScript">
function checkMobile(){
	var sMobile = document.mobileform.mobile.value
	if(!(/^13[0-9]\d{4,8}$/.test(sMobile))){
		alert("不是完整的11位手机号或者正确的手机号前七位");
		document.mobileform.mobile.focus();
		return false;}
	window.open('', 'mobilewindow', 'height=197,width=350,status=yes,toolbar=no,menubar=no,location=no')
}</script>
<html>
<body topmargin="0"><center><%
set rs=server.createobject("adodb.recordset")
sql = "select * from xinxi where yz=1 and id="&cstr(cnmai)
rs.open sql,conn,1,3
if rs.eof or rs.BOF then
response.write "参数错误、记录已经删除或该信息没有通过管理员认证！<br>3秒内自动转回河南供求信息网首页"
response.write "<meta http-equiv=refresh content=""2;URL=index.asp"">"
response.end
end if
rs("llcs")=rs("llcs")+1
rs.update
%>
<%
dim rs1,sql1,id_1
set rs1=server.createobject("adodb.recordset")
sql1 = "select id,class1 from class1 where id="&cstr(rs("class1"))
rs1.open sql1,conn,1,1
id_1=rs1("id")
On Error Resume Next
%></center>
<head>
<title><%=rs("biaoti")%>-信息详细内容-<%=title%></title>
</head>
<div align="center">
<table border="0" width="760" cellspacing="0" cellpadding="0" style="border-left: 1px solid #808080; border-right: 1px solid #808080; border-top-width: 1px; border-bottom-width: 1px" bordercolor="#999999" id="table3">
	<tr>
		<td class=td5_muen height="30">&nbsp; <font color="#008080">位置导航：</font><a href="index.asp">首页</a><font color="#008080">→</font><a href="info.asp?class1=<%=rs1("id")%>&cnmai=1"><%=rs1("class1")%></a><font color="#008080">→</font>&nbsp;<span class=font2> <%=rs("biaoti")%></span></td>
	</tr>
</table>
<table cellSpacing="0" cellPadding="0" width="760" bgColor="#ffffff" border="0" style="border-left:1px solid #CCCCCC; border-right:1px solid #CCCCCC; border-top-color:#CCCCCC; border-top-width:1px; border-bottom-color:#CCCCCC; border-bottom-width:1px" >
<tr>
<td width="240" bgcolor="#FFFFF4" valign="top">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table1">
<tr><td class=td_muen height="26">&nbsp;<span class=font1><font face="Wingdings 2" size="4">R</font>&nbsp;推荐信息</td></tr>
<tr><td><%
dim tui_rs,tui_sql                 
' and tuijian=1  
tui_sql="select top 8 * from xinxi where yz=1 and class1="&id_1&" and tuijian=1  order by fbsj desc"                  
call tnh()              
%></td></tr>
<tr><td class=td_muen height="26">&nbsp;<span class=font1><font face="Wingdings 2" size="4">R</font>&nbsp;最新信息</span></td></tr>
<tr><td><%
tui_sql="select top 8 * from xinxi where yz=1 and class1="&id_1&" order by fbsj desc"                  
call tnh()                
%></td>
</tr>
<tr><td class=td_muen height="26">&nbsp;<span class=font1><font face="Webdings" size="4">2</font>&nbsp;赞助广告</span></td></tr>
<tr><td></td></tr></table></td>
<td class=td1_muen rowspan="5" width="3">　</td>
<td width="517" rowspan="3" valign="top"><div align="center">
<table border="0" bordercolor="#FFE9D2" cellspacing="1" style="border-collapse: collapse">
<tr>
<td height="38" colspan="4" align="center" style="border-top: 1px solid #C0C0C0; padding-left: 0; padding-right: 0; padding-top: 1px; padding-bottom: 1px">
<font size="3"><b>
<% 
if rs("leixing")<>"" then  
dim leixing
leixing=rs("leixing")
Select Case leixing
Case "1"
response.write "<font color=""#008000"">["&leixing1&"]</font>"
Case "2"
response.write "<font color=""#FF00FF"">["&leixing2&"]</font>"
Case "3"
response.write "<font color=""#008000"">["&leixing3&"]</font>"
Case "4"
response.write "<font color=""#FF00FF"">["&leixing4&"]</font>"
Case "5"
response.write "<font color=""#ff0000"">["&leixing5&"]</font>"
Case "6"
response.write "<font color=""#ff0000"">["&leixing6&"]</font>"
Case "7"
response.write "<font color=""#ff0000"">["&leixing7&"]</font>"
Case "8"
response.write "<font color=""#ff0000"">["&leixing8&"]</font>"
End Select%><%else%><%end if%>
<%if rs("tuijian")=1 then%><font color="#FF0000"><img border="0" src="image/num/jian.gif" alt="推荐信息"></font><%end if%><%if rs("a")="0" then%><%=rs("biaoti")%></b><%else%><font color="#<%=rs("a")%>"><b><%=rs("biaoti")%></b></font><%end if%></font></td>
</tr>
<tr><td height="27" colspan="4" style="border-bottom: 1px solid #C0C0C0; padding: 1px">
<p align="center"><b>发布时间：</b><%=rs("fbsj")%><%if rs("dqsj")<>"" then%><%dim sj
sj=DateDiff("d",now(),""&rs("dqsj")&"")
if sj>0 then %><font color="#FF0000">　还有<b><%=sj%></b>天结束</font><%else%>信息已经过期<%end if%></font><%else%><%end if%>　<b>浏览/回复：</b><%=rs("llcs")%>次/<%=rs("hfcs")%>次&nbsp;</td></tr>
<tr><td width="364" align="right" height="25" colspan="3">
<p align="left"><b>&nbsp;&nbsp;&nbsp; <font color="#999999">● 信息情况</font></b></td>
<td width="189" rowspan="7"><%if rs("tupian")="0" or rs("tupian")="" then%>
 
<a href="#" target="_blank" title="广告位招租">  
<img src="image/quetu.jpg" border=1 style="border: 1px solid #C0C0C0; "  width="160" height="160"></a>
<%else%>
<p align="center">
&nbsp;&nbsp;<a target=_blank href="<%=rs("tupian")%>"><img src="<%=rs("tupian")%>" border=1 width="160" onload="javascript:DrawImage(this);"  style="border: 1px solid #C0C0C0; " alt="查看图片" height="160"></a>
<%end if%></td>
</tr>
<tr><td width="10" align="right" height="161" rowspan="7">　</td>
<td width="85" align="right" height="24" background="image/dot.gif">信息地区：</td>
<td width="262" height="24" background="image/dot.gif"><%=rs("diqu")%></td>
</tr>
<tr>
<td width="85" align="right" height="24" background="image/dot.gif">信息类别：</td>
<td width="262" height="24" background="image/dot.gif">

<a href="info.asp?class1=<%=rs1("id")%>&cnmai=1"><%=rs1("class1")%></a> →
<%
set rs1=server.createobject("adodb.recordset") 
sql1 = "select id,class2 from class2 where id="&cstr(rs("class2"))
rs1.open sql1,conn,1,1
On Error Resume Next
%>
<a href="info.asp?class1=<%=id_1%>&class2=<%=rs1("id")%>&cnmai=2"><%=rs1("class2")%><%
rs1.close
set rs1=nothing
%></td>
</tr>
<tr>
<td width="85" align="right" height="24" background="image/dot.gif">
相关价格：</td>
<td width="262" height="24" background="image/dot.gif"><%if rs("jiage")="0" then %>面议<%else%><%=rs("jiage")%><%end if%></td></tr>
<tr>
<td width="85" align="right" height="24" background="image/dot.gif">
发布者：
　</td>
<td width="262" height="24" background="image/dot.gif"><%if rs("com")<>"" and rs("username")<>"" then %><a target="_blank" href="xinxi_mail.asp?id=<%=rs("id")%>"><%=rs("name")%>←[发邮件信息]</a><br><img border="0" alt="商家会员发布" src="image/shang.gif" width="15" height="15" ><a target="_blank" href="com.asp?com=<%=rs("username")%>"><%=rs("com")%>←<font color="#D56A00">[</font><font color="#D56A00">查看商家店铺</font></a><font color="#D56A00">]</font><%else if rs("username")<>"" and rs("com")="" then %><img border="0" alt="个人会员发布" src="image/ge.gif" ><a title="查看用户信息" target="_blank" href="per.asp?username=<%=rs("username")%>"><%=rs("name")%></a>←<font color="#D56A00">[</font><a title="给店家发信息" target="_blank" href="xinxi_mail.asp?id=<%=rs("id")%>"><font color="#D56A00">给发布者发短信</font></a><font color="#D56A00">]</font><%else%><%=rs("name")%>[游客快速发布]<%end if%><%end if%></td></tr>
<tr>
<td width="85" align="right" height="24" background="image/dot.gif">联系电话：　</td>
<td width="262" height="24" background="image/dot.gif"><%=rs("dianhua")%></td></tr>
<%if rs("qq")<>"" then %>
<tr>
<td width="85" align="right" height="24" background="image/dot.gif">QQ或MSN：　</td>
<td width="262" height="24" background="image/dot.gif"><a target=blank href=http://wpa.qq.com/msgrd?V=1&Uin=<%=rs("qq")%>&Menu=yes><img border="0" SRC=http://wpa.qq.com/pa?p=1:<%=rs("qq")%>:9 alt="用QQ给他发信息"><%=rs("qq")%></a></td></tr>
<%else%><%end if%>
<tr>
<td width="85" align="right" height="24" background="image/dot.gif">联系地址：</td>
<td width="455" height="24" background="image/dot.gif" colspan="2"><%=rs("dizhi")%></td></tr>
<tr><td width="570"  height="23" colspan="4"><b>&nbsp;&nbsp;&nbsp;
<font color="#999999">● 信息内容</font></b></td>
</tr>
<tr><td width="560" colspan="4" height="50" style="border-bottom: 1px solid #C0C0C0; padding: 1px">
<p style="line-height: 150%; margin: 0 10px" class=tmpstr>&nbsp;&nbsp;&nbsp;&nbsp;<%=HTMLEncode(rs("memo"))%></td></tr>
<tr><td colspan="4" height="26">
<table border="0" width="100%" cellspacing="0" cellpadding="0" id="table2">
<tr>
<td><FORM METHOD=POST ACTION="http://www.ip138.com/ips.asp" target="_blank" name="ipform" onSubmit="return checkIP();" style="line-height: 100%; margin-top: 0; margin-bottom: 0">
&nbsp;发布者IP:<input type="text" name="ip" size="15" value="<%=rs("ip")%>" style="border: 1px solid #FFFFFF; background-color: #FFFFFF"><input type="submit" value=" 查看ip " title="通过查看发布人IP，可以判断信息的可信度" style="background-color: #FFFFFF">
<INPUT TYPE="hidden" name="action" value="2"></FORM></td>
<td>
<form action="http://www.ip138.com:8080/search.asp" method="POST" onSubmit="return checkMobile();" target="mobilewindow" name="mobileform" style="margin-top: 0; margin-bottom: 0">  
<input type="hidden" name="action" value="mobile"><input class="TextBoxStyle" maxLength="11" name="mobile" size="15" value="<%=rs("dianhua")%>"> 
<input class="ButtonStyle" type="submit" value="手机归属查询" style="color: #FF0000; background-color:#FFFFFF"></form></td></tr>
</table>
</td></tr>
<tr><td width="560" colspan="4" height="12"><font color="#C0C0C0">&nbsp;<span style="font-size: 11pt">
</span><font size="2">&nbsp; </font></font><font color="#999999">
通过查看发布者IP和手机归属判断信息的真实性与合法性,请谨慎审核,理性抉择。</font></td></tr>
<tr>
  <td colspan="4" height="13"><table width="509" border="0" align="center">
    <tr>
      <td> <div align="center"><a href="http://www.jc2s.com/com.asp?com=pc-sos"><img src="image/99diannao.gif" alt="九九电脑保姆" width="145" height="55" border="0"></a></div></td>
      <td><div align="center"><a href="#"><img src="image/huangjin2.gif" alt="黄金广告位" width="145" height="55" border="0"></a></div></td>
      <td><div align="center"><a href="#"><img src="image/huangjin3.gif" alt="黄金广告位" width="145" height="55" border="0"></a></div></td>
    </tr>
  </table>
    <div align="center"><script language=javascript src="http://a.keyrun.com/pcode.php?username=jc2s&repl=1&adsuser=a0315&adsid=482&iw=468&ih=60&mode=1"></script></div></td>
</tr>
<tr><td width="560" align="right" colspan="4" height="26">
<div align="center">
<table border="0" cellpadding="0" style="border-style:solid; border-width:1px; padding:1px; border-collapse: collapse" bordercolor="#CCCCCC" width="100%" height="184">
<form action="xinxi_hf.asp?id=<%=rs("id")%>&xxusername=<%=rs("username")%>&cnmai=chk" method="POST">
<tr>
<td height="22" style="border-bottom-style: none; border-bottom-width: medium" colspan="2" bgcolor="#FFE9D2">
<p align="center"><b>给本信息发表回复</b></td>
</tr>
<tr>
<td height="20" colspan="2">
<p align="center">(站内提示：请随时关注您发布的信息，会有买/卖家给您留言!)</td>
</tr>
<tr>
<td height="20" colspan="2">
　 用户名：　  
  <input type="text" name="username" size="16" maxlength="50" value="<%=request.cookies("cnmai")("username")%>">&nbsp;&nbsp;
<input type="checkbox" name="nm" value="on">匿名发布&nbsp; [<a target="_blank" href="reg.asp">注册</a> <a target="_blank" href="login.asp">登陆</a>]</td>
</tr>
<tr>
<td width="74" height="71">
<p align="right">回复内容：</td>
<td width="419" height="71">
<textarea rows="4" name="neirong" cols="54"></textarea></td>
</tr>
<tr>
<td height="22" colspan="2">
<p align="center">
<input type="submit" value="提交回复" name="hf"></td>
</tr>
<tr>
<td colspan="2">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%">
<%
if rs("hfcs")>=1 then
rs.close
dim k
k=1
sql = "select top 10 * from hf where xxid='"&cnmai&"'"
rs.open sql,conn,1,1
%>
<%do while not rs.eof%>
<tr><td width="2%" height="25" bgcolor="#F9F9F9" style="padding:1px; border-bottom-style: dotted; border-bottom-width: 1px" bordercolor="#CCCCCC"></td>
<td width="5%" height="25" bgcolor="#F9F9F9" style="padding:1px; border-bottom-style: dotted; border-bottom-width: 1px" bordercolor="#CCCCCC"><b><%=k%></b>楼</td>
<td width="90%" height="25" bgcolor="#F9F9F9" style="padding:1px; border-bottom-style: dotted; border-bottom-width: 1px" bordercolor="#CCCCCC">该信息由<b><font color="#CC0000"><%if rs("username")<>"" then %><%=trim(rs("username"))%><%else%>匿名用户<%end if%></font></b>在<font color="#CC0000"><%=trim(rs("hfsj"))%></font>回复</td>
<td width="2%" height="25" bgcolor="#F9F9F9" style="padding:1px; border-bottom-style: dotted; border-bottom-width: 1px" bordercolor="#CCCCCC"></td></tr>
<tr><td width="2%" height="1" style="border-top-style: solid; border-top-width: 1"></td>
<td width="6%" height="1" style="border-top-style: solid; border-top-width: 1"></td>
<td width="90%" height="1" style="border-top-style: solid; border-top-width: 1" class=tmpstr><%=HTMLEncode(rs("neirong"))%></td><td width="2%" height="1" style="border-top-style: solid; border-top-width: 1"></td>
</tr>
<%
rs.movenext
k=k+1
loop
end if
%>
<tr><td width="100%" height="1" colspan="4"></td></tr>
</table>      	</td>
</tr>
</form>
</table></div>
</td>
</tr>
<tr><td width="560" align="right" colspan="4"></td></tr>
</table>
</div></td></tr>
</table>
</div>
<!--#include file=endcnmai.asp-->
</body>
</html>
<%
sub tnh()
set tui_rs=server.createobject("adodb.recordset")  
tui_rs.open tui_sql,conn,1,1                                     
if tui_rs.eof and tui_rs.bof then                   
response.write "<p align=""center"">没有此类信息</p>"                   
else                   
do while not tui_rs.eof
response.write "<img src=""image/point05.gif"" >"  
if tui_rs("tupian")<>"0" then
response.write "<img src=""image/num/pic.gif"" alt=""有图片"">"
end if                   
response.write " <a href=""xinximemo.asp?cnmai="& tui_rs("id")&""" title="""&tui_rs("biaoti")&""">"& mid(tui_rs("biaoti"),1,18) & "</a><br>"                     
tui_rs.movenext                   
loop                   
end if                   
tui_rs.close
set tui_rs=nothing
end sub%>
<%
rs.close
set rs=nothing
closedb
%>