源代码frft.asp
<!DOCTYPE HTML PUBLIC "
-//IETF//DTD HTML//EN" >
<html >
<head >
<meta http-equiv="Content-Type"
content="text/html; charset=gb_2312-80" >
<meta name="GENERATOR"
content="Microsoft FrontPage 2.0" >
<title ></title >
</head >
<body >
<% kname=request.QueryString("kname")%>
<base target="main" >
<form name="fm1" method="POST" action="forum.asp" >
<p align="center" ><input type="text" size="90"
name="content" ></p >
<p align="center" ><input type="button" name="B1"
value=" 提 交/ 刷 新" ><input type="reset"
name="B2" value=" 重 写" ></p>
<input type="hidden" name="kname"
value=<% =kname%> >
<p><input type="hidden" name="log" size="20" value="1">
</p>
</form>
<SCRIPT LANGUAGE="VBScript" >
Sub IeTimer1_Timer()
if fm1.content.value="" then
fm1.content.value=""
fm1.submit
else
end if
end sub
sub b1_onclick()
fm1.submit
fm1.content.value=""
end sub
</SCRIPT >
<OBJECT ID="IeTimer1" WIDTH=39 HEIGHT=39
CLASSID="CLSID:59CCB4A0-727D-
11CF-AC36-00AA00A47DD2"
CODEBASE="http://208.208.208.201/asp/ietimer.ocx" >
<PARAM NAME="_ExtentX" VALUE="1005" >
<PARAM NAME="_ExtentY" VALUE="1005" >
<PARAM NAME="Interval" VALUE="7000" >
</OBJECT >
</body >
</html >
一个简单聊天试的源代码！（四）
80酷酷网 80kuku.com
