请帮我看一下。
我现在做了一个多行的文本框,往里面输入一些文字(包括回车)。然后把文本框内的内容存了access数据库中。
现在我想把内容取出来。不懂怎么判断哪里有回车符?请帮忙,谢了。
目前我用以下方法不行(我每行想输出60个字符,除有回车的地方)。
<%call writemess(mess,chr(13))%>
<%sub writemess(str1,str2) %>
<%mess=str1%>
<%str=str2%>
<%
dim j
j=60
%>
<%do while len(mess)>j %>
<%if instr(left(mess,j),str)<>0 then %>
<%j=instr(left(mess,j),str)%>
<%end if %>
<%=left(mess,j)%>
<%="<br>"%>
<%mess=right(mess,len(mess)-j)%>
<%j=60%>
<%loop %>
<%if len(mess)>0 then %>
<%=mess%>
<%end if %>
<%end sub %>
问题点数:20、回复次数:5Top
1 楼jim_k(简单的动作,丰富的色彩)回复于 2002-11-19 16:41:50 得分 0
是不是分不够,还是我表达不清楚啊?其实我只是想知道回车在access里是怎么表示的?Top
2 楼liudong963(东仔)回复于 2002-11-19 16:46:50 得分 0
你要做什么啊?是不是下面这样?你拷回去看看啊,你不是你要的效果。Top
3 楼jim_k(简单的动作,丰富的色彩)回复于 2002-11-19 16:49:43 得分 0
?????Top
4 楼liudong963(东仔)回复于 2002-11-19 16:53:02 得分 20
<%
call writemess(mess,chr(10)&chr(13))
sub writemess(str1,str2)
mess=replace(str1,str2,"<br>")
response.write mess
end sub
%>
Top
5 楼jim_k(简单的动作,丰富的色彩)回复于 2002-11-20 08:29:22 得分 0
谢了,不过应该是chr(13)&chr(10)才对。Top




