<%@ LANGUAGE=VBScript codepage ="936" %>

<%Response.Expires=0
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "Pragma","No-Cache"
Response.AddHeader "Cache-Control","Private"
Response.CacheControl = "No-Cache"




id=request("id")
if id="" then
	response.write "参数错误！"
	response.end
end if
if not isnumeric(id) then
	response.write "<script language=JavaScript>{alert('错误：ID请使用数字');window.close();}</script>"
	response.end
end if
mdbsj="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("zgzm.asp")
Set jm_conn=Server.CreateObject("ADODB.CONNECTION")
Set jm_rs=Server.CreateObject("ADODB.RecordSet")
jm_conn.open mdbsj
jm_rs.open "select * from zgjm where id="&id,jm_conn
if jm_rs.eof or jm_rs.bof then
	jmsay="没有找到你指定的梦类别。"
	lb="无"
else
	jmbt=jm_rs("b")
	jmsay=jm_rs("c")
	jmlb=jm_rs("a")
	jm_rs.close
	jm_rs.open "select * from lb where id="&jmlb,jm_conn
	if not (jm_rs.eof or jm_rs.bof) then
		lb=jm_rs("lb")
	else
		lb="未分类"
	end if
end if
jm_rs.close
jm_conn.close

set jm_rs=nothing
set jm_conn=nothing
%>
<html><head><title>周公解梦</title><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="style.css" rel=stylesheet></head>
<body background="images/zgjmbg.gif"><CENTER><TABLE cellSpacing=0 cellPadding=0 width=94% border=0><TBODY> 
<TR style="FONT-SIZE: 9pt">
        <TD colspan="2" bgColor=#b1c6e5></TD>
        <TD width=8 height=16></TD></TR>
<TR>
        <TD width=16 bgColor=#b1c6e5></TD>
        <TD style="FONT-SIZE: 10pt; LINE-HEIGHT: 160%" bgColor=#b1c6e5><BLOCKQUOTE> 
          <P align=center class="3D"><B>周公解梦</B></P>
<BR>
&nbsp;<b>类别：</b><font color=red><%=lb%></font> <b>你梦到了：</b><font color=red><%=jmbt%></font>  
<HR color=red SIZE=1><P style="word-break:break-all"><%=jmsay%></p>
<HR color=red SIZE=1>
          <P align=center> 
            <input type=button value="关闭窗口" onclick="window.close()" class="input">
            <br><br>
          </P>
      </TD><TD align=middle width=8 bgColor=#808080></TD></TR>
<TR style="FONT-SIZE: 3pt" align=middle><TD width=16 height=8></TD><TD bgColor=#808080 height=8></TD>
<TD width=8 bgColor=#808080 height=8></TD></TR></TBODY></TABLE></CENTER></body></html>
