gusucode.com > ASP+ACCESS在线教育系统设计(源代码+论文) > ASP+ACCESS在线教育系统设计(源代码+论文)\王智_在线教育系统\chat\default1.asp
<%@ Language=VBScript %> <HTML> <HEAD> <title></title> </HEAD> <BODY bgColor=#faebd7> <script language=vbscript> sub hover(name) document.images(name).src=name&"2.jpg" end sub sub hoverout(name) document.images(name).src=name&".jpg" end sub sub submitsub document.inputform.submit end sub sub cancelsub document.inputform.reset end sub </script> <center> <font color=#191970>今天是<%=year(now())%>年<%=month(now())%>月<%=day(now())%>日 <br> 欢迎加入讨论。请输入名字: </font> <form action=chat1.asp method=post name=inputform> 在这里输入名字: <input type=text name=user> <br> <img src=ok.jpg width=30 name="ok" onmouseover=hover("ok") onmouseout=hoverout("ok") onclick=submitsub> <img src=cancel.jpg width=30 name="cancel" onmouseover=hover("cancel") onmouseout=hoverout("cancel") onclick=cancelsub> </form> </center> </BODY> </HTML>