watch.asp原碼如下:<!--#include file="connstr.asp"--> <% username=session("username") if username<>"" then
sql="select toname,isread,adddate from talks where toname='"& username &"'and isread=0 order by adddate" set rs=conn.execute(sql) if not rs.eof then response.write "<script>window.open('showmessage.asp','','width=580,height=400,scrollbars=yes')</script>" end if rs.close set rs=nothing conn.close set conn=nothing
end if%>
function doRefresh(){ document.frmRefresh.location="watch.asp"; setInterval("doRefresh()",60000) }用 setInterval
<%
username=session("username")
if username<>"" then
sql="select toname,isread,adddate from talks where toname='"& username &"'and isread=0 order by adddate"
set rs=conn.execute(sql)
if not rs.eof then
response.write "<script>window.open('showmessage.asp','','width=580,height=400,scrollbars=yes')</script>"
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
end if%>
document.frmRefresh.location="watch.asp";
setInterval("doRefresh()",60000)
}用 setInterval