|
|
主题: 帮忙--代码询问
|
sundy122
职务：普通成员
等级：1
金币：0.0
发贴：5
|
#12004/11/6 11:31:44
我不想设置成 Server.HTMLEncode((rs.Fields.Item("Name").value)) %
但若要去除 Server.HTMLEncode下面的代码就没办法执行.
Function HTMLEncode(Str)
Str=Replace(Str,"<","<")
Str=Replace(Str,">",">")
Str=Replace(Str," "," ")
Str=Replace(Str,Chr(10),"<br>")
HTMLEncode=Str
End Function
我该怎么办啊?头又开始大了
还有xhHtml=replace(xhHtml,chr(34),""") 这段又做何解释.
|
沉默是金
职务：普通成员
等级：6
金币：11.2
发贴：4357
|
#22004/11/6 11:42:17
好就把替换的值调整一下了，或者找一个在线编辑器，也省得去写REPLACE
chr(34)=英文半角单引号
难人一个……
|
sundy122
职务：普通成员
等级：1
金币：0.0
发贴：5
|
#32004/11/6 17:34:52
不行呀!!!
只要在这前面加上任何值((rs.Fields.Item("Name").value)) % html的<>代码就不能识别.
如果前面不加,
Str=Replace(Str,"<","<")
Str=Replace(Str,">",">")
Str=Replace(Str," "," ")
Str=Replace(Str,Chr(10),"<br>")
这些又不能限定上去..
啊啊啊啊.......有人知道吗?快点帮忙啊?我头又大了些
|
缺缺
职务：管理员
等级：8
金币：41.0
发贴：9620
|
#42004/11/6 18:14:30
说实话没有看懂你想表达什么
HTMLEncode((rs.Fields.Item("Name").value))
|
sundy122
职务：普通成员
等级：1
金币：0.0
发贴：5
|
#52004/11/6 19:51:13
HTMLEncode((rs.Fields.Item("content").value)) 那是到绑定数据库的字段. HTMLEncode 是为了防止在content里可以直接使用源码.如<img src="spacer.gif" width="1" height="1"> 我想在留言板中发布的内容能使HTML直接解释显示,同时又可以无限空格及回车换行.我该怎样做?
编辑历史:[此帖最近一次被 sundy122 编辑过(编辑时间:2004-11-07 00:53:54)]
|
sundy122
职务：普通成员
等级：1
金币：0.0
发贴：5
|
|
