In a VBA add-in to a CAM program, I have the following lines:

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile(strFilepath, True)

This code works in previous versions of Windows, including Windows 7. (Never tried it in Windows 8). In Windows 10, however, the subroutine just quits when it hits these lines. I have the scrrun.dll referenced in my project.

I've been searching the internet to see what might have changed in Windows 10 that I might have to change the code somehow. Can anyone point me in the right direction to resolve this?