Removing characters from the Right of a String 2

[JamesBBB]

Hi

I am sorry to ask such a mundane question, I have tried searching through TEK-TIPS to see if it had been mentioned before but I couldnt find anything.

Basically I have stripped off a load of filenames into a 1 field table and then read each field using openfile within a piece of code.

All thats fine, but I only want to display the name of the file without the extension, so basically I want to remove the last 4 characters of a string. I have tried Left$, right$ and Mid$ but am getting nowhere.

If someone could give me an example on how to do this, I would be extremely grateful.

Many thanks

James

 

[Remou]

How about:

[tt]Mid(strFile,1,InstrRev(strFile,".")-1)[/tt]

 

[SkipVought]

Hi,

Also the Split funmction

sFileName = Split(strFile, ".")(0)
sExt = Split(strFile, ".")(1)

Skip,

_[red][/red]

 

[JamesBBB]

Thanks Guys

Very Much Appreciated

James