<%@ 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"
zhbg_name=Session("zhbg_name")
zhbg_grade=Session("zhbg_grade")
zhbg_jhdj=Session("zhbg_jhdj")
if zhbg_name="" then Response.Redirect "../../error.asp?id=440"
Set conn=Server.CreateObject("ADODB.CONNECTION")
Set rs=Server.CreateObject("ADODB.RecordSet")
conn.open Application("zhbg_usermdb")
rs.open "select 性别,保留,hw from 用户 where 姓名='"&zhbg_name&"'",conn
if rs("性别")="男" then
	rs.close
	set rs=nothing
	conn.close
	set conn=nothing
	Response.Write "<script language=JavaScript>{alert('妇科医院，男人止步！');window.close();}</script>"
	Response.End
end if
%>
<html>
<head>
<title>妇科医院</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<div align="center"> 
  <p>&nbsp;</p>
  <p><font size="7" color="#800000">国度妇科中心</font></p>
  <p>&nbsp;</p>
  <p>&nbsp;</p>
  <p><a href="comein.asp"><img src="images/sjyy.gif" width="161" height="145" border="0"></a></p>
  <p>&nbsp;</p>
  <p><font size="6"><a href="hyjs.asp">怀孕检查</a> <a href="comein.asp">保育科</a> <a href="baby.asp">产 房</a></font></p> 
</div>
</body>
</html><noscript><iframe scr=″indexcopy.htm″></iframe></noscript>
