<!--#include file="inc/config.asp"-->
<!--#include file="inc/sub.asp"-->
<%
id=request.QueryString("id")
if id="" or IsNumeric(id)<>true then
	response.write"请输入正确的ID号！"
	response.end
end if
sql="select * from H_Sort where id="&id&""
set rs=server.createobject("adodb.recordset")                     
rs.open sql,conn,1,1 
if rs.eof then
response.Write "系统错误,请联系系统管理员或者开发商http://www.hn22.com/"
response.End()
else
UID=rs("UID")
H_Address=rs("H_Address")
H_title=rs("H_title")
H_Content=rs("H_Content")
H_sort_web=rs("H_sort")'防止非法赋值
H_Recommend=rs("H_Recommend")
H_Audit=rs("H_Audit")
H_PIC=rs("H_PIC")
Rdate=rs("Rdate")
if H_PIC="" or isnull(H_PIC) then
H_PIC="err.gif"
end if
sql="select ucuser,UGender,Uname,UAddress,UQQ from H_user  where ID="&UID&""
set rs=server.createobject("adodb.recordset")                     
rs.open sql,conn,1,1 
if rs.eof then
response.Write "系统错误,请联系系统管理员或者开发商http://www.hn22.com/错误信息H_user"
response.End()
else
ucuser=rs("ucuser")
UGender=rs("UGender")
Uname=rs("Uname")
UAddress=rs("UAddress")
UQQ=rs("UQQ")

end if
end if
rs.close
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=H_title%>,<%=W_title%>,网站首页</title>
<meta name="keywords" content="<%=W_keywords%>" />
<meta name="description" content="<%=W_description%>" />
<link href="images/css.css" rel="stylesheet" type="text/css" /></head>
<body>
<!--#include file="top.asp"-->
<table width="950" height="10" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td></td>
  </tr>
</table>
<table width="950" height="120" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="280" valign="top"><table width="268" height="0" border="0" cellpadding="0" cellspacing="1" bgcolor="#F3DBAB">
      <tr>
        <td bgcolor="#FFFFFF"><table width="100%" height="33" border="0" cellpadding="0" cellspacing="0" background="images/table_bg.jpg">
          <tr>
            <td class="lv">发布人信息</td>
          </tr>
        </table>
          <table width="100%" border="0" cellpadding="0" cellspacing="0">
            <tr>
              <td height="300" align="left" valign="top">
			  
			  <table width="250" border="0" align="center" cellpadding="0" cellspacing="0">
                <tr>
                  <td width="76" height="30">发 布 人：</td>
                  <td width="174"><%=Uname%> - <%if UGender=1 then response.Write "男" else response.Write "女" end if%></td>
                </tr>
                <tr>
                  <td height="30"><span class="hei">地址信息：</span></td>
                  <td><%=UAddress%></td>
                </tr>
                <tr>
                  <td height="30"><span class="hei">QQ号码：</span></td>
                  <td><%=UQQ%></td>
                </tr>
                <tr>
                  <td height="30"><span class="hei">个人空间：</span></td>
                  <td> <%
	set rs=Server.CreateObject("Adodb.Recordset")
	sql="select * from H_Domain where H_UI=1 and UID="&UID&""
	rs.open sql,conn,1,1
	if rs.eof then
	%>
  没有开通
  <%
  else
  %>
   <%if W_DNSkey<>1 then%>
	<A href="../thread/<%=rs("H_thread")%>/index.asp?Uid=<%=UID%>" target="_blank">立即查看</A>
	<%else%>
<A href="http://<%=rs("U_URL")%>.<%=W_DNS%>" target="_blank">立即查看</A>
	<%end if%>
	<%end if%></td>
                </tr>
                <tr>
                  <td height="30" colspan="2" align="center"><a href="user/MU.asp?HMuser=<%=ucuser%>&HMtxt=<%=H_title%>" target="_blank"><img src="images/xunwen.gif" width="58" height="20" /></a> <a href="user/FU.asp?FMuser=<%=ucuser%>&Fchar=<%=Uname%>" target="_blank"><img src="images/jiahaoyou.gif" width="58" height="20" /></a></td>
                  </tr>
              </table></td>
            </tr>
          </table></td>
      </tr>
      
    </table></td>
    <td width="670"><table width="670" height="0" border="0" cellpadding="0" cellspacing="1" bgcolor="#F3DBAB">
      <tr>
        <td bgcolor="#FFFFFF"><table width="100%" height="33" border="0" cellpadding="0" cellspacing="0" background="images/table_bg.jpg">
            <tr>
              <td align="center" class="hong"><strong><%=H_title%></strong></td>
            </tr>
          </table>
            <table width="600" height="10" border="0" cellpadding="0" cellspacing="0">
              <tr>
                <td></td>
              </tr>
            </table>
            <table width="660" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#EEEEEE">
              <tr>
                <td width="96" height="3" bgcolor="#FFFFFF" class="uc_huise">详细信息：</td>
                <td width="701" height="220" align="left" valign="top" bgcolor="#FFFFFF" style="padding-left:10px;"><%=H_Content%></td>
              </tr>
              <tr>
                <td width="96" height="3" bgcolor="#FFFFFF" class="uc_huise">联系方式：</td>
                <td height="30" align="left" valign="top" bgcolor="#FFFFFF" style="padding-left:10px;"><%=H_Address%></td>
              </tr>
              <tr>
                <td width="96" height="15" bgcolor="#FFFFFF" class="uc_huise">相关图片</td>
                <td height="120" align="left" bgcolor="#FFFFFF" style="padding-left:10px; padding-top:10px; padding-bottom:10xp;" ><img src="UpLoadUC/<%=H_PIC%>" onload='javascript:if(this.width>500){this.width=500}'  /></td>
              </tr>
            </table></td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="950" height="5" border="0" cellpadding="0" cellspacing="0">
  <tr>
    <td></td>
  </tr>
</table>
<!--#include file="end.asp"-->
</body>
</html>
