asp如何处理备注字段在网页中的显示和保存，回车和换行？

rensh 2002-09-07 03:40:01

...全文

94 点赞收藏 9

写回复

9 条回复

切换为时间正序

当前发帖距今超过3年，不再开放新的回复

发表回复

rensh 2002-09-09

谢谢各位！pass

回复赞

fbj007 2002-09-07

再给你两个：
<%
function unHtml(content)
unHtml=content
if content <> "" then
unHtml=replace(unHtml,"&","&")
unHtml=replace(unHtml,"<","<")
unHtml=replace(unHtml,">",">")
unHtml=replace(unHtml,chr(34),""")
unHtml=replace(unHtml,chr(13)," ")
unHtml=replace(unHtml,chr(32)," ")
end if
end function
%>
<%
function HTMLEncode(fString)

fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")

fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "")
fString = Replace(fString, CHR(10), " ")
HTMLEncode = fString
end function
%>

回复赞

37du 2002-09-07

那是不是读出来要替换回去啊？

回复赞

水墨画 2002-09-07

dim gzcl
gzcl=rs("gzcl")
if gzcl <>"" then
gzcl=replace(gzcl,Chr(32)," ")
gzcl=replace(gzcl,VbCrlf," ")
end if

回复赞

freezwy 2002-09-07

给你个更完整的函数：
<%
function htmlencode2(str)
dim result
dim l
if isNULL(str) then
htmlencode2=""
exit function
end if
l=len(str)
result=""
dim i
for i = 1 to l
select case mid(str,i,1)
case chr(13)
result=result+" "
case chr(34)
result=result+"""
case chr(32)
'result=result+" "
if i+1<=l and i-1>0 then
if mid(str,i+1,1)=chr(32) or mid(str,i+1,1)=chr(9) or mid(str,i-1,1)=chr(32) or mid(str,i-1,1)=chr(9) then
result=result+" "
else
result=result+" "
end if
else
result=result+" "
end if
case chr(9)
result=result+" "
case else
result=result+mid(str,i,1)
end select
next
htmlencode2=result
end function
%>

回复赞

cshadow 2002-09-07

<%
Function coder(str)
Dim result,L,i
If IsNull(str) Then : coder="" : Exit Function : End If
L=Len(str) : result=""
For i = 1 to L
select case mid(str,i,1)
case "<" : result=result+"<"
case ">" : result=result+">"
case chr(34) : result=result+"""
case "&" : result=result+"&"
case chr(13) : result=result+" "
case chr(9) : result=result+" "
case chr(32) : result=result+" "
case else : result=result+mid(str,i,1)
end select
Next
coder=result
End Function %>

回复赞

freezwy 2002-09-07

function changechr(str)
changechr=replace(replace(replace(replace(str,"<","<"),">",">"),chr(13)," ")," "," ")
end function

回复赞

flashasp 2002-09-07

replace(str, chr(13) & chr(10), " ")//回车/换行用 代替
replace(rs("Your字段Name").Value, " ", " ")//空格用；代替

回复赞

saucer 2002-09-07

search the answer in the Solved section, or try in VBScript:
<%
str = replace(rs("Your字段Name").Value, " ", " ")
str = replace(str, chr(13) & chr(10), " ")

Response.Write str
%>

回复赞

测试开发笔记测试开发笔记第一章测试基础 7 什么是软件测试： 7 ...验收测试：（在系统测试之后） 11 回归测试： 11 4.测试过程（干什么，怎么干） 12 5.各阶段输入、输出标准以及入口、出口准则:（测试阶段过程要素） 1...

asp.net 中操作pdf档和word档若不指定,中文无法显示 //pdf.AddParagraph("测试文档（生成时间：" + DateTime.Now + "）", 15, 1, 20, 0, 0); //pdf.Close(); //--------------------------------------------------------------------------...

C#Excel导入和导出一、在WEB中导入Excel的方法方法1：通过OleDB方式获取Excel文件的数据到DataSet中，然后将Dataset中的每笔记录插入到SQL Server using System.Data.OleDb; using System.Data.SqlClient; 第一步：首先...

整理的asp.net资料（收藏）使用SqlBulkCopy类加载其他源数据到SQL表在数据回发时，维护ASP.NET Tree控件的...SQL Server各种日期计算方法在sqlserver中如何根据字段名查找字段所在的表[CommunityServer]看RBAC的一方景象七招制胜ASP.NET应

大年三十整理的asp.net资料！（经典）转：大年三十整理的asp.net资料！（经典）使用SqlBulkCopy类加载其他源数据到SQL表在数据回发时，维护ASP.NET Tree控件的位置 vagerent的vs2005网站开发技巧 ...在sqlserver中如何根据字段

ASP.NET及C#网上资料小收藏 http://blog.csdn.net/guyehanxinlei/archive/2008/01/18/2051333.aspx 使用SqlBulkCopy类加载其他源数据到SQL表在数据回发时，维护ASP.NET Tree控件的位置 vagerent的vs2005网站开发技巧 ...

网页测试点 []{}”特别要注意单引号和&符号。禁止直接输入特殊字符时，使用“粘贴、拷贝”功能尝试输入。（2）长度检查：最小长度、最大长度、最小长度-1、最大长度+1、输入超工字符比如把整个文章拷贝过去。（3）...

干货！一篇文章集合所有Linux基础命令，适合所有菜鸟学习和老手回顾！一篇文章集合所有Linux基础命令，适合所有菜鸟学习和老手回顾！ 1 文件{ls -rtl # 按时间倒叙列出所有目录和文件 ll -rttouch file # 创建空白文件rm -rf 目录名 # 不提示删除非空目录(-r:递归删除 -f强制)dos2unix ...

ASP 初步资料 ASP编程入门进阶（一）：安装配置服务器鉴于ASP脚本语言是在服务器端IIS或PWS中解释和运行，并可动态生成普通的HTML网页，然后再传送到客户端供浏览的这一特点。我们要在本机上进行调试，那就要求我们的...

【转】大年三十整理的asp.net资料！ (.NET) (ASP.NET) http://www.cnblogs.com/5tao/archive/2008/08/28/1279014.html 使用SqlBulkCopy类加载其他源数据到SQL表在数据回发时，维护ASP.NET Tree控件的位置vagerent的vs2005网站开发技巧ASP.NET2.0小技巧－－内部控件权限...

Asp.net 文章资料整理解决ASP 2.0中GridView控件的删除、插入、编辑命令操作客户端确认问题的另一方法基于.net开发平台项目案例集锦 EnterPrise应用(5) Security Application Block应用程序块授权处理（VB.NET） ...