sName = Replace(oFile.Name, "Inter", "InterCA")
sName = Replace("D:\VB\Interpool.txt", "Inter", "InterCA")
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)