Code Red > AutoLISP (Vanilla / Visual)

Equivalent of Getcfg & setcfg in Visual Lisp/ActiveX?

(1/1)

csgoh:
Hi all
What is the equivalent of the following code in Visual Lisp/ActiveX?


--- Code: ---
 (setq a (rtos (getvar "date") 2 0))
 (SETQ date3(GETCFG "AppData/Wingoh/data1"))
 (if (= date3 nil)
  (progn
   (setcfg "AppData/Wingoh/data1" a)
   (setcfg "AppData/Wingoh/data2" (itoa (+ (atoi a) 14)))
  )
 )

--- End code ---


Thanks.

csgoh

Navigation

[0] Message Index