Отговори на тема  [ 6 мнения ] 
VS2005.NET Modbus TCP driver class 
Автор Съобщение
Ранг: Минаващ
Ранг: Минаващ

Регистриран на: Пон Мар 30, 2009 10:27 pm
Мнения: 48
Мнение VS2005.NET Modbus TCP driver class
Здравейте.От скоро се занимавам с VS.NET.Изтеглих си от http://www.codeproject.com/KB/IP/Modbus_TCP_class.aspx. Искам да си напиша приложение с което да чета устройства на Modbus. Пренаписвам си примерната програма от C# на VB.NET понеже него ползвам макар че с NET платформата няма значение на какво ще пишеш. Проблема ми е че не знам как да заменя cледното от C# на VB или поне не сработва.

private void btnConnect_Click(object sender, System.EventArgs e)
{
try
{
// Create new modbus master and add event functions
MBmaster = new Master(txtIP.Text, 502);
//=====================================================================
MBmaster.OnResponseData += new ModbusTCP.Master.ResponseData(MBmaster_OnResponseData);
MBmaster.OnException += new ModbusTCP.Master.ExceptionData(MBmaster_OnException);
//======================================================================
// Show additional fields, enable watchdog
grpExchange.Visible = true;
grpData.Visible = true;
Watchdog.Enabled = true;
}
catch(SystemException error)
{
MessageBox.Show(error.Message);
}
}

Private Sub btnConnect_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Try
' Create new modbus master and add event functions
MBmaster = New Master(txtIP.Text, 502)
'------Тук не ми се обработва събието незнам какво бъркам-------------------------
AddHandler MBmaster.OnResponseData, AddressOf MBmaster_OnResponseData
AddHandler MBmaster.OnException, AddressOf MBmaster_OnException
'--------------------------------------------------------------------------------------------------
' Show additional fields, enable watchdog
grpExchange.Visible = True
grpData.Visible = True
Watchdog.Enabled = True
Catch [error] As SystemException
MessageBox.Show([error].Message)
End Try
End Sub


Пон Май 18, 2009 12:58 pm
Профил
Ранг: Почетен член
Ранг: Почетен член
Аватар

Регистриран на: Съб Сеп 17, 2005 5:07 pm
Мнения: 813
Местоположение: Сливен
Мнение 
добре де .. като не можеш да го препишеш правилно на VB и ако оригиналния код работи .. еми прекомпилирай го на DLL .. после си го инклудни като Rеference и си ползвай методите.
Аз пиша на C# и базика ми е объркващ ... като синтаксис ... ако имаш проблеми прати ми projecta дето е на C# кажи кои методи ти трябват и ще се опитам да помогна някак :)


Пон Май 18, 2009 3:02 pm
Профил ICQ
Ранг: Минаващ
Ранг: Минаващ

Регистриран на: Пон Мар 30, 2009 10:27 pm
Мнения: 48
Мнение 
В прикаченият файл е и примерния проект и готовия DLL,в готовия dll има всички методи инклуднал съм си го в проекта просто не съм сигурен правилно ли съм направил нещата.


Прикачени файлове:
Коментар на файл: Modbus_TCP_class_demo.zip
Modbus_TCP_class_demo.zip [71.3 KiB]
244 пъти
Пон Май 18, 2009 3:10 pm
Профил
Ранг: Почетен член
Ранг: Почетен член
Аватар

Регистриран на: Съб Сеп 17, 2005 5:07 pm
Мнения: 813
Местоположение: Сливен
Мнение 
:))) ха сега кажи как според теб ще помогна ...
искаш да ти прекомпилирам демо програмката като DLL-ли? Така като гледам си имаш DLL .Какво да направя ?


Пон Май 18, 2009 3:23 pm
Профил ICQ
Ранг: Минаващ
Ранг: Минаващ

Регистриран на: Пон Мар 30, 2009 10:27 pm
Мнения: 48
Мнение 
Ясно ми е какво имам.
Въпроса ми беше това на C#

MBmaster.OnResponseData += new ModbusTCP.Master.ResponseData(MBmaster_OnResponseData);
MBmaster.OnException += new ModbusTCP.Master.ExceptionData(MBmaster_OnException);

едно и също ли е като това на VB

AddHandler MBmaster.OnResponseData, AddressOf MBmaster_OnResponseData
AddHandler MBmaster.OnException, AddressOf MBmaster_OnException

В първия случай се обработва евента от съответните процедури, докато в VB няма никава реакция та въпроса ми беше къде бъркам, като MBmaster_OnResponseData и MBmaster_OnException също ги има пренаписани в моето приложение просто не се извикват???


Пон Май 18, 2009 3:57 pm
Профил
Ранг: Минаващ
Ранг: Минаващ

Регистриран на: Пон Мар 30, 2009 10:27 pm
Мнения: 48
Мнение 
Подкарах го :D


Сря Май 27, 2009 7:12 pm
Профил
Покажи мненията от миналия:  Сортирай по  
Отговори на тема   [ 6 мнения ] 

Кой е на линия

Потребители разглеждащи този форум: 0 регистрирани и 1 госта


Вие не можете да пускате нови теми
Вие не можете да отговаряте на теми
Вие не можете да променяте собственото си мнение
Вие не можете да изтривате собствените си мнения
Вие не можете да прикачвате файл

Търсене:
Иди на:  
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group.
Designed by ST Software for PTF.
Хостинг и Домейни