再次请教页面闪动问题?
王释之 2000-03-26 04:31:00 请看下面源码:
---bjview.asp-----
<HTML>
<HEAD>
<TITLE>动态显示</TITLE>
</HEAD>
<meta http-equiv="refresh" content="4;URL=bjview.asp">
<BODY BGCOLOR="#f5f3f3">
<%
Set MyConn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("bjchat.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
MyConn.Open connstr
strq="SELECT * FROM webchat where datediff('h',posttime,date()+time())<=1 order by posttime desc"
Set RS=MyConn.Execute(strq)
num=0
while not(RS.EOF) and num<=15%>
<FONT SIZE="-1" color=#006600><b>[<%=right(RS("posttime"),8)%>]</b></FONT>
..............省略.......
<FONT size="-1" color="<%=RS ("color")%>"><%=RS("poster")%> 悄悄地对 <%=RS("destination")%> 说话.</FONT><BR>
<%
end if
RS.MoveNext
num=num+1
wend
RS.close
set RS=nothing
MyConn.Close
set MyConn=nothing
%>
望各位高手赐教!
还有一问:如何实现在名字上一点,在文本框就出现此人的名字?
谢谢!