<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <HTML> <HEAD> <TITLE> New Document </TITLE> <META NAME="Generator" CONTENT="EditPlus"> <META NAME="Author" CONTENT=""> <META NAME="Keywords" CONTENT=""> <META NAME="Description" CONTENT=""> </HEAD><script language="vbscript"> Function FormatNumberShow(ByVal num) FormatNumberShow="0.00" On Error Resume Next num=cdbl(num) if Err.number<>0 then exit function
num=Int(num*100+0.5)/100 Dim iSymbol if num<0 then iSymbol=-1 num=-1*num else iSymbol=1 end if if num<0.01 then exit function FormatNumberShow=formatnumber(num*iSymbol,-1,-1,0,-1)
End Function </script> <script language="javascript"> ret=50/3 alert(FormatNumberShow(ret)) </script> <BODY></BODY> </HTML>
function window.onbeforeunload()
{
if (event.clientX>document.body.clientWidth-20 && event.clientY<0||event.altKey)
window.event.returnValue = execScript('removeUserFromRoom()','vbscript');
}
</script>
不能在客户端直接调服务段函数
可以<body onunload=form1.submit()>
<form name=form1 action=clear.asp>
...</form>
在clear.asp中来调
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
</HEAD><script language="vbscript">
Function FormatNumberShow(ByVal num)
FormatNumberShow="0.00"
On Error Resume Next
num=cdbl(num)
if Err.number<>0 then exit function
num=Int(num*100+0.5)/100
Dim iSymbol
if num<0 then
iSymbol=-1
num=-1*num
else
iSymbol=1
end if
if num<0.01 then exit function
FormatNumberShow=formatnumber(num*iSymbol,-1,-1,0,-1)
End Function
</script>
<script language="javascript">
ret=50/3
alert(FormatNumberShow(ret))
</script>
<BODY></BODY>
</HTML>