I'm haveing trouble sending a command to acad from my vb.net app. I'm
trying to execute a script but the code hangs when passing in the filename of
the script to load.
[img src="@97426"]
This is my code:
'set filedia to
0
ApplicationServices.Application.DocumentManager.MdiActiveDocument.SendStri ngToExecute("filedia
", True, False,
True)
ApplicationServices.Application.DocumentManager.MdiActiveDocument.Send StringToExecute("0
", True, False, True)
'load the
script
ApplicationServices.Application.DocumentManager.MdiActiveDocument.SendStri ngToExecute("script
", True, False, True)
ApplicationServices.Application.DocumentManager.MdiActiveDocument.SendStringToE xecute(""""
& Me.txtScript.Text & """" & "\n", True, False,
True)
'ApplicationServices.Application.DocumentManager.MdiActiveDocument.Sen dStringToExecute("
\n", True, False, True)
'set filedia to 1
ApplicationServices.Application.DocumentManager.MdiActiveDocument.Se ndStringToExecute("filedia
", True, False,
True)
ApplicationServices.Application.DocumentManager.MdiActiveDocument.Send StringToExecute("1
", True, False, True)
Please help...
