国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

asp中向文本框輸出數據原樣式的函數

2024-05-04 11:01:38
字體：大 中 小
來源：轉載
供稿：網友
從數據庫輸出信息時有轉換函數，可以將回車空格按原樣式輸出。這段代碼可向文本框原樣輸出代碼。
復制代碼 代碼如下:
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 

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板： 三门峡市| 刚察县| 丘北县| 宁武县| 荆州市| 沁水县| 如皋市| 安吉县| 玉溪市| 尉犁县| 晋城| 漠河县| 夏津县| 博罗县| 色达县| 庆阳市| 曲水县| 辰溪县| 连州市| 河北区| 邻水| 萝北县| 桃园县| 嵊泗县| 商南县| 鄱阳县| 兴业县| 吐鲁番市| 慈利县| 大渡口区| 华宁县| 崇阳县| 纳雍县| 从江县| 霞浦县| 页游| 宁海县| 万全县| 育儿| 保靖县| 静宁县|