您现在的位置是：网站首页> 编程资料编程资料
asp中向文本框输出数据原样式的函数_应用技巧_
2023-05-25
179人已围观
简介 asp中向文本框输出数据原样式的函数_应用技巧_
从数据库输出信息时有转换函数，可以将回车空格按原样式输出。这段代码可向文本框原样输出代码。
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
复制代码 代码如下:
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
相关内容
- ASP中利用execute实现动态包含文件的方法_ASP CLASS类_
- 实现ASP程序执行时间统计类的代码_ASP CLASS类_
- 全面优化ASP应用程序的性能的方法_应用技巧_
- 添加超级用户的.asp代码[蓝屏的原创,凯文改进,Ms未公布的漏洞]_应用技巧_
- ASP开发中可能遇到的错误信息中文说明大全（整理收集）第1/2页_应用技巧_
- 结合FSO操作和Aspjpeg组件写的Class_ASP CLASS类_
- ASP使用FSO读取模板的代码_应用技巧_
- 用ASP创建MDaemon用户的代码_应用技巧_
- asp中COM组件中如何连接数据库的代码_应用技巧_
- 在ASP中用组件检测当前网卡地址的代码_应用技巧_
