<!-- #include file="conn.asp" -->
<%
if session("userid")="" then
response.Write "<script language='javascript'>alert('网络超时或您还没有登陆!')window.location.href='clogin.asp'</script>"
response.redirect "clogin.asp"
response.end
end if
%>
<html>
<head>
<meta http-equiv="content-type" content="text/htmlcharset=gb2312">
<title>修改密码</title>
<style type="text/css">
<!--
body,td,th {
font-size:14px
}
-->
</style>
</head>
<center>
<body>
<br>
<%
userid=session("userid")
pwd=session("pwd")
set rsc=server.CreateObject("adodb.recordset")
sqlc="select * from login where userid='"&userid&"' and pwd='"&pwd&"'"
rsc.open sqlc,conn,1,1
username=rsc("userid")
password=rsc("pwd")
rsc.close
set rsc=nothing
%>
<form name="form1" method="post" action="changer.asp?ac=ch">
<table width="39%" height="105" border="0">
<tr >
<td width="27%" height="30">用户名:</td>
<td width="73%" height="30"><input name="username" type="text" id="username" value="<%=username%>">
*<input type="hidden" name="userid" value="<%=password%>"></td>
</tr>
<tr>
<td height="30">密 码:</td>
<td height="30"><input name="password" type="text" id="password" value="<%=password%>">
*<input type="hidden" name="pwd" value="<%=password%>"></td>
</tr>
<tr>
<td></td>
<td><input type="submit" name="submit" value="修改"><a href="changer.asp?se=y" target="_self">退出系统</a></td>
<%
if strcomp(request.QueryString("se"),"y")=0 then
session("userid")=""
response.Write"<script language=javascript>opener=nullwindow.close()</script>"
end if
%>
</tr>
</table>
</form>
<%
if strcomp(request.QueryString("ac"),"ch")=0 then
set rs=server.CreateObject("adodb.recordset")
sql="select * from login where userid='"&request("userid")&"' and pwd='"&request("pwd")&"'"
rs.open sql,conn,1,3
if not rs.eof then
rs("userid")=request.Form("username")
rs("pwd")=request.Form("password")
rs.update
rs.close
set rs=nothing
Session.Contents.Remove("userid")
Session.Contents.Remove("pwd")
Session("userid")=request.Form("username") '把用户名写入session
Session("pwd")=request.Form("password") '把密码写入session
response.write "<script language=JavaScript>{window.alert('恭喜!修改成功!')window.history.go(-1)}</script>"
response.end
else
%>
<script language="javascript">
alert("用户名或密码错误!")
</script>
<%end if
end if
%>
</body>
</center>
</html>
太 极 图<TABLE width=768 align=center border=0>
<TR>
<TD vAlign=center width=543 height=40>
<DIV align=center><FONT color=#ff0000 size=4><B>太 极 图</B></FONT></DIV></TD></TR>
<TR>
<TD width=543>
<DIV align=left><FONT color=#000000><BR><STRONG> 何谓太极呢?</STRONG>太有至的意思极有极限之义, 就是至于极限, 无有相匹之意. 既包括了至极之理, 也包括了至大至小的时空极限, 放之则弥六合, 卷之退藏于心. 可以大于任意量而不能超越圆周和空间,也可以小于任意量而不等于零或无, 以上是太极二字的含义.太极图是研究周易学原理的一张重要的图象, 它包含了天地万物的共通规律在内, 所以有人说它是宇宙的模式, 是科学的灯塔。<BR><STRONG> 但太极图</STRONG>由于阴阳两面方位的移动和变换, 而又出现了不同的图象. 先天八卦图, 坤震离兑居左, 坤为母, 离再索而得女, 兑三索而得女, 三卦皆阴, 只震一索而得男为阳. 故太极图左面用黑色表示属阴, 黑中白点表示阴中有阳. 乾巽坎艮居右, 乾为父, 坎再索而得男, 艮三索而得男, 三卦比阳, 只巽一索而得女为阴, 故太极图右而用白色表示属阳, 白中黑点表示阳中有阴.<BR><STRONG> 本后天八卦图</STRONG>而绘制的太极图则恰与先天八卦图的太极图方向相反."太极元气, 含三为一", 为什么呢? 从太极图可以得出结论, 太极图这个圆圈, 就是代表的一, 代表的宇宙, 代表的无极. 太极是有限之天, 无极是无限之天太极是有, 无极是无太极是三, 无极是一. 图象的黑白二色, 代表阴阳两方, 天地两部黑白两方的的界限就是划分天地阴阳界的人部. 白中黑点表示阳中有阴, 黑方白点表示阴中有阳. 道生一, 就是无极生太极一生二就是太极生两仪二生三, 就是阴阳交感化合三生万物, 就是太极含三为一, 因万物由阴阳而化生, 故万物各具一太极, 也就是说, 太极不仅包含了阴阳两个方面, 还包含了划分阴阳的界线和标准在内. 若分而言之, 每卦有三爻, 也是代表天地人三才, 这也是含三为一之象. 又天有阴阳, 地有阴阳, 人亦有阴阳, 天之阴阳加上划界标准, 构成了含三为一的太极之象地之阴阳加划界中点构成含三为一的太极之象人部阴阳, 如男女雌雄亦各有它的划界标准, 所以万物也各有一太极, 也都是按照含三为一的规律而存在的.宇宙有无限大, 所以称为太极, 但是宇宙又是有形的, 即有实质的内容. 按易学的观点, 有形的东西来自于无形, 所以无极而太极.太极这个实体是健运不息的, 即宇宙在运动, 动则产生阳气, 动到一定程度, 变出现相对静止, 静则产生阴气, 如此一动一静, 阴阳之气互为其根, 运转于无穷. 自然界也是如此, 阴阳寒暑, 四时的生长化收藏,即万物的生长规律, 无不包含阴阳五行. 就人部阴阳而言"乾道成男, 坤道成女", 阴阳交合, 则化生万物, 万物按此规律生生不已, 故变化无穷. 这些内容提出了立天之道, 立地之道, 立人之道三纲领, 也就是三才之道, 所谓"六爻之动, 三极之道也."<BR></FONT></DIV></TD></TR>
<TR>
<TD width=543>
<DIV align=center><IMG src="http://www.hntyly.com/travel/ylc/bgzs/img/taiji.gif"></DIV></TD></TR></TABLE>
欢迎分享,转载请注明来源:优选云