热心网友
回答时间:2024-04-10 14:48
<%
str="6,419,579.10"
LStr=left(str,len(str)-3)
RStr=right(str,3)
response.write "<textarea id='test' style='overflow:hidden;width:146;height:22;text-align:right'></textarea>" & vbCrLf
response.write "<script language='javascript'>" & vbCrLf
response.write "var str='<font color=#ff9966>"&LStr&"</font><font color=#ff0000>"&RStr&"</font>';" & vbCrLf
response.write "txt=document.createElement();" & vbCrLf
response.write "txt.innerHTML=str;" & vbCrLf
response.write "test.appendChild(txt);" & vbCrLf
response.write "test.onkeydown=noEnter" & vbCrLf
response.write "function noEnter(){" & vbCrLf
response.write "if(event.keyCode==13)" & vbCrLf
response.write "return false" & vbCrLf
response.write "}" & vbCrLf
'response.write "window.onbeforeunload=function oLoad(){document.location.reload()}" & vbCrLf
response.write "</script>" & vbCrLf
%>
收起