<script language="VBScript">
sub textarea_onkeypress()
if right(document.form2.textarea.value,1)="." then
document.form2.textarea.value=replace(document.form2.textarea.value,".","。")
end if
end sub
</script>
<form name="form2" method="post" action="">
<textarea name="textarea"></textarea>
</form>