Hello experts (bow),
In the code snippet below, I am getting an "Expected End Of Statement" error that is pointing to the middle of the name of the function. Specifically the "c" in fnMaxiclean. Any help is greatly appreciated. I have triple-checked that there are no spelling errors.
Thank you,
Jeff
In the code snippet below, I am getting an "Expected End Of Statement" error that is pointing to the middle of the name of the function. Specifically the "c" in fnMaxiclean. Any help is greatly appreciated. I have triple-checked that there are no spelling errors.
Code:
'' Open the file Set objFile = objFSO.OpenTextFile(strFileName, ForReading) '' Clean the file line-by-line Do Until objFile.AtEndOfStream strText = objFile.ReadLine strNText = strNText & fnMaxiclean strText strText = "" Loop ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' '' Write out to new file Set objFile = objFSO.CreateTextFile(strNewFileName) '' populate contents of new file objFile.WriteLine strNText '' close the new file objFile.Close
Jeff
Comment