宇智波鼬和带土图片:html代码转换成chr码 高手进

来源:百度文库 编辑:高考问答 时间:2024/04/30 14:28:40
修该后也面上显示<br> <I>等字符 如何取掉 原文件代码如下;

请高手们指点

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
...........................
<%if request.form("sub")="sub" then
biaoti=trim(request.form("biaoti"))
....
text=trim(request.form("text"))
text1 = replace(text, ">", ">")
text2 = replace(text1, "<", "<")
.......
text10 = Replace(text9, CHR(10), "</P><P> ")
text=text10
response.write text
id=trim(request.form("id"))
if biaoti="" or text="" then
response.Write("不能为空")
response.End()
else
set rs=server.CreateObject("adodb.recordset")
sql="select * from 00000 where id="&id
rs.open sql,conn,3,3

rs("biaoti")=biaoti
......
rs("text")=text
....
<td width="80"><span class="style2">公告内容:</span></td>
<td><div align="left"></div></td>
</tr>
<tr>
<td> </td>
<td><div align="left">
<textarea name="text" cols="45" rows="15" id="text"><%=rs1("text")%></textarea>
</div></td>
</tr>
<tr>
<td colspan="2"><div align="center">
<input type="submit" name="Submit" value="提交">
....

你干嘛要过滤 < 和 > 这些字符?

Replace( input, vbCrlf, "<BR>" )
或者 chr(13) + chr( 10 )

因为提问题是不能超过300个字符。我就省略了。
如果在表单修改数据库内容是在表单的文本框了看不到那写字符就可以了,
我用的是asp+access,
恳请高手们帮忙。