' Change the extension of a file name' if the last argument is True, it adds the extension even if the file doesn't ' have oneFunction ChangeFileExtension(ByVal FileName As String, _ ByVal Extension As String, Optional ByVal AddIfMissing As Boolean = False) _ As String If AddIfMissing OrElse IO.Path.GetExtension(FileName).Length > 0 Then Return IO.Path.ChangeExtension(FileName, Extension) Else Return FileName End IfEnd Function
Charlie has over a decade of experience in website administration and technology management. As the site admin, he oversees all technical aspects of running a high-traffic online platform, ensuring optimal performance, security, and user experience.
