VB中textarea 填表内容如何从文件中读取而且保持格式(包括换行和空格)
RThtml代码如下<td><inputname="title"type="text"class="text-area"value=""size="50"/></td><...
RT
html代码如下
<td><input name="title" type="text" class="text-area" value="" size="50"/></td>
</tr>
<tr>
<td valign="top">内容</td>
<td>
<textarea name="content" ></textarea>
</td>
</tr>
<tr>
<td></td>
<td>
<input type="submit" value=" 发送 " /> 展开
html代码如下
<td><input name="title" type="text" class="text-area" value="" size="50"/></td>
</tr>
<tr>
<td valign="top">内容</td>
<td>
<textarea name="content" ></textarea>
</td>
</tr>
<tr>
<td></td>
<td>
<input type="submit" value=" 发送 " /> 展开
1个回答
展开全部
<%
'写
content=request.form("content")
set fso= server.createobject("scripting.filesystemobject")
set kso=fso.opentextfile(server.mappath("xx.txt"),2,1)
kso.write content
kso.close
set kso=nothing
'清空
content=""
'读
set kso=fso.opentextfile(server.mappath("xx.txt"),1)
content=kso.readall
kso.close
set kso=nothing
content=replace(content," ","&nbsp")
content=replace(content,vbCrlf,"<br>")
response.write content
%>
显示效果和容器也有很大关系。
像你写的<td valign="top">内容</td> 就是垂直上对齐。但空格和换行不影响。
'写
content=request.form("content")
set fso= server.createobject("scripting.filesystemobject")
set kso=fso.opentextfile(server.mappath("xx.txt"),2,1)
kso.write content
kso.close
set kso=nothing
'清空
content=""
'读
set kso=fso.opentextfile(server.mappath("xx.txt"),1)
content=kso.readall
kso.close
set kso=nothing
content=replace(content," ","&nbsp")
content=replace(content,vbCrlf,"<br>")
response.write content
%>
显示效果和容器也有很大关系。
像你写的<td valign="top">内容</td> 就是垂直上对齐。但空格和换行不影响。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询