Craig-
Here's a variation using an array:
function MyFindLines pTextToFind, pVariable
local tArray
local tLineNumber
put 0 into tLineNumber
repeat for each line tLine in pVariable
if pTextToFind is in tLine then
put tLine into tArray[tLineNumber]
end if
add 1 to tLineNumber
end repeat
return tArray
end MyFindLines
--
-Mark Wieder
[EMAIL PROTECTED]
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
