当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp中向文本框输出数据原样式的函数

ASP
简单ASP论坛DIY
如何防止页面中的敏感信息被提取
asp创建对象及中文显示解决技巧
基础开发入门级:JSP与ASP的比较
数据库受到限制怎么办?
ASP初学者常犯的几个错误
Asp定时执行操作、Asp定时读取数据库(网页定时操作详解)
ASP优化:非常实用的ASP提速技巧五则
ASP教程:解决ASP脚本运行超时的方法
ASP安全:简单学习ASP连接数据库方法
简单一招用ASP实现对IE地址栏参数的判断
asp控制xml数据库的6段非常的经典代码
ASP进阶:验证身份证号是否正确的代码
ASP教程:使用ASP生成图片彩色校验码
ASP进阶:用ASP判断文件地址是否有效
ASP进阶:用asp做的简单搜索引擎代码
ASP实例 挂QQ的网页源代码ASP/PHP
ASP答疑 解决ASP脚本运行超时的方法
轻轻松松破解开别人ASP木马密码的方法
用ASP操作Access数据库 ADOX的使用

ASP 中的 asp中向文本框输出数据原样式的函数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 74 ::
收藏到网摘: n/a

从数据库输出信息时有转换函数,可以将回车空格按原样式输出。这段代码可向文本框原样输出代码。
复制代码 代码如下:

Function cc_f_textarea_html_encode(cc_f_t_h_e_str)
If Not IsNull(cc_f_t_h_e_str) And cc_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
End If
End Function