<html>
<head>
<title>小论坛大家多多灌水^_^</title>
<meta http-equiv="content-type" content="text/html;charset=gb2312">
<link href="css/STYLE.CSS" rel="stylesheet">
<script language="javascript">
function fucCheck()
{
var i,j,strTemp,NUM;
NUM=document.form.page.value;
strTemp="0123456789";
if (NUM==""){
alert("请输入要转到的页数!!!\n\n交院出了个陈刚毅(名人广告)^-^!!!");
form.page.focus();
return (false);
}
for (i=0;i<NUM.length;i++)
{
j=strTemp.indexOf(NUM.charAt(i));
if (j==-1)
{
alert("只能输入数字!!!\n\n广告无处不在,希望广告商加盟^@^!!!");
form.page.focus();
return (false);
}
}
}
</script>
</head>
<body class="bg" background="img/bg.jpg">
<h2 align="center"><font color="#FF0000">〓前程似锦〓</font>
<font color="#FF0000" size="4">-----☆为了2008学好英语☆</font></h2><br>
<span class="style15"><a href="lyb.asp"><font color="#0033FF">返回主题页面>>></font></a></span>
<hr noshade size="1" color="#99CC00"><br>
<center>
<!--#include file="conn.asp"-->
<%set rs=server.CreateObject("adodb.recordset")
sql="select * from subject where subjectid="&Trim(request("subjectid"))
rs.open sql,conn,1,1
session("subjectid")=request("subjectid")
%>
<table border="1" width="80%" height="216" cellpadding="0" cellspacing="0" bordercolor="#0099CC">
<tr bordercolor="#0099cc">
<td width="20%" rowspan="2" align="center" valign="top"><img alt="图片现在还不提供变换,数据库还没有连接图片,不好意思!!!" src="face/m10.GIF" border="0" width="150" height="150">
<span class="style2"><strong>发起人:</strong></span><%=rs("username")%><br>
<%=rs("createtime")%></td>
<td width="80%" height="35" align="center"><span class="style2"><strong>主题:</strong></span><%=rs("topic")%></td>
<%session("zt")=rs("topic")%>
</tr>
<tr bordercolor="#0099cc">
<td width="80%" height="100%" valign="top"> <%=rs("content")%></td>
</tr>
</table>
<%set rs1=server.CreateObject("adodb.recordset")
sql3="select * from discussion where subjectid="&request("subjectid")& " order by replytime asc"
rs1.open sql3,conn,1,1
if rs1.eof or rs1.bof then
else
if not rs1.eof then rs1.movefirst
while not rs1.eof%>
<table border="1" width="80%" height="216" cellpadding="0" cellspacing="0" bordercolor="#0099CC">
<tr bordercolor="#0099cc">
<td width="20%" align="center" valign="top">
<img alt="图片现在还不提供变换,数据库还没有连接图片,不好意思!!!" src="face/w21.GIF" border="0" width="150" height="150">
<br><span class="style2"><strong>回复人:</strong></span><%=rs1("answer")%><br>
<%=rs1("replytime")%></td>
<td width="80%" valign="top"> <%=rs1("detail")%></td>
</tr>
</table>
<%rs1.movenext
wend
end if
%>
<hr noshade size="1" color="#99CC00">
<center><input type="button" class="buttonface" value="我来回答" onClick="javascript:window.navigate('hfly.asp')"></center>
</center>
<%rs1.close
set rs1=nothing
conn.close
set conn=nothing
%>
</body>
</html>
<head>
<title>小论坛大家多多灌水^_^</title>
<meta http-equiv="content-type" content="text/html;charset=gb2312">
<link href="css/STYLE.CSS" rel="stylesheet">
<script language="javascript">
function fucCheck()
{
var i,j,strTemp,NUM;
NUM=document.form.page.value;
strTemp="0123456789";
if (NUM==""){
alert("请输入要转到的页数!!!\n\n交院出了个陈刚毅(名人广告)^-^!!!");
form.page.focus();
return (false);
}
for (i=0;i<NUM.length;i++)
{
j=strTemp.indexOf(NUM.charAt(i));
if (j==-1)
{
alert("只能输入数字!!!\n\n广告无处不在,希望广告商加盟^@^!!!");
form.page.focus();
return (false);
}
}
}
</script>
</head>
<body class="bg" background="img/bg.jpg">
<h2 align="center"><font color="#FF0000">〓前程似锦〓</font>
<font color="#FF0000" size="4">-----☆为了2008学好英语☆</font></h2><br>
<span class="style15"><a href="lyb.asp"><font color="#0033FF">返回主题页面>>></font></a></span>
<hr noshade size="1" color="#99CC00"><br>
<center>
<!--#include file="conn.asp"-->
<%set rs=server.CreateObject("adodb.recordset")
sql="select * from subject where subjectid="&Trim(request("subjectid"))
rs.open sql,conn,1,1
session("subjectid")=request("subjectid")
%>
<table border="1" width="80%" height="216" cellpadding="0" cellspacing="0" bordercolor="#0099CC">
<tr bordercolor="#0099cc">
<td width="20%" rowspan="2" align="center" valign="top"><img alt="图片现在还不提供变换,数据库还没有连接图片,不好意思!!!" src="face/m10.GIF" border="0" width="150" height="150">
<span class="style2"><strong>发起人:</strong></span><%=rs("username")%><br>
<%=rs("createtime")%></td>
<td width="80%" height="35" align="center"><span class="style2"><strong>主题:</strong></span><%=rs("topic")%></td>
<%session("zt")=rs("topic")%>
</tr>
<tr bordercolor="#0099cc">
<td width="80%" height="100%" valign="top"> <%=rs("content")%></td>
</tr>
</table>
<%set rs1=server.CreateObject("adodb.recordset")
sql3="select * from discussion where subjectid="&request("subjectid")& " order by replytime asc"
rs1.open sql3,conn,1,1
if rs1.eof or rs1.bof then
else
if not rs1.eof then rs1.movefirst
while not rs1.eof%>
<table border="1" width="80%" height="216" cellpadding="0" cellspacing="0" bordercolor="#0099CC">
<tr bordercolor="#0099cc">
<td width="20%" align="center" valign="top">
<img alt="图片现在还不提供变换,数据库还没有连接图片,不好意思!!!" src="face/w21.GIF" border="0" width="150" height="150">
<br><span class="style2"><strong>回复人:</strong></span><%=rs1("answer")%><br>
<%=rs1("replytime")%></td>
<td width="80%" valign="top"> <%=rs1("detail")%></td>
</tr>
</table>
<%rs1.movenext
wend
end if
%>
<hr noshade size="1" color="#99CC00">
<center><input type="button" class="buttonface" value="我来回答" onClick="javascript:window.navigate('hfly.asp')"></center>
</center>
<%rs1.close
set rs1=nothing
conn.close
set conn=nothing
%>
</body>
</html>
浙公网安备 33010602011771号