<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
<SCRIPT LANGUAGE="JavaScript">
<!--function test()
{
var w = document.all.word.value;
var re = /[^\r\n]+/g;
var s = w.match(re);
//var s = w.split(/\r\n/); for(var i=0;i<s.length;i++)
{
alert(s[i]);
}
}//-->
</SCRIPT>
</HEAD><BODY>
<TEXTAREA NAME="" ROWS="6" COLS="40" id="word">a
b
c
e
q</TEXTAREA>
<input type=button value="value" onclick="test()">
</BODY>
</HTML>
<HTML>
<HEAD>
<TITLE> New Document </TITLE>
<META NAME="Generator" CONTENT="EditPlus">
<META NAME="Author" CONTENT="">
<META NAME="Keywords" CONTENT="">
<META NAME="Description" CONTENT="">
<SCRIPT LANGUAGE="JavaScript">
<!--function test()
{
var w = document.all.word.value;
var re = /[^\r\n]+/g;
var s = w.match(re);
//var s = w.split(/\r\n/); for(var i=0;i<s.length;i++)
{
alert(s[i]);
}
}//-->
</SCRIPT>
</HEAD><BODY>
<TEXTAREA NAME="" ROWS="6" COLS="40" id="word">a
b
c
e
q</TEXTAREA>
<input type=button value="value" onclick="test()">
</BODY>
</HTML>
aaaaaaaaaaaaaaa
bbbbb
cccccccc
dddddddddddddddddddddddddddddddddddd
</textarea>
<br>
<input type="button" onClick="getString()" value="GetString">
<Script Language="VBScript">
Function getString()
Dim s
Dim r
Dim m
Dim ms
s = document.all.stefli.value
MsgBox s
Set r = New RegExp
r.IgnoreCase = True
r.Global = True
r.Pattern = ".[^\r\n]*\r\n" Set ms = r.Execute(s)
For Each m In ms
MsgBox m.Value
Next
End Function
</Script>