VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



Get file extension

by JA (5 Submissions)
Category: Files/File Controls/Input/Output
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 24th April 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)

Get file extension

Rate Get file extension



Dim Fname As String
Dim ExtName As String
ExtName = Mid$(Fname, InStrRev(Fname, "."))
'use InStrRev() to catch the last dot (filenames can contain more than one)


Download this snippet    Add to My Saved Code

Get file extension Comments

No comments have been posted about Get file extension. Why not be the first to post a comment about Get file extension.

Post your comment

Subject:
Message:
0/1000 characters