ASP问题 请懂的人帮忙

来源：百度知道 编辑：UC知道 时间：2024/05/19 16:22:10
如何在留言里有表情让别人可以选择表情用呢?
谢谢``

<%
Dim action
action=Trim(Request("action"))
if action="SaveAdd" then
call SaveAdd()
else
call Add()
end if

Sub Add()
'------------------------------留言表情代码----------------------------------
%>

<style>
#ShowImg{width:380px;cursor:pointer;display:none;}
#Comment{border:1px solid #FF6600;width:380px;height:200px;overflow-y:hidden;}
</style>

<script language="Javascript">
function Emot(i){
var ConText=document.getElementById("Comment")
ConText.value=ConText.value+"[Emot]"+i+"[/Emot]";
ConText.focus();
}

function Show(i){
document.getElementById("ShowImg").style.display="block";
}
</script>
<form action="?action=SaveAdd" method="Post">
<div id="ShowImg" align="center">