TheSwamp

Code Red => AutoLISP (Vanilla / Visual) => Topic started by: csgoh on April 15, 2005, 10:59:37 PM

Title: Equivalent of Getcfg & setcfg in Visual Lisp/ActiveX?
Post by: csgoh on April 15, 2005, 10:59:37 PM

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

Code: [Select]


 (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)))
  )
 )


Thanks.

csgoh