Public imagenation As Object
Public im_result As String
Private Sub Form_Load()
Set imagenation = CreateObject("Imagenation.Application")
imagenation.Visible = True
imagenation.DDE.Request "OpenDocwin(0,0,c:\samples\applied.mil,my title,0,0,0)", im_result
MsgBox "Result is " + im_result
End Sub
Back to: Connecting to Imagenation