Delete File in VBscript [closed] - vbscript

Question

Closed. This question is not reproducible or was caused by typos. It is not currently accepting answers.
This question was caused by a typo or a problem that can no longer be reproduced. While similar questions may be on-topic here, this one was resolved in a way less likely to help future readers.
Closed 2 years ago.
Improve this question
I have a list of about 50 files throughout different folders and I back them up very regularly by adding that day's date to the files. Not all the files are back up at the same time. Here's an example:
C:\Intel\Logs\AcerDT.pdf.2020-05-05
C:\Intel\Logs\IntelChipset.log.2020-05-05
C:\Intel\Logs\IntelGFX.log
C:\Intel\Logs\IntelSSDTDK.log.2020-05-05
C:\Intel\Logs\IntelSSDToolbox.log
I wrote a VBScript to delete all the files with that date. It works great if all the files had the extension, ".2020-05-05". The problem is if the file in the list does not exist, as in, it does not have ".2020.-05-05", it throws me an error message and exit. I don't want this. I want the script to check the list, if the file exists, then delete it, if the file does NOT exist then check the next one. Is this possible to do?
Here's my code:
Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject")
arrList = Array(_
"C:\Intel\Logs\AcerDT.pdf", _
"C:\Intel\Logs\IntelChipset.log", _
"C:\Intel\Logs\IntelGFX.log", _
"C:\Intel\Logs\IntelSSDTDK.log", _
"C:\Intel\Logs\IntelSSDToolbox.log" _
)
Function CleanUp(arrList, value)
Dim sFile, myFile
For each sFile in arrList
myFile = sFile & "." & value
If objFSO.FileExists(sFile) Then
objFSO.DeleteFile(myFile)
Else
Wscript.Echo "NO File: " & sFile
End if
Next
End Function
CleanUp arrList, "2020-05-09"
Thanks

Answer 1

Thank you Kul-Tigin
When I replaced sFile with myFile as you had indicated, it resolved the issue. I can't believe I didn't see it.
Solution:
If objFSO.FileExists(myFile) Then
objFSO.DeleteFile(myFile)
Else
...