need to seperate string by .

I'm loading a file name into a string and would like to cut off the file extension .txt, .exe, etc.. so it's only left with the name of the file.

What would I use,

I just learned the great use of left$, Mid$, Right$ yesterday but out of all of those the Right$ would be closest to what I need and 'say remove the last 4 characters instead of use them' but, that's not working,

try this

VB Code:

Left("blah.txt", InStrRev("blah.txt", ".") -1)

MsgBox Mid(sFileName, InStrRev(sFileName, "\") + 1)

How about something like this:

Code:

---

Dim strFileName As String
Dim strNewName As String
strFileName = "This is my file.txt"
strNewName = Left(strFileName, Len(strFileName) - 4)
MsgBox strNewName

---

rockies1

that would work for 3 letter extensions only.
.html would give you grief.

That is correct...

Darn long file names...

I'm still stuck in an 8.3 world :-)

wow, two different ways that look good, great.

strNewName = Left(strFileName, Len(strFileName) - 4)
(couldn't get to work):confused:


Left("blah.txt", InStrRev("blah.txt", ".") -1)
(yea);)

wuhoo! i'm on a roll ;)