Help with .net and AutoCad Map

[Anonymous]

Does anyone know how to implement a .NET application with AutoCad Map?

I am using late binding as early binding doesn't work, but getting the
AutoCad Map Application does not work.

*** Code:
Set acadApp = GetObject(, "AutoCAD.Application")

Set amap = acadApp.GetInterfaceObject("AutoCADMap.Application")

***

Any help is appreciated.



Thanks,

Jon

[Anonymous]

Jon,

On Mon, 3 Nov 2003 07:41:09 -0800, Jon wrote:

> Does anyone know how to implement a .NET application with AutoCad Map?
>
> I am using late binding as early binding doesn't work, but getting the
> AutoCad Map Application does not work.
>
> *** Code:
> Set acadApp = GetObject(, "AutoCAD.Application")
>
> Set amap = acadApp.GetInterfaceObject("AutoCADMap.Application")
>
> ***
>
> Any help is appreciated.
>
>
>
> Thanks,
>
> Jon

Try using ...GetInterfaceObject( "AutoCADMap.Application.2" )

HTH
Herbert

[Anonymous]

Thanks.

Jon


"Herbert Putz" wrote in message
news:1kck280ckm4ik.18dlfvin1ossp$.dlg@40tude.net...
> Jon,
>
> On Mon, 3 Nov 2003 07:41:09 -0800, Jon wrote:
>
> > Does anyone know how to implement a .NET application with AutoCad Map?
> >
> > I am using late binding as early binding doesn't work, but getting the
> > AutoCad Map Application does not work.
> >
> > *** Code:
> > Set acadApp = GetObject(, "AutoCAD.Application")
> >
> > Set amap = acadApp.GetInterfaceObject("AutoCADMap.Application")
> >
> > ***
> >
> > Any help is appreciated.
> >
> >
> >
> > Thanks,
> >
> > Jon
>
> Try using ...GetInterfaceObject( "AutoCADMap.Application.2" )
>
> HTH
> Herbert

[Anonymous]

Try this

Dim acadApp As AcadApplication
Dim acadDoc As AcadDocument

Try
acadApp = CType(GetObject , "AutoCAD.Application"), AcadApplication)
acadApp.Visible = True
acadDoc = acadApp.ActiveDocument
acadDoc.Application.Visible = True
Catch ex As Exception
MsgBox(ex.Message)
End Try