'
' PathRenameExtension - Replaces the extension of a file name with a new extension.
' If the file name does not contain an extension, the extension will be attached to the end of the string.
'
' Author: Joe Strazzere
'
File$="c:joetest.fil"
ret=External("shlwapi.dll","PathRenameExtensionA",File$,".txt")
msgbox(File$)
