I was reading one of the articles listed earlier in this thread on found this code:
Code:
(defun server-check ()
(if
(not (wcmatch (dos_hostname) "*myserver*"))
(progn
(alert
"myserver not found."
)
(exit)
(princ)
) ;- end of progn
) ;- end of if
) ;- end of defun
(princ)
It then says that I need to call this function at the beginning of the file. Forgive me now as this is probably fairly simple, but I haven't needed to call one routine from another yet.
Thanks for your help.
[ Moderator Action = ON ] What are [ CODE ] tags... [ Moderator Action = OFF ]