Sub ScriptTools() Dim cst As Object Dim FilePath As String Set cst = CorelScriptTools FilePath = cst.GetFileBox() If FilePath <> "" Then If cst.FileAttr(FilePath) = 0 Then MsgBox "The file you selected doesn't exist." End If End IfEnd Sub