Zuviel Werbung? - > Hier kostenlos beim SPS-Forum registrieren

Ergebnis 1 bis 6 von 6

Thema: Libnodave and Visual Studio 2008

  1. #1
    Registriert seit
    22.09.2009
    Beiträge
    3
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    Wenn the programm is calling this function, it hangs on the

    ph = openSocket(port, Peer$)

    Port = 102 (as long)
    Peer = 192.168.0.1 (as string)

    i use

    Microsoft studio 2008
    Vista 64 Bits
    write in visual basic

    Microsoft Visual Studio Solution (.sln)
    file included in the *.rar

    Thank you.....


    '************************************************* ****
    ' End of interface declarations and helper functions.
    '************************************************* ****
    PublicFunction initialize(ByRef ph AsLong, ByRef di AsLong, ByRef dc AsLong)
    Dim res AsLong
    Dim Peer AsString
    Dim port AsLong
    Dim MpiPpi AsLong
    Dim Rack AsLong
    Dim Slot AsLong
    ph = 0
    di = 0
    dc = 0
    REM uncomment the daveSetDebug... line, save your sheet
    REM run excel from dos box with: excel yoursheet >debugout.txt
    REM send me the file debugout.txt if you have trouble.
    REM call daveSetDebug(daveDebugAll)
    initialize = -1
    Peer$ = Form1.TextBox1.Text
    port = 102
    'Form1.Label3.Text = openSocket(port, Peer$)
    ph = openSocket(port, Peer$) ' for ISO over TCP

    If (ph > 0) Then
    di = daveNewInterface(ph, ph, "IF1", 0, daveProtoISOTCP, daveSpeed187k)
    res = daveInitAdapter(di)
    If res = 0 Then
    ' with ISO over TCP, set correct values for rack and slot of the CPU
    Rack = Form1.TextBox2.Text
    Slot = Form1.TextBox3.Text
    dc = daveNewConnection(di, MpiPpi, Rack, Slot)
    res = daveConnectPLC(dc)
    If res = 0 Then
    initialize = 0
    EndIf
    EndIf
    EndIf
    EndFunction

    Angehängte Dateien Angehängte Dateien
    Zitieren Zitieren Libnodave and Visual Studio 2008  

  2. #2
    Registriert seit
    04.04.2008
    Beiträge
    389
    Danke
    85
    Erhielt 39 Danke für 24 Beiträge

    Standard

    Hallo Rick,
    i think, this is the initialisation routine for LibNoDave with Excel, but i am not sure. I recommand the following routine, which is tested with VB2005:

    Code:
    OptionExplicitOn
    OptionStrictOff
    
    PublicClass Form1
    Dim localMPI AsInteger = 1, plcMPI AsInteger = 2
    Dim fds As libnodave.daveOSserialType
    Dim di As libnodave.daveInterface
    Dim dc As libnodave.daveConnection
    Dim res AsInteger = 1
    Dim livebit AsBoolean
    
    
    PublicSub ISO_TCP()
    Dim IP AsString
    IP = cbxIP.Text
    fds.rfd = libnodave.openSocket(102, IP) 'Portstatus - lesen
    fds.wfd = fds.rfd 'Portstatus schreiben = Portstatus - lesen
    di = New libnodave.daveInterface(fds, "Mein Interface", localMPI, _
    libnodave.daveProtoISOTCP, libnodave.daveSpeed187k)
    di.setTimeout(1000000)
    res = di.initAdapter
    If res = 0 Then'initAdapter OK
    ' Rack und Slot spielen keine Rolle bei diesem Protokoll
    dc = New libnodave.daveConnection(di, plcMPI, 0, 2)
    res = dc.connectPLC()
    livebit = True
    ...
    ...
    EndIf
    EndSub
    

    Good Luck
    Earny

  3. #3
    Rick ist offline Neuer Benutzer
    Themenstarter
    Registriert seit
    22.09.2009
    Beiträge
    3
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Lächeln

    Thank you i managed to setup a project using Visual studio 2008
    the code was indeed for excel.
    iàm just starting.......
    Zitieren Zitieren Ok  

  4. #4
    Registriert seit
    08.10.2009
    Beiträge
    6
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard

    Rick,
    do you compile your application in 32 bit mode or for "any cpu" ?

    juergen

  5. #5
    Rick ist offline Neuer Benutzer
    Themenstarter
    Registriert seit
    22.09.2009
    Beiträge
    3
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard

    IdOn`t know i think its Any CPU.
    But i switched to Visual Basic Express.....
    I know that on my Laptop 64 Bits they file project was not working.

    that means wenn is call a Libnodave function it crasehes.

    On my 32 Bit machine the projectworked oke.

    Gr. Rick

  6. #6
    Registriert seit
    08.10.2009
    Beiträge
    6
    Danke
    0
    Erhielt 0 Danke für 0 Beiträge

    Standard


    Zuviel Werbung?
    -> Hier kostenlos registrieren
    When you compile an application as Any CPU, it will run on a 64 bit machine in 64 bit mode.
    libnodave is a 32 bit dll, so you have to compile your application as x86.
    It's not allowed to mix various assemblies/dlls in different machine modes.

Ähnliche Themen

  1. Libnodave und Visual Basic 2008
    Von Hocheck im Forum Hochsprachen - OPC
    Antworten: 27
    Letzter Beitrag: 22.12.2010, 21:39
  2. OPC - Client programmieren mit Microsoft Visual Studio 2008
    Von Neger für alles... im Forum Hochsprachen - OPC
    Antworten: 24
    Letzter Beitrag: 30.11.2010, 14:45
  3. libnodave in Visual Studio 2005 einbinden
    Von jurgen_Stadler im Forum Hochsprachen - OPC
    Antworten: 5
    Letzter Beitrag: 24.10.2009, 18:25
  4. LibNoDave + Visual Studio + S7 über TCP/IP
    Von david.ka im Forum Hochsprachen - OPC
    Antworten: 4
    Letzter Beitrag: 22.09.2008, 12:07
  5. ct -> MS .net Visual Studio auf DVD
    Von Kurt im Forum Werbung und Produktneuheiten
    Antworten: 8
    Letzter Beitrag: 08.05.2007, 11:47

Lesezeichen

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • Anhänge hochladen: Nein
  • Beiträge bearbeiten: Nein
  •