bit a problem with vba and cameras

[termit]

i recently try to manage cameras in autocad 2006 so that is not supportet in vba code so i used a trick by sending commands to autocad it works but display image is not real so i moved in autocad 2009 i see that in autocad 2009 have camera object but i didnt find any command to invok it from vba so did they put camera in vba for autocad 2009 or i will still have to trouble myself with parsing commands to autocad becouse there is a bit of problem

 

i draw line in layer who named is camera

then i send commands

 
For i = 0 To j
ThisDrawing.ActiveSpace = acModelSpace
Set DynArray(i).StartPoint(2) = camera_height

ThisDrawing.SendCommand "camera" & vbCr

ThisDrawing.SendCommand DynArray(i).StartPoint(0) & "," & DynArray(i).StartPoint(1) & "," & DynArray(i).StartPoint(2) & vbCr
ThisDrawing.SendCommand DynArray(i).EndPoint(0) & "," & DynArray(i).EndPoint(1) & "," & DynArray(i).EndPoint(2) & vbCr

 

i have one simple question

have in vba for autocad 2009 camera object

how to use it

 

tnx

 

sorry for bad grammar