How to handle no file found?

I’m using the lines below to load routines for specific users. I’d like to have some error control to it. Let’s say the file is not found – how can I pass the error and not have the routine blow. You can see I some a type of file not found handler in the last routine below, but don’t know how to combine them. Any ideas? Any suggestion for something other then what I have here?

Thanks

(if (= (getvar "loginname") "DSMITH")
(load "H:\\Production\\Acad\\AFMTools\\Entclean")
)

(if (findfile "H:\\Production\\Acad\\Shortcom.lsp")
(load "H:\\Production\\Acad\\Shortcom.lsp")
)
)

 

(if (findfile "H:\\Production\\Acad\\Shortcom.lsp")
(load "H:\\Production\\Acad\\Shortcom.lsp")
(alert "\nCould not find H:\\Production\\Acad\\Shortcom.lsp file ?")
)


Bob

 

Oh, I see, but how do I get the load per user "if" and "if" file found all in one routine?

 

(if (= (getvar "loginname") "DSMITH")
(if (findfile"H:\\Production\\Acad\\AFMTools\\Entclean")
(load "H:\\Production\\Acad\\AFMTools\\Entclean")
(princ "\nEntclean.lsp Not Found")
)
(princ "\nNot User DSmith")
)

 

You mean like this ?

(if (= (getvar "loginname") "DSMITH")
(progn
(load "H:\\Production\\Acad\\AFMTools\\Entclean")
(if (findfile "H:\\Production\\Acad\\Shortcom.lsp")
(load "H:\\Production\\Acad\\Shortcom.lsp")
(alert "\nCould not find H:\\Production\\Acad\\Shortcom.lsp file ?")
); end progn
); end if

You can 'nest' all findfile....'s within a structure like:
(if (condition..)
(progn
(do this)
(and this)
(and this)
); end progn
); end if

OR
(if (condition...)
(progn
(do this)
(and this)
); end progn
(don't do this)
); end if

Bob

 

(if
(and
(= (getvar "loginname") "DSMITH"))
(findfile "H:\\Production\\Acad\\AFMTools\\Entclean")
)
(progn
(load "H:\\Production\\Acad\\AFMTools\\Entclean")
(if (findfile "H:\\Production\\Acad\\Shortcom.lsp")
(load "H:\\Production\\Acad\\Shortcom.lsp")
)
)
)
)
;Endless possibilities, but only one solution, yours...
--

AUTODESK
Authorized Developer
http://www.Cadentity.com
MASi

have some error control to it. Let's say the file is not found - how can I
pass the error and not have the routine blow. You can see I some a type of
file not found handler in the last routine below, but don't know how to
combine them. Any ideas? Any suggestion for something other then what I have
here?

 

Thanks for all the info above. Gives me good options.