用dreamweaver在留言板里面做可以添加表情的功能具体怎么做呢?

用dreamweaver在留言板里面添加表情具体怎么做呢?
步骤很简单(三步就ok^.^):
第一步——在你新建的站点文件夹里面新建一个名为face的文件夹,在文件夹里面加入你要加的表情图片,它们的名字分别为face1,face2……face40(文件夹和图片文件的名字不限定,可以自己任何命名,有一点需要注意的是图片文件的名字必须是有顺序可寻的)。


第二步——把光标放到你需要添加表情的地方回到代码里面加入代码:<SCRIPT>function in_pic_url(pic){ document.form1.ping.value+=pic;}</SCRIPT>    //这是定义的当点击一个表情图片时就会出现在留言框内的过程
<%dim i    '定义了一个名为i的变量
for i=1 to 40  '这是一个循环语句,就是要显示的1到40的图片
if i =11 then Response.Write "<br>" '当显示到第11张图片时换行
if i =21 then Response.Write "<br>" '当显示到第21张图片时换行
if i =31 then Response.Write "<br>" '当显示到第31张图片时换行
response.write "<img src="""&"face/face"&i&".gif"&""" border=0 οnclick=""in_pic_url('[img"&i&"]')"" style=""CURSOR:hand""> "
next%>  '标签<img>是调用图片的路径,我这里是face文件夹里面的face1到face40;其中onclick调用了之前定义的过程.


第三步——把兴标放在要显示留言内容的地方回到代码里面加入代码:
<%
dim nr    '定义名为nr的变量
nr=(Recordset2.Fields.Item("ping").Value) '把留言记录里面的留言内容字段赋值给变量nr
if instr(lcase(nr),"[img")>0 then  '如果nr里面"[img"的位置大于0则执行下面的循环语句
for i=1 to 40
nr=replace(lcase(nr),"[img"&i&"]","<img  src=face/face"&i&".gif border=0 align=middle>")  '将你留言点击表情后出现的那段东西转为图片路径,这样在显示页面才会显示成相对应的表情图片,不然它就只会显示像[img1]这样的
next
response.write(nr)  '把那段东西转为图片后就显示出来
    else
response.write(nr)    '这是当没有加表情的时候显示的字段
    end if
%>


到这里就可以顺利地将表情添加进来了!怎么样,简单吧!哈哈……!(不过我可是花了一天多时间才搞出来的呢,我把它写出来希望能对大家有些帮助吧,如果大家有什么别的方法请赐教哦,呵呵!)

评论 11
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值