CADsite forum

Wie weet een lisp net als hieronder voor
Printer Support file path->> Printer Description File search Path


(defun C:styleu()
(setenv  "PrinterStyleSheetDir" "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\Plot Styles")
)


(defun C:Desceu()
   (setenv  "PrinterDescDir" "pad naar pmp")
)




groeten stephan

Citaat van: sschevers op vr 26 08 2011, 16:28:13

Code Selecteer Uitklappen


(defun C:Desceu()
   (setenv  "PrinterDescDir" "pad naar pmp")
)




groeten stephan

Ja hij werkt perfect dankjewel!!

nog wel 1 vraagje

Met commando changeplot wil ik alle instelling veranderen. Welke lisp code heb ik dan nodig?



(defun C:changeplot()
(setenv  "PrinterStyleSheetDir" "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\Plot Styles")
)


(defun C:changeplot()
   (setenv  "PrinterDescDir" "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\Files pmp")
)

(defun C:changeplot()
   (setenv  "config...." "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\plotters")
)

Als je de paden in een keer  wil aanpassen voer alle setenv commando's in een lisp uit


(defun C:changeplot()
   (setenv  "PrinterStyleSheetDir" "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\Plot Styles")
   (setenv  "PrinterDescDir" "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\Files pmp")
   (setenv  "config...." "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\plotters")
)


groeten

stephan

Citaat van: sschevers op wo 05 10 2011, 13:36:16
Als je de paden in een keer  wil aanpassen voer alle setenv commando's in een lisp uit

Code Selecteer Uitklappen



(defun C:changeplot()
   (setenv  "PrinterStyleSheetDir" "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\Plot Styles")
   (setenv  "PrinterDescDir" "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\Files pmp")
   (setenv  "config...." "\\\\\S31000800\\appl$\\Acad2010\\Plotten\\plotters")
)

groeten

stephan


yes dat is hem :P dankjewel thxxxx
[/code]