I would normally use Powershell for this, but for this purpose I need to use VB Script. I have the following thus far, but it always returns "Files not present" even when the files are, in fact, present. Any help would be appreciated.

```
Option Explicit

Dim FSO
Set FSO = CreateObject("Scripting.FileSystemObject")

Dim InputFile1
InputFile1 = ("C:\%userprofile%\desktop\Entry.lnk")

Dim InputFile2
InputFile2 = ("C:\%userprofile%\desktop\Admin.lnk")

Dim InputFile3
InputFile3 = ("C:\%userprofile%\desktop\Data Admin.lnk")

Dim InputFile4
InputFile4 = ("C:\%userprofile%\desktop\Verification.lnk")

If (FSO.FileExists(InputFile1)) And (FSO.FileExists(InputFile2)) And (FSO.FileExists(InputFile3)) And (FSO.FileExists(InputFile4)) Then
    WScript.Echo ("Present")
    Else
        WScript.Echo ("Files Not Present")
        Wscript.Quit
    End If

```