asp中如何使form中textarea的中的换行符与空格能够写入数据库,读出时能够还原原来用户输入的格式?
我用的是access数据库！我想输出来的是显示是换行的！求高手指教！<%User_name=session("User_name")User_check=session(...
我用的是access数据库！我想输出来的是显示是换行的！求高手指教！
<%
User_name=session("User_name")
User_check=session("User_check")
if not User_check=true then
session("err_mes")="对不起，您还没有正确登录！"
response.redirect "index_table.asp"
end if
%>
<!--#include file="conn.asp" -->
<script language=javascript>
function chkform()
{
if(document.subform.newstitle.value == "")
{ alert("标题不能为空！");
document.subform.UserName.focus();
return false;
}
if(document.subform.newscontent.value == "")
{ alert("新闻内容不能为空！");
document.subform.Content.focus();
return false;
}
return true;
}
</script>
<html>
<head>
<title>
</title>
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body>
<center>
<form method="POST" name="subform" onSubmit="return chkform();" action="info_save.asp">
<input type="hidden" name="newsdate" value="<%=cstr(now())%>">
<table cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" width="650">
<tr><td height="50" colspan="2"><div align=center><b>发布新闻</b></div></td></tr>
<tr><td width="150" height="30" align="right">栏目选择：</td>
<td width="450" align="left">
<select name="classid" size="1">
<option selected value=0>==请选类别==</option>
<%
set rs_class=server.createobject("adodb.recordset")
rs_class.open "select * from classlist",conn,3,3
if rs_class.eof and rs_class.bof then
response.write "没有找到栏目。"
else
do while not rs_class.eof
%>
<option value="<%=trim(rs_class("classID"))%>"><%=trim(rs_class("ClassName"))%></option>
<%
rs_class.movenext
loop
end if
%>
</select>
</td>
</tr>
<tr><td width="150" height="30" align="right">新闻标题：</td>
<td width="450" align="left"><input type="text" name="newstitle" size="40"></td>
</tr>
<tr><td width="150" height="30" align="right">来源：</td>
<td width="450" align="left"><input type="text" name="origin" size="40" value="http://www.vb.com"></td>
</tr>
<tr><td width="150" height="30" align="right">作者：</td>
<td width="450" align="left"><input type="text" name="author" size="40" value="<%=User_name%>"></td>
</tr>
<tr><td width="150" height="30" align="right" valign="top">新闻内容：</td>
<td width="450" align="left"><textarea rows="15" name="newsContent" cols="60"></textarea></td>
</tr>
<tr><td colspan="2" align="center" height="30" width="650">
<input type="submit" value="提 交" name=Submit>
<input type="reset" value="清 除"></td></tr>
</table>
</form>
</center>
</body>
</html> 展开
<%
User_name=session("User_name")
User_check=session("User_check")
if not User_check=true then
session("err_mes")="对不起，您还没有正确登录！"
response.redirect "index_table.asp"
end if
%>
<!--#include file="conn.asp" -->
<script language=javascript>
function chkform()
{
if(document.subform.newstitle.value == "")
{ alert("标题不能为空！");
document.subform.UserName.focus();
return false;
}
if(document.subform.newscontent.value == "")
{ alert("新闻内容不能为空！");
document.subform.Content.focus();
return false;
}
return true;
}
</script>
<html>
<head>
<title>
</title>
<link href="style.css" rel="stylesheet" type="text/css">
</head>
<body>
<center>
<form method="POST" name="subform" onSubmit="return chkform();" action="info_save.asp">
<input type="hidden" name="newsdate" value="<%=cstr(now())%>">
<table cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" width="650">
<tr><td height="50" colspan="2"><div align=center><b>发布新闻</b></div></td></tr>
<tr><td width="150" height="30" align="right">栏目选择：</td>
<td width="450" align="left">
<select name="classid" size="1">
<option selected value=0>==请选类别==</option>
<%
set rs_class=server.createobject("adodb.recordset")
rs_class.open "select * from classlist",conn,3,3
if rs_class.eof and rs_class.bof then
response.write "没有找到栏目。"
else
do while not rs_class.eof
%>
<option value="<%=trim(rs_class("classID"))%>"><%=trim(rs_class("ClassName"))%></option>
<%
rs_class.movenext
loop
end if
%>
</select>
</td>
</tr>
<tr><td width="150" height="30" align="right">新闻标题：</td>
<td width="450" align="left"><input type="text" name="newstitle" size="40"></td>
</tr>
<tr><td width="150" height="30" align="right">来源：</td>
<td width="450" align="left"><input type="text" name="origin" size="40" value="http://www.vb.com"></td>
</tr>
<tr><td width="150" height="30" align="right">作者：</td>
<td width="450" align="left"><input type="text" name="author" size="40" value="<%=User_name%>"></td>
</tr>
<tr><td width="150" height="30" align="right" valign="top">新闻内容：</td>
<td width="450" align="left"><textarea rows="15" name="newsContent" cols="60"></textarea></td>
</tr>
<tr><td colspan="2" align="center" height="30" width="650">
<input type="submit" value="提 交" name=Submit>
<input type="reset" value="清 除"></td></tr>
</table>
</form>
</center>
</body>
</html> 展开
3个回答
展开全部
只要输出内容时进行各下转换就可以了。
原始输入方法为：
<%=rs("content")%> 改为 <%=replace(rs("content"),"chr(10)","<br>") %>
原始输入方法为：
<%=rs("content")%> 改为 <%=replace(rs("content"),"chr(10)","<br>") %>
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
你只要在保存的时候将newsContent中的vbcrlf替换成<br>,将空格替换成& nbsp;就可以了.
修改的时候记得换回来.
修改的时候记得换回来.
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
以下是我用的。希望对你有帮助。
dw_info=request("dw_info")
n1=split(dw_info,chr(13))
for i=0 to ubound(n1)-1
sql="insert into a_sell(datatime,PartNo,Brand,DateCode,Quantity,Price,Package,Note) values('"&now()&"',"
myvalue=""
n2=split(n1(i),"|")
for j=0 to ubound(n2)
myvalue=myvalue&"'"&OnlyChinese(n2(j))&"'"&","
next
myvalue=left(myvalue,len(myvalue)-1)
sql=sql&myvalue&")"
conn.execute(sql)
next
dw_info=request("dw_info")
n1=split(dw_info,chr(13))
for i=0 to ubound(n1)-1
sql="insert into a_sell(datatime,PartNo,Brand,DateCode,Quantity,Price,Package,Note) values('"&now()&"',"
myvalue=""
n2=split(n1(i),"|")
for j=0 to ubound(n2)
myvalue=myvalue&"'"&OnlyChinese(n2(j))&"'"&","
next
myvalue=left(myvalue,len(myvalue)-1)
sql=sql&myvalue&")"
conn.execute(sql)
next
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
