图文并排
<table border="0" cellspacing="1" cellpadding="3" width=760 height="100%">
<tr bgcolor="#FFFFFF" valign="top">
<td>
<p><%if instr(rs("Image"),"/")>0 then%>
<img src="<%="Upload/"&rs("Image")%>" border=0 align="left" vspace="5" hspace="5" onload="javascript:if(this.width>250)this.width=250">
<%end if%>
<%=ListStrs(rs("Content"))%></p>
<p align="right">Author:<%=ListStr(rs("Author"))%></p>
</td>
</tr>
</table>
<% Function ListStrs(str)
dim result
result=""
if str<>"" then
result=replace(str,"<","<")
result=replace(result,">",">")
result=replace(result,vbcrlf,"<br>")
result=replace(result," "," ")
end if
ListStrs=result
End Function
%>
Content是内容:如果是中文显示正常,但英文页面将非常难看(英文不是连写的)
请问如何解决(不用编函数)?