Solved

Get the name of a file of a string containing the full path name

Posted on 2003-11-26
2
263 Views
Last Modified: 2010-05-01
I have the full path name in a string variable, eg.:
strFileName = "C:\temp\filename.txt"

How do I extract only the filename from the string above, in this case that would be "filename" only?
0
Comment
Question by:8831
  • 2
2 Comments
 
LVL 85

Expert Comment

by:Mike Tomlinson
ID: 9829849
   Dim strFullPathToFileName As String
    Dim strPath As String
    Dim strFileName As String
    Dim backslashPos As Integer
   
    strFullPathToFileName = "C:\temp\filename.txt"
    backslashPos = InStrRev(strFullPathToFileName, "\")
    If backslashPos > 0 Then
        strPath = Left(strFullPathToFileName, backslashPos)
        strFileName = Mid(strFullPathToFileName, backslashPos + 1)
    Else
        strPath = ""
        strFileName = strFullPathToFileName
    End If
   
    Debug.Print strPath
    Debug.Print strFileName

Regards,

Idle_Mind
0
 
LVL 85

Accepted Solution

by:
Mike Tomlinson earned 250 total points
ID: 9829852
If you want the filename without the extension then do the exact same thing using strFileName, but search for "." instead of "\".

Idle_Mind
0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
VB6 code to programmatically convert pdf to excel 21 87
Restricting text box entry from \/:?<>"| 9 86
vb6 connector to mongodb 2 81
IF ELSE Statement in Excel Macro VBA 16 62
There are many ways to remove duplicate entries in an SQL or Access database. Most make you temporarily insert an ID field, make a temp table and copy data back and forth, and/or are slow. Here is an easy way in VB6 using ADO to remove duplicate row…
I’ve seen a number of people looking for examples of how to access web services from VB6.  I’ve been using a test harness I built in VB6 (using many resources I found online) that I use for small projects to work out how to communicate with web serv…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Get people started with the process of using Access VBA to control Excel using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Excel. Using automation, an Access application can laun…

786 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question