0 Members and 1 Guest are viewing this topic.
Hey all, I'm trying to follow the tutorial on Afralisp but I'm stuck...I keep getting the error message. I don't know what he's talking about when he says "(If you have problems when writing or running this projects, ensure that the Microsoft DAO 3.6 Object Library is selected in your VBA References.)". Which VBA References? Where? (stop laughing!)
I need some help...(as if you hadn't guess that yet!:roll:)...Back to the ol' attribute extraction problem. I've done some hunting and searching, which led me to Afralisp, but is there some kind soul out there who could give me an added personal touch?
I'm looking to go back and forth between AutoCAD blocks and Access / Excel...what should I do? Where should I look to figure it out on my own?
Hey all, I'm trying to follow the tutorial on Afralisp but I'm stuck...I keep getting the error message. I don't know what he's talking about when he says "(If you have problems when writing or running this projects, ensure that the Microsoft DAO 3.6 Object Library is selected in your VBA References.)". Which VBA References? Where? (stop laughing!) I need some help...(as if you hadn't guess that yet!:roll:)...Back to the ol' attribute extraction problem. I've done some hunting and searching, which led me to Afralisp, but is there some kind soul out there who could give me an added personal touch? I'm looking to go back and forth between AutoCAD blocks and Access / Excel...what should I do? Where should I look to figure it out on my own?Thanks folks!
Set dbInfo = OpenDatabase("C:\mypathinfo\titleblocks\TBLOCK.MDB")
Set SSetCol = ThisDrawing.SelectionSets For Each ssnew In SSetCol If ssnew.Name = "TBLK" Then ThisDrawing.SelectionSets.Item("TBLK").Delete Exit For End If Next
(setq f (findfile "tblock.dvb"))
(setq f (findfile "tblock2000.dvb"))
(vl-vbaload "tblock2000.dvb")
(vl-vbaload f)