VBNet - Форум - VB.net vs VC++ dll

Вопрос: VB.net vs VC++ dll Добавлено: 16.11.10 17:01

Автор вопроса: d78

Здравствуте! Помогите разобраться новичку
есть библиотека написанная на VC 6.0, надо ее прикрутить к моей программе. есть пример использования на Foxpro (работающий).
Проблема: VB не может получить значение переменной nrecnum постоянно выдавая 0 значение.
В Foxpro все работает.
В чем дело?
FoxPro

DECLARE LONG OpenCommPort IN  ;
        JS868NetCom AS  ;
        JSOpenCommPort STRING,  ;
        LONG
DECLARE CloseCommPort IN  ;
        JS868NetCom AS  ;
        JSCloseCommPort
DECLARE LONG ReadAllRecord IN  ;
        JS868NetCom AS  ;
        JSReadAllRecord STRING,  ;
        LONG, LONG @

      jsopencommport("NET",1868)
      nrecnum = 0
     JSReadAllRecord("192.168.0.68",0,@nrecnum)



         = MESSAGEBOX( nrecnum, 48, "Message")
        JSCloseCommPort()


Vb2008

Public Class Form1

    Public Class connect

        Public nrecnum As Integer

        Declare Ansi Function OpenCommPort Lib "JS868NetCom.dll" (ByVal type As String, ByVal port As Integer) As Integer
        Declare Auto Function CloseCommPort Lib "JS868NetCom.dll" () As Integer
        Declare Ansi Function SetShowTitle Lib "JS868NetCom.dll" (ByVal ip As String, ByVal title As String) As Integer
        Declare Ansi Function ReadAllRecord Lib "JS868NetCom.dll" (ByVal ip As String, ByRef par1 As Long, ByRef nrecords As Long) As Long
        End Function
    End Class


    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        connect.OpenCommPort("NET", 1868)
        connect.ReadAllRecord("192.168.0.68", 0, nrecnum)
        connect.CloseCommPort()
    End Sub
End Class

Ответить

Ответы Всего ответов: 3

Номер ответа: 1 Автор ответа: EROS Вопросов: 58 Ответов: 4255	Профиль \| \| #1	Добавлено: 16.11.10 17:30
	А что мешает работать с COM портом напрямую из NET, без всяких dll сторонних? Ответить

Номер ответа: 2 Автор ответа: d78 Вопросов: 1 Ответов: 1	Профиль \| \| #2	Добавлено: 16.11.10 17:36
	А что мешает работать с COM портом напрямую из NET, без всяких dll сторонних? это сетевой считыватель RFID меток... связь с ним только через эту библиотеку Ответить

Номер ответа: 3 Автор ответа: AgentFire ICQ: 192496851 Вопросов: 75 Ответов: 3178	Профиль \| \| #3	Добавлено: 16.11.10 19:27
	Declare Ansi Function ReadAllRecord Lib "JS868NetCom.dll" (ByVal ip As String, ByRef par1 As Int32, ByRef nrecords As Int32) As Int32 Ответить

Страница: 1 |