sub OpenView(loadinfo,wintitle)
system.style.width=600
system.style.left=(clng(screen.width)-600)/2
all.document.write ""&loadinfo&""
Windowtitle.innerHTML=""
ScrollAndShow
end sub
'-------------------
sub ViewText
system.style.width=600
system.style.left=(clng(screen.width)-600)/2
all.document.write "正在读取贴子信息..."
windowtitle.innerHTML=""
ScrollAndShow
end sub
'-------------------
sub ViewUser(user)
system.style.width=300
system.style.left=(clng(screen.width)-300)/2
all.document.write "正在读取用户信息...."
windowtitle.innerHTML=""
ScrollAndShow
end sub
sub ScrollAndShow
system.style.Visibility="visible"
system.style.top=document.body.scrolltop+100
end sub
sub closewin
system.style.Visibility="hidden"
end sub
sub SH
if system.style.Visibility="hidden" then
if window.event.keycode=192 then ScrollAndShow
else
if window.event.keycode=192 then system.style.Visibility="hidden"
end if
end sub
sub SHL(textid,imgid)
if document.getelementbyid(textid).style.overflow="hidden" then
document.getelementbyid(textid).style.overflow="visible"
document.getelementbyid(imgid).src="sub.gif"
else
document.getelementbyid(textid).style.overflow="hidden"
document.getelementbyid(imgid).src="add.gif"
end if
end sub