asp中向文本框输出数据原样式的函数
2018-09-06 13:15
从数据库输出信息时有转换函数,可以将回车空格按原样式输出。这段代码可向文本框原样输出代码。
复制代码 代码如下:
Functioncc_f_textarea_html_encode(cc_f_t_h_e_str)
IfNotIsNull(cc_f_t_h_e_str)Andcc_f_t_h_e_str<>Then
cc_f_t_h_e_str=Replace(cc_f_t_h_e_str,>,>)
cc_f_t_h_e_str=Replace(cc_f_t_h_e_str,<,<)
cc_f_t_h_e_str=Replace(cc_f_t_h_e_str,CHR(13),)
cc_f_t_h_e_str=Replace(cc_f_t_h_e_str,CHR(10)&CHR(10),vbCrLf)
cc_f_t_h_e_str=Replace(cc_f_t_h_e_str,CHR(10),vbCrLf)
cc_f_textarea_html_encode=cc_f_t_h_e_str
EndIf
EndFunction
上一篇:pjblog中清空引用的小程序
下一篇:把RS.GetRows看得更清楚
文章标题:asp中向文本框输出数据原样式的函数
文章链接:http://soscw.com/index.php/essay/11068.html