Topic: Clear text file contents

[Dommy2Hotty]

Building off the the LoadSupportPaths Lisp

Code: [Select]

(vl-load-com)
(setq files (vla-get-files (vla-get-preferences (vlax-get-acad-object))))
(setq paths (vla-get-supportpath files))
(setq f (open "A:\\StandardPaths.txt" "w"))
(write-line paths f)
(close f)
(setq files (vla-get-files (vla-get-preferences (vlax-get-acad-object))))
(setq f (open "A:\\StandardPaths.txt" "r"))
(setq paths (read-line f))
(close f)
(setq paths (strcat "C:\\Program Files\\ASE\\Building_Maintanence_Program\\MacNeal\\Config" ";" "C:\\Program Files\\ASE\\Building_Maintanence_Program\\MacNeal\\Scripts" ";" paths))
(vla-put-supportpath files paths)

Now I want to delete all information from the text file...how would I go about this?

[Mark]

Open the file for writing, just don't write to it.

Code: [Select]


(setq file "C:\\Temp\\__dwgs.txt")
(setq file_open (open file "w"))
(close file_open)


[Dommy2Hotty]

Ahhh...thank you master!  Sometimes things can be so simple...

[CADwoman]

Hi, I'm trying to change all the users support paths when they start AutoCAD. What is your recommendation? Thanks

Open the file for writing, just don't write to it.

Code: [Select]

(setq file "C:\\Temp\\__dwgs.txt")
(setq file_open (open file "w"))
(close file_open)


[Bob Wahr]

Starting a new thread.  One that deals with the issue at hand.