VBS to AUTOIT Script

Option Explicit
 Dim Fso, Ws
 Set Fso = CreateObject("Scripting.FileSystemObject")
 If Fso.FileExists("error.log") Then
     Fso.DeleteFile("error.log")
 End If
 WScript.Sleep (500)
 Set Ws = CreateObject("WScript.Shell")
 WScript.Sleep (1000)
 Ws.Run "cmd /k validitor --dtd ""custom.dtd"" -c *.xml > error.log & exit", True
    MsgBox "Successful. Please refer to a log file."