SendStringToExecute

[Anonymous]

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...