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