[khSerg]

Господа подскажите на такой вопрос:
Необходимо предать из клиента в программу MBX значения (имена таблиц)
и чтобы после этого программа начала производить дальнейшие действия???
Как передавать значения я вкурсе, а вот как это сделать чтобы после передачи программа начала функсионировать - это для меня вопрос!
Скорее всего надо использовать что-то вроде RemoteMsgHandler...
Если можно с примерами :))

[Vovik]

Я делаю так
Это фрагмент кода MB (утилиты к примеру - Ввод колодцев.MBX)

'переменные уровня утилиты
Dim shet As integer
Dim NKol As String
Dim Dt As String
Dim Mat As String

' автоматом вызывается при передачи данных из VB смотри фрагмент кода ниже.
Sub RemoteMsgHandler()
Dim sMsg As String
sMsg = CommandInfo(CMD_INFO_MSG)
Do case shet
case 0
NKol = sMsg
shet =1
Exit Sub
case 1
Dt = Val(sMsg)
shet =2
Exit Sub
case 2
Mat = sMsg
shet =0
Exit Sub
end case
End Sub

Фрагмент кода VB
Private Sub Command1_Click() 'Ввод
Text2.LinkTopic = "MapInfo|Ввод колодцев.MBX"
Text2.LinkMode = 2
Text2.LinkExecute Text1(0).Text '№ колодца
Text2.LinkExecute Text1(1).Text 'D_трубы
Text2.LinkExecute Text1(2).Text 'Материал
Text2.LinkMode = 0
Unload Me
End
End Sub

Я думаю коментариии излишни

[khSerg]

Спасибо за пример!
А что такое Text1(0) - вот этот 0, потому что так работать не хочет
и если написать так Text2.LinkExecute Text1.Text - то хоть компилит

И еще, а то делать если я пишу в C# :))? там LinkTopic и других свойств у textbox нет!!! нда

[Vovik]

Text1 -это имя , а 0 это индекс контрола TextBox VB.
Я редко даю "свои" имена контролам т.к меня устраивают имена который VB дает по умолчанию

[khSerg]

ААА ну не знал что в VB есть у textbox свои индексы :)
но почемуто с ними работать не хочет, но это и не важно...
сейчас думаю как попытатся вашу конструкцию в C#

[khSerg]

Кому интерсно, получилось вот такое безобразие, но работает:
public object MapInfo;
//DDE

this.MapInfo = RuntimeHelpers.GetObjectValue(Interaction.CreateObject("MapInfo.Application", ""));
Excel._Application app = new Excel.Application();
NewLateBinding.LateCall(this.MapInfo, null, "do", new object[] { "Run Application \"D:\\NOUT\\Programs\\MyProgram\\Untitled.MBX\" " }, null, null, null, true);
int i = Conversions.ToInteger(app.DDEInitiate("MapInfo", "D:\\NOUT\\Programs\\MyProgram\\Untitled.MBX"));
app.DDEExecute(i,"cod");
textBox1.Text = "True";