帮我写个正则,谢谢

flyingakain 2003-12-06 04:01:18
匹配文本框中的 空格 换行
我的文本是从word里贴过来的,不知道还有没有别的匹配
我是这么写的
第一次写,就是这么臭了,呵呵,反正是错了,大家帮忙啊!谢谢
/(\s|\n|\r|\s|\cM|\cJ)/
...全文
87 9 打赏 收藏 转发到动态 举报
写回复
用AI写文章
9 条回复
切换为时间正序
请发表友善的回复…
发表回复
miller530 2003-12-06
  • 打赏
  • 举报
回复
<form name="form1" method="post" action="">
<textarea name="content" cols="40" rows="12" id="content"></textarea>
<input type="button" name="Submit" value=" 测 试 " onclick="checkreg();">
</form>
<script>
function checkreg()
{
a=form1.content.value;
form1.content.value=a.replace(/\n/gi,"<br>");
document.write (form1.content.value);
}
</script>

不晓得是不是你要得,反正是没明白你的意思。
flyingakain 2003-12-06
  • 打赏
  • 举报
回复
问题解决了,给分
美丽心情 2003-12-06
  • 打赏
  • 举报
回复
没用过正则,来听老大们讲课
flyingakain 2003-12-06
  • 打赏
  • 举报
回复
呵呵,再谢谢你,这些文字不是在页面上的,是在<textarea>里边,上边那个还成么?
再烦心看看,谢了!
ygghost 2003-12-06
  • 打赏
  • 举报
回复
转换函数:

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 "'" : result=result+"''"
case chr(13) : result=result+"<br/>"
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
flyingakain 2003-12-06
  • 打赏
  • 举报
回复
试了好多次了,每次都只能认出空格来,回车或者换行符都不行,出来的结果就是
1111 4444 5555 8888
2222 3333 6666 7777
flyingakain 2003-12-06
  • 打赏
  • 举报
回复
谢谢,这个不行,我要正则表达式,因为这部分是要在运行脚本之前做验证用的
其实我就是想把word贴过来的文本入库,格式如下

字段1 字段2
1111 2222
3333 4444
5555 6666
7777 8888
avonqin 2003-12-06
  • 打赏
  • 举报
回复
/(\s)/
单会这个还不行,还要知道其前后的匹配字符

不行的话你把那段要替换的代码贴出来看看
ygghost 2003-12-06
  • 打赏
  • 举报
回复
replace(replace("字符串",""," "),"chr(13)","<br>")

28,407

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧