Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.
Set objFSO = CreateObject("Scripting.FileSystemObject") Set objOut = objFSO.CreateTextFile ("C:\scanreport.txt") Set objFolder = objFSO.GetFolder("c:\backup") Set colFiles = objFolder.Files For Each objFile in colFiles If LCase(Right(objFile.Name, 3)) = "txt" Then objOut.Write objFile.Name objOut.Write objFile.Path objOut.WriteLine End If Next objOut.Close wscript.Quit
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.