How to browse for a file using a dialog box?

[GreyHippo]

I am writing a routine that reads in distances and bearings from text files. The user has to type in the filename and then the program reads the file and extracts the data. Instead of having the user type in the file, I would like have the user be able to browse to the file using a dialog box.

[GreyHippo]

I think I just found it. GETFILED

[kpblc2000]

(getfiled) function requires to select a file. You can try to use this lisp (i don't remember who's an author):

(defun browsefolder (title / shlobj folder fldobj outval)
  ;; Getting folder name user selected
  ;; If user press Cancel or Esc, returns nil
  ;; Call parameters:
  ;;	title	info message
  ;; Call samples:
  ;; (browsefolder "Select a folder")
  (vl-load-com)
  (setq
    shlobj (vla-getinterfaceobject
             (vlax-get-acad-object)
             "Shell.Application"
             ) ;_ end of vla-getInterfaceObject
    folder (vlax-invoke-method shlobj 'browseforfolder 0 title 0)
    ) ;_ end of setq
  (vlax-release-object shlobj)
  (if folder
    (progn
      (setq
        fldobj (vlax-get-property folder 'self)
        outval (vlax-get-property fldobj 'path)
        ) ;_ end of setq
      (vlax-release-object folder)
      (vlax-release-object fldobj)
      outval
      ) ;_ end of progn
    ) ;_ end of if
  ) ;_ end of defun

[abdulhuck]

(getfiled) function requires to select a file. You can try to use this lisp (i don't remember who's an author):

Very useful one, thanks.

Regards,
Abdul Huck

[Mohmed Zuber]

The In-Session ATP164 will cover file handling in AutoLISP in Segment_3. File Read, Write & Append operations are illustrated through sample Road Profile program.