没人回答嘛?
我把源代码贴出来了:Head.asp...
<!-- 实时接收短消息、在线聊天呼叫等 --><iframe src="/Inc/Refresh.asp" name="RefreshPage" width="0" height="0" frameborder="no" framespacing="0" scrolling="no"></iframe><script language="JavaScript">
<!--
function RefreshIt() {
setTimeout("RefreshIt()", 10000);
RefreshPage.location.reload();
}
RefreshIt();
//-->
</script>
...Refresh.asp...
<%
'检测新短信OpenConn ConnSQL = "Select Top 1 * From t_SMS Where ToID = " & AccountID & " And IsRead = 0"
Set Rs = Conn.Execute(SQL)

If Not Rs.EOF Then
%>
<script language="JavaScript">
<!--
var NewSMSWin;
if (!NewSMSWin) {
NewSMSWin = window.open('/SMS/Show.asp', 'NewSMS', 'width=370, height=210, scrollbars=yes');
}
//-->
</script>
<%
End If
%>
...