String.Find

[Jason Pate]

Any ideas for how to get a count of the number of substrings in a string.

Maybe a String.FindCount function?

I have a files with "_" as a field seporator (Example: "BAJANGO_ARONNAX_4654474_PTRE_20070117.pdf") but clients can add additional fields so the given number of "_" can change don’t want to recode this part every time, a String.FindCount that returns a count of a repeated substrings. So one can create a loop.

[Worm]

Use the DelimitedStringToTable with "_" as the delimiter, then get the table count.


Arguments: DelimitedString - The string to parse
Delimiter - The delimiter
Returns: A numerically indexed table with the string elements
Example:

string = "Brett,Mark,Darryl,Lorne,Adam";
tbResults = DelimitedStringToTable(string,",");
for i, name in tbResults do
Dialog.Message("Name",name);
end

]]--
function DelimitedStringToTable(DelimitedString, Delimiter)
tbReturn = {};
local strWorking;
local nPos = nil;
local strData;
local nTableIndex = 1;
local nDelimiterLength = String.Length(Delimiter);

if(nDelimiterLength < 1)then
tbReturn[nTableIndex] = DelimitedString;
return tbReturn;
end

strWorking = DelimitedString;
nPos = String.Find(strWorking,Delimiter);
while(nPos ~= -1)do
strData = String.Left(strWorking,nPos-1);
tbReturn[nTableIndex] = strData;
nTableIndex = nTableIndex + 1;
local nLength = String.Length(strWorking);
strWorking = String.Right(strWorking,nLength - (nPos + (nDelimiterLength-1)));
nPos = String.Find(strWorking,Delimiter);
end
if(strWorking ~= "")then
tbReturn[nTableIndex] = strWorking;
end

return tbReturn;
end

[Jason Pate]

Nice work man, I am going to give this a try but looking at the code I think you have it nailed.

[Worm]

I can't take credit for the function, that's an IR goodie that comes in the Scriplets of AMS. Not sure if its in SF7 or not. Anyhow, hope you're good to go.

[Jason Pate]

Yes I already have it working (just a few customization and one minor modification), You saved me from having to recreate it myself. Scriplets you say I will have to look see, I am AMS5/6 as well as SF7.

[pww]

another one, probably faster, if not - at least shorter :)


function subStrCount(strInp, strPattern)
return (String.Length(strInp)- String.Length(String.Replace(strInp,strPattern,"",true))) / String.Length(strPattern);
end


replace true with false for case insensitive search, or make it a parameter