API- Question

hello all together,

i have a problem with the SolidWorks- API in Visual Basic.
I've written:

dim objPart as Object
dim objAnno as Object

Set objPart = objSwApp.ActivateDoc("3-0002000,Welle_m_Passfedernut.SLDPRT&quot

objAnno = objPart.GetFirstAnnotation2()

but there returns a failure. Can somebody tell me why?

Thank you, Marco

 

[dsi]

Do you have the part opened already? What error message do you get? Are their any Annotations on the part?

Public Const swDocPart = 1

Public swApp As Object
Public swPart As Object
Public swAnnotation As Object


Dim ModelPath As String
Dim sFileName As String

ModelPath = "C:\Temp\"
sFileName = "3-0002000,Welle_m_Passfedernut.SLDPRT"

Set swPart = swApp.OpenDoc(ModelPath & sFileName, swDocPart)
Set swPart = swApp.ActivateDoc(sFileName)

swAnnotation = swPart.GetFirstAnnotation2

DimensionalSolutions@Core.com
While I welcome e-mail messages, please post all thread activity in these forums for the benefit of all members.