众所周知,对于链接和图片,我们可以通过添加title属性以显示一些说明文字,一般情况下,这些文字都是显示成一行,那么有没有办法让它以多行的方式显示呢?解决的方法有两种:
1.将title属性分成几行来写,例如:
<a href=#" title="说明一
说明二
说明三">印象派</a>
2.第一行相对来说不够直观,我们还可以在需换行的地方添加
(将&改为半角,下同)或
来实现:
<a href=#" title="说明一
说明二
说明三">印象派</a>
<a href=#" title="说明一
说明二
说明三">印象派</a>
==================
response.write " title='标 题:" & rsArticleList("Title") & vbcrlf & "作 者:" & rsArticleList("Author") & vbcrlf & "转 贴 自:" & rsArticleList("CopyFrom") & vbcrlf & "更新时间:" & rsArticleList("UpdateTime") & vbcrlf
response.write "点 击 数:" & rsArticleList("Hits") & vbcrlf & "关 键 字:" & mid(rsArticleList("Key"),2,len(rsArticleList("Key"))-2) & vbcrlf & "推荐等级:"
直接换行就可以
=======================
<a href='http://www.updateweb.cn' target='_ablank' title='标 题:更新网络
作 者:Sundy
转 贴 自:本站原创
更新时间:2008-6-6 10:31:00
点 击 数:0
关 键 字:更新网络
推荐等级:无
分页方式:不分页
阅读等级:游客
阅读点数:0'>更新网络</a>
<div title="123"
456">text</div>
<p><a href=#" title="说明一
说明二
说明三">印象派</a>
<a href=#" title="说明一
说明二
说明三">印象派</a></p>
===========================
function decodeHTML(fString)
if not isnull(fString) then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, " ", CHR(32))
fString = Replace(fString, " ", CHR(9))
fString = Replace(fString, """, CHR(34))
fString = Replace(fString, CHR(39),"'")
fString = Replace(fString, "</P><P> ",CHR(10) & CHR(10))
fString = Replace(fString, "<BR> ", CHR(10))
decodeHTML = fString
end if
end function
function encodeHtml()
替换成unicode字符就可以