'
' PathFindFileName - Searches a path for a file name
'
' Author: Joe Strazzere
'
dim ptr as unsigned
a$="c:\test.exe"
ptr=External("shlwapi.dll","PathFindFileNameA",a$)
msgbox("The File Name portion of "+a$+" is ["+PeekString$(ptr)+"]",,"PathFindFileName")