what am I doing wrong (small code)

[dimava]

I asked beofre, and someone gave me this code: (sorry I'm not sure who)

sfile = "C:\01.dat"
Dim FSO As Object
Set FSO = CreateObject("Scripting.FileSystemObject")
If FSO.fileexists(sfile) = True Then
user32.Visible = True
Form2.Visible = False
Else:
Form2.Visible = False
Form1.Visible = True
End If
Set FSO = Nothing

but everytime the code is processed, it always shows form1, even is the file does exsist