Ah yes! One of those DB and DBPro mysteries, the missing Instr() command. No Idea why it's not there.
Here's a Instr() function I made some time ago with the help of another function I made some time before that, Midstr()
function Instr(s$,c$,pos)
rem --- returns position of c$ in s$ starting from pos
rem --- Requires Midstr() function
repeat
if Midstr(s$,pos,len(c$)) = c$ then exitfunction pos
pos = pos + 1
until pos > len(s$)
endfunction 0
function Midstr(s$,pos,ln)
rem --- an extended version of mid$() where you can set the length of return
t$ = left$(right$(s$,len(s$)-(pos-1)),ln)
endfunction t$
Hope this helps
Programming anything is an art, and you can't rush art.
Unless your name is Bob Ross, then you can do it in thirty minutes.
