<!--#Include File="Connection.Asp"-->
 
<%
Dim JaZ,C,flyN,B,cur
Dim Bid
Set JaZ = new q_zone
B = JaZ.JaKillStr(Request.QueryString("JaUid"))
If B="" Then
B= "2"
End If
C=Split(JaZ.GetHeadElement("*",B,"JaFaceSet",""),"<><><>")
flyN = split(Trim(C(2)),"|")
If Cint(Trim(C(1)))<>0 Then
cur = "CURSOR:url('cur/"&C(1)&".ani');"
Else
cur = ""
End If 

Bid = JaZ.JaKillStr(Request.QueryString("id"))
Dim JaCheckIsLog
JaCheckIsLog = JaZ.JaIsUser(B)
%>
<%
Dim ReStr,ReSQL,ReSQLs
Dim ReLen
Dim JahasSign,JahasReSign
ReSQL = "Jaid="&Bid&" "
ReSQLs = "Where Jaid="&Bid&" "
ReStr = JaZ.GetBlogRe("*","JaReBlog",ReSQL)
ReLen = JaZ.GetCount("Count(id)","JaReBlog",ReSQLs)
JahasSign = JaZ.GetCount("JaSign","JaBlogSet",ReSQLs)
%>
<html>
<head>
<META HTTP-EQUIV="PRAGMA" CONTENT="NO-CACHE">
<META http-equiv=Content-Type content=text/html;charset=gb2312>
<title>myzone-互动-个性小屋-在线交友-在线聊天</title>
<link type="text/css" rel="stylesheet" href="Style/<%=Trim(C(5))%>/css.css">
</head>
<script src="JsInc/JaTxt.js"></script>
<script src="JsInc/JaUbb.js"></script>
<script src="JsInc/JaG.js"></script>
<script>
function CheckJaUser() {
         if (document.diary_form.content.value=="")
           {
           alert("回复的内容不能为空!");
           document.diary_form.content.focus();
           return false;
           }
}

function showleft(th)
{
if (th.style.display == "none")
{
eval("th.style.display=\"\";");
document.getElementById("sc").src="Style/<%=Trim(C(5))%>/bt_mline_on.gif"
}
else
{
eval("th.style.display=\"none\";");
document.getElementById("sc").src="Style/<%=Trim(C(5))%>/bt_mline_off.gif"
}
}
var JaTitle,JaHit,JaRe,JaSort,JaMsg,JaDate;
var u=window.location.toString();
u=u.split('?');
u=u[1].split('&');
for(i=0;i<u.length;i++)
{
s=u[i].split("=");
eval(s[0]+'="'+s[1]+'"');
}
 
document.write("<iframe src='JaVicSet.Asp?id="+id+"' style='width:0;height:0;visibility:hidden'></iframe>");
var xobj=new ActiveXObject("Microsoft.XMLDOM");
xobj.async="false";

xobj.load("<%=SESSION("ServerUrl")%>/JaZone_xml.Asp?JaUid=<%=Request.QueryString("JaUid")%>");
var l = xobj.getElementsByTagName("JaZoneBlog").length;
for(var i=0;i<l;i++)
if(xobj.getElementsByTagName("JaId").item(i).text==id)
{
JaTitle = xobj.getElementsByTagName("JaTitle").item(i).text;
JaMsg = xobj.getElementsByTagName("JaMsg").item(i).text;
JaHit = xobj.getElementsByTagName("JaHit").item(i).text;
JaRe =  xobj.getElementsByTagName("JaRe").item(i).text;
JaSort =  xobj.getElementsByTagName("JaSort").item(i).text;
JaDate =  xobj.getElementsByTagName("JaDate").item(i).text;
}
</script>
<body leftmargin="2" topmargin="2" style="background-color:transparent;<%=cur%>" text="#cccccc" link="#cccccc" vlink="#cccccc" alink="#cccccc">

<table width="770" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td width="7" align="right" > 
      <div align="right"><img src="Style/<%=Trim(C(5))%>/t_t_l.gif" width="7"></div></td>
    <td width="599" background="Style/<%=Trim(C(5))%>/t_t_m.gif"><font color="#6699CC" size="2"><strong> 
      </strong></font> 
	 <%if Trim(C(5))="sky" Then%> 
      <table width="98%" border="0" align="center" cellpadding="0" cellspacing="0" style="cursor: hand;">
        <tr> 
          <td width="2%"><img src="Style/<%=Trim(C(5))%>/icon_01.gif"></td>
          <td width="88%"><strong class="datet">日志</strong></td>
          <td width="10%"><img src="Style/<%=Trim(C(5))%>/more.gif"></td>
        </tr>
      </table>
<%End If%>	  
    </td>
    <td width="7" align="right" > 
      <div align="left"><img src="Style/<%=Trim(C(5))%>/t_t_r.gif" width="7" border="0"></div></td>
  </tr>
  <tr> 
    <td background="Style/<%=Trim(C(5))%>/t_m_l.gif">&nbsp;</td>
    <td width="770" rowspan="2"> 
      <div align="center">
		 <%if Trim(C(5))="plady" Then%> 
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" style="cursor: hand;">
        <tr> 
          <td width="2%"><img src="Style/<%=Trim(C(5))%>/icon_01.gif"></td>
          <td width="88%"><strong class="datet">日志</strong></td>
          <td width="10%"><img src="Style/<%=Trim(C(5))%>/more.gif"></td>
        </tr>
      </table>
        <%End If%>
        <table width="99%"  border="0" cellspacing="0" cellpadding="0">
          <tr> 
            <td width="599" height="23" background="Style/<%=Trim(C(5))%>/titleback.gif">
              <table width="98%" border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td width="80%"><span class="classs"><img src="Style/<%=Trim(C(5))%>/b.gif" width="1" height="1" align="absmiddle" class="ltitle"></span> <span class="classs"><b>[<script>document.write(JaSort);</Script>]&nbsp;</b>&nbsp;<span class="num"><script>document.write(JaDate);</Script></span></span> 
                    </td>
                  <td width="20%"><div align="center"><a href="?JaUid=<%=B%>&id=<%If Cint(Request.QueryString("id")-1)>0 then Response.Write Cint(Request.QueryString("id")-1) else Response.Write "1" end if%>"><img src="Qz/bt_08.gif" alt="上一篇" width="14" height="14" hspace="3" vspace="2" border="0" align="absmiddle"></a>&nbsp;|&nbsp;<a href="?JaUid=<%=B%>&id=<%=Cint(Request.QueryString("id")+1)%>"><img src="Qz/bt_07.gif" alt="下一篇" width="15" height="14" hspace="3" vspace="2" border="0" align="absmiddle"></a><%If JaCheckIsLog="yes" Then%>&nbsp;|&nbsp;<a href="BlogEdit.asp?JaUid=<%=B%>&id=<%=Cint(Request.QueryString("id"))%>"><img src="Qz/bt_06.gif" alt="编辑" width="15" height="14" hspace="3" vspace="2" border="0" align="absmiddle"></a>&nbsp;|&nbsp;<a href="BlogDel.asp?JaUid=<%=B%>&id=<%=Cint(Request.QueryString("id"))%>" onClick="{if(confirm('确定删除吗?')){return true;}return false;}"><img src="Qz/bt_04.gif" alt="删除" width="15" height="14" hspace="3" vspace="2" border="0" align="absmiddle"></a><%End if%>&nbsp;|&nbsp;<a href="javascript:history.go(-1);"><img src="Qz/bt_11.gif" alt="返回" width="14" height="14" hspace="3" vspace="2" border="0" align="absmiddle"></a>&nbsp;</div></td>
                </tr>
              </table></td>
          </tr>
        </table>
        <table width="100%"  border="0" cellspacing="0" cellpadding="0" style="word-break:break-all ;word-wrap: break-all;">
          <tr align="center"> 
            <td width="75%"><table width="100%"  border="0" align="center" cellpadding="3" cellspacing="0">
                <td width="70%" class="shadows">&nbsp;<span class="classs"> 
<script>document.write(formatReplace(JaTitle));</Script><br>
                  </span></td>
                <td width="30%" align="right" valign="middle" class="shadows"><span class="datet">&nbsp;访问/评论&nbsp;</span><span class="num">(<script>document.write(JaHit);</Script>/<script>document.write(JaRe);</Script>)</span>&nbsp;</td>
                </tr>
<tr align="right"><td colspan="2">
               <span class=pback style="width:100px; height:20px;padding-top: 2px;text-align: center;cursor: hand;" onClick="clipboardData.setData('Text','http://myzone/Index.Asp?JaUid=<%=B%>');top.DIYcopy(top.helpZY);"><img src="Qz/link.gif" width="15" height="15" hspace="2" border="0" align="absmiddle">复制本文网址</span></td>
                  </tr>
              </table>
              <table width="95%"  border="0" cellspacing="0" cellpadding="0">
                <tr> 
                  <td height="26" colspan="2" class="text">
<script>
document.write(ubbReplace(JaMsg,"all"));
</Script>
                    </td>
                </tr>
<%
If JahasSign=1 Then
Dim JaUid,JaUsign
Dim JaUSQL
JaUid = JaZ.GetCount("JaUid","JaBlogSet",ReSQLs)
JaUSQL = "Where JaUid="&JaUid&" "
JaUsign = JaZ.GetCount("JaMemo","JaUser",JaUSQL)
JaUsign = JaZ.HTMLEncode(JaUsign)
JaUsign = Replace(JaUsign,"<BR>","\n")
%>
				<tr><td>
    &nbsp;&nbsp;--------------------------------------------------------------------------------
				</td></tr>
                <tr>
                  <td>  <table width="96%" border="0" align="center" cellpadding="0" cellspacing="0">
                      <tr>
                        <td>
<script>
document.write(ubbReplace("<%=JaUsign%>","all"));
</Script></td>
                      </tr>
                    </table> </td>
                </tr>
<%End if%>
              </table>
              <table width="95%"  border="0" cellspacing="0" cellpadding="0">
                <TR> 
                  <TD class=line colSpan=2></TD>
                </TR>
<%
Dim i
Dim JaReUsign
Dim JaReUSQL
Dim JaReMsg
For i=0 To ReLen-1
%>
<TR>
<TD class=text2><%=i+1%> 楼<B>
<A href='<%=SESSION("ServerUrl")%>/Index.asp?JaUid=<%=ReStr(3,i)%>' target="_blank"> <%=ReStr(2,i)%> </A>
</B><%=ReStr(5,i)%></TD>
                  <TD class="text2"><IMG src='Qz/bb_code.gif' alt='插入引用' width='22' height='20' border=0 align=absMiddle onClick="javascript:document.diary_form.content.value='[quote]<%=ReStr(4,i)%>[/quote]';">
                    &nbsp; 
                    <%If JaCheckIsLog="yes" Then%>
                    <a href="BlogDelRe.asp?JaUid=<%=B%>&id=<%=Bid%>&reid=<%=ReStr(0,i)%>" onClick="{if(confirm('确定删除吗?')){return true;}return false;}"><IMG src='Qz/bt_03.gif' alt='删除' border=0></a> 
                    <%End if%>
                    <SPAN id='usezyj1' name='usezyj1'></SPAN> </TD>
</TR>
<TR>
<TD colspan='2'>
<table width='96%' border='0' align='center' cellpadding='0' cellspacing='0'>
                      <tr> 
                        <td>
<%
JaReMsg = JaZ.HTMLEncode(ReStr(4,i))
JaReMsg = Replace(JaReMsg,"<BR>","\n")
%>
<script>
document.write(ubbReplace("<%=JaReMsg%>","all"));
</Script></td>
                      </tr>
<%
If ReStr(6,i)=1 Then
JaReUSQL = "Where JaUid="&ReStr(3,i)&" "
JaReUsign = JaZ.GetCount("JaMemo","JaUser",JaReUSQL)
JaReUsign = JaZ.HTMLEncode(JaReUsign)
JaReUsign = Replace(JaReUsign,"<BR>","\n")
%>
                      <tr>
                        <td>
--------------------------------------------------------------------------------
			</td>
                      </tr>
<tr><td>
<script>
document.write(ubbReplace("<%=JaReUsign%>","all"));
</Script>
</td>
</tr>
<%End if%>
                    </table></TD>
</TR>
<%Next%>
                
              </table>
              <br> <table width="95%"  border="0" align="center" cellpadding="1" cellspacing="1" class="back">
                <tr> 
                  <td class="backf"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                      <tr> 
                        <td class="title3">&nbsp;发&nbsp;表&nbsp;评&nbsp;论</td>
                      </tr>
                    </table>
                    <table width="100%"  border="0" align="center" cellpadding="0" cellspacing="12">
                      <form action="BlogRe.asp?JaUid=<%=B%>&id=<%=Bid%>" method="post" name="diary_form" onSubmit="return CheckJaUser();">
                        <tr> 
                          <td align="center"><table width="100%"  border="0" cellpadding="1" cellspacing="1" class="back">
                              <tr> 
                                <td class="backf"><table width="100%"  border="0" cellpadding="0" cellspacing="0">
                                    <tr> 
                                      <td height="13" class="shadows"><select name="selectface" onChange="ubbselectfont('face','document.all.selectface', 'diary_form.content');">
                                          <option  value="宋体" selected>宋体</option>
                                          <option  value="黒体">黒体</option>
                                          <option  value="仿宋_GB2312">仿宋</option>
                                          <option  value="隶书">隶书</option>
                                          <option  value="楷体_GB2312">楷体</option>
                                          <option  value="Times New Roman">Times 
                                          New Roman</option>
                                          <option  value="Arial Black">Arial Black</option>
                                          <option value="Verdana">Verdana</option>
                                          <option value="Helvetica">Helvetica</option>
                                        </select> <select name="selectsize" onChange="ubbselectfont('size','document.all.selectsize', 'diary_form.content');">
                                          <option value="1">1</option>
                                          <option value="2">2</option>
                                          <option value="3">3</option>
                                          <option value="4">4</option>
                                          <option value="5">5</option>
                                          <option value="6">6</option>
                                        </select> <a href="javascript:ubbfont('B', diary_form.content)"><img src="Qz/bb_bold.gif" alt="插入粗体文本" width="22" height="20" hspace="1" border="0" align="absmiddle"></a><a href="javascript:ubbfont('I', diary_form.content)"><img src="Qz/bb_italicize.gif" alt="插入斜体文本" width="22" height="20" hspace="1" border="0" align="absmiddle"></a><a href="javascript:ubbfont('U', diary_form.content)"><img src="Qz/bb_underline.gif" alt="插入下划线" width="22" height="20" hspace="1" border="0" align="absmiddle"></a><a href="javascript:ubbcolorm(diary_form.content)"><img src="Qz/bb_color.gif" alt="字体颜色" width="22" height="20" hspace="1" border="0" align="absmiddle"></a><a href="javascript:ubbfacem(diary_form.content)"><img src="Qz/bb_face.gif" alt="插入表情" width="22" height="20" hspace="1" border="0" align="absmiddle"></a><a href="javascript:ubbpicturem(diary_form.content)"><img src="Qz/bb_image.gif" alt="插入图像" width="22" height="20" hspace="1" border="0" align="absmiddle"></a><a href="javascript:ubbfont('M', diary_form.content)"><img src="Qz/bb_center.gif" alt="居中" width="22" height="20" hspace="1" border="0" align="absmiddle"></a><a href="javascript:ubbfont('R', diary_form.content)"><img src="Qz/bb_right.gif" alt="居右" width="22" height="20" hspace="1" border="0" align="absmiddle"></a>
                                        <input name="hassign" type="checkbox" id="hassign" value="yes" checked>
                                        使用签名档</td>
                                    </tr>
                                    <tr> 
                                      <td height="14" align="right" class="shadows"> 
                                      </td>
                                    </tr>
                                  </table>
                                  <textarea name="content" cols="" rows="5"  style="border: 0px; width:100%"></textarea> 
                                
                                </td>
                              </tr>
                            </table>
                            <input name="imageField" type="image" src="Qz/b.gif" width="1" height="1" border="0" class="submit" onClick="return checkAndSub()"> 
                            <input name="imageField" type="image" src="Qz/b.gif" width="1" height="1" border="0" class="reset" onClick="javascript:diary_form.reset();return false;"> 
                          </td>
                        </tr>
                      </form>
                    </table></td>
                </tr>
              </table>
              <table width="89%" border="0" align="center" cellpadding="0" cellspacing="0" class="shadows">
                <tr> 
                  <td height="3"></td>
                </tr>
              </table>
              <br></td>
          </tr>
        </table>
        <br>
      </div></td>
    <td width="7" background="Style/<%=Trim(C(5))%>/t_m_r.gif"> 
      <div align="left"></div></td>
  </tr>
  <tr> 
    <td background="Style/<%=Trim(C(5))%>/t_m_l.gif"></td>
    <td background="Style/<%=Trim(C(5))%>/t_m_r.gif">
<div align="left"></div></td>
  </tr>
  <tr> 
    <td height="7" align="right"><img src="Style/<%=Trim(C(5))%>/t_d_l.gif" width="7" height="7"></td>
    <td width="599" height="7" background="Style/<%=Trim(C(5))%>/t_d_m.gif"></td>
    <td height="7"><img src="Style/<%=Trim(C(5))%>/t_d_r.gif" width="7" height="7"></td>
  </tr>
</table>
</body>

</html>
