private sub Splitme(Invalue as string, out1 as string, out2 as string,
out3 as string)
dim iptr1 as integer
dim iptr2 as integer
iptr1 = instr(1,invalue,"-")
iptr2 = instr(iptr1+1,invalue,"-")
out1 = left(invalue, iptr1-1
out2 = mid@(invalue, iptr1+1,iptr2 - iptr1)
out3 = right(invalue,len(invalue) - iptr2)
end sub
call splitme("bf 01- 25*25-green",out1,out2,out3
--- In [email protected], Muhamed Faisal
<[EMAIL PROTECTED]> wrote:
>
>
>
>
>
>
> dear
>
> Can any body help me to split data
>
> i have a filed in a table in text data type,now i want to split it
in to three field
>
> for eg:my sample tata like this:bf 01- 25*25-green
> now i want to split to three filed
> ie;first field is bf 01
> second filed is 25*25
> third filed is gree
>
>
> how it is possible
>
> regards
> faisal
> riyadh
>
>
>
>
>
____________________________________________________________________________________
> Looking for last minute shopping deals?
> Find them fast with Yahoo! Search.
http://tools.search.yahoo.com/newsearch/category.php?category=shopping
>
> [Non-text portions of this message have been removed]
>
