Bonjour,

J'aimerai savoir comment je peut faire pour communiqué entre un PC avec un programme en Visual Basic et un automate Schneider, le but est que j'envoie des valeurs à l'automate par TCP. J'ai fait plusieurs recherches mais je ne suis pas sur d'elles.

Voici mon code pour l'instant :
Code vb.net : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Imports System
Imports System.Runtime.InteropServices
Imports System.Net.Sockets
Imports System.Net
 
Module Module1
 
    Sub main()
        Dim _socket As New Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp)
        _socket.Connect(New IPEndPoint(IPAddress.Parse("192.168.1.75"), 502))
        Dim Message As [Byte]() = System.Text.Encoding.ASCII.GetBytes("150")
        Dim OctetsEnvoyes As Int16 = _socket.Send(Message, 0, Message.Length, SocketFlags.None)
 
    End Sub
 
End Module
Qui envoie une donnée à L'IP de mon automate mais maintenant j'aimerai envoyé cette donnée a un adresse modbus de mon automate.

Merci