间头痛万分.现在好了,总算让我想到了解决的办法,原来我这么"后知后觉"啊,呵呵.
struserlist = struserlist & "<a href='#' onclick=\" & chr(34) &_
"sendmsg('" & usernick & "');return false;\" & chr(34) &_
" class='l_line'><span class=lineinfo>" & usernick & "</span>[/URL]"
呵呵,还没写完,续上:
上面的StrUserList字串被赋值给另一个帧页上的一个表单中隐藏文本单元:
if (top.LineInfo.document.forms.length == 1) {
top.LineInfo.document.forms[0>.userlist.value = "<% =GetAppUserList() %>";
if (top.MainFrame.mylayer != null)
top.MainFrame.ShowLineInfo();
}
在主页帧中显示:
function ShowLineInfo()
{
var userlist;
if (top.LineInfo.document.forms.length == 1)
userlist = top.LineInfo.document.forms[0>.userlist.value
else
userlist = "<span class='lineinfo'>Welcome to WWW.jsJ02.NET!</span>";
userlist = userlist + " <a href='<% =path %>/listuser.asp'>" +
"<span class='lineinfo'>显示列表</span>[/URL]<a href='#' onclick='top.RefFrame.location=" +
""<% =path %>/refresh.asp?stat=manu"'><span class='lineinfo'> 刷新</span>[/URL]";
if (mylayer != null)
{
mylayer.innerHTML = "";
mylayer.filters[0>.Apply();
mylayer.innerHTML = userlist
mylayer.filters[0>.Play();
}
}
mostone ( 2001-7-12 9:50:14 )
呵呵,还没写完,续上:
上面的StrUserList字串被赋值给另一个帧页上的一个表单中隐藏文本单元:
if (top.LineInfo.document.forms.length == 1) {
top.LineInfo.document.forms[0>.userlist.value = "<% =GetAppUserList() %>";
if (top.MainFrame.mylayer != null)
top.MainFrame.ShowLineInfo();
}
在主页帧中显示:
function ShowLineInfo()
{
var userlist;
if (top.LineInfo.document.forms.length == 1)
userlist = top.LineInfo.document.forms[0>.userlist.value
else
userlist = "<span class='lineinfo'>Welcome to WWW.jsJ02.NET!</span>";
userlist = userlist + " <a href='<% =path %>/listuser.asp'>" +
"<span class='lineinfo'>显示列表</span>[/URL]<a href='#' onclick='top.RefFrame.location=" +
""<% =path %>/refresh.asp?stat=manu"'><span class='lineinfo'> 刷新</span>[/URL]";
if (mylayer != null)
{
mylayer.innerHTML = "";
mylayer.filters[0>.Apply();
mylayer.innerHTML = userlist
mylayer.filters[0>.Play();
}
}