在ASP中，如何把文本域中得到的换行字符串转换成数组

<%
content=request.Form("content") '接受表单内容
content=replace(request.Form("content"),vbcrlf," ") '把回车转换为空格
response.Write content&"<br>" '输出转换出来的字符
arr=Split(content," ") '以空格截取 存为数组
for i=0 to 6 step 2
response.Write arr(i)&" "&arr(i+1)&"<br>"
'输出截取后的字符
next
set db=server.createobject("adodb.connection") '连接数据库
db.open "DBQ="&server.mappath("BOOK.mdb")&";driver={microsoft access driver (*.mdb)}"
set rs=createobject("adodb.recordset")
sql="select * from BOOK where (id is null)"
rs.open sql,db,1,3
for i=0 to 6 step 2
rs.addnew
rs("ID")=arr(i)
rs("TITLE")=arr(i+1)
rs.update
next
response.Write("提交成功")
rs.close
set rs=nothing
db.close
set db=nothing
%>

中间是隔的回