28,390
社区成员
发帖
与我相关
我的任务
分享再次请教页面闪动问题？
请看下面源码：
---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
%>
望各位高手赐教！
还有一问：如何实现在名字上一点，在文本框就出现此人的名字？
谢谢！
---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
%>
望各位高手赐教！
还有一问：如何实现在名字上一点，在文本框就出现此人的名字？
谢谢！
...全文
请发表友善的回复…
发表回复
