Hallo,
ich versuche schon seit einiger Zeit vergebens einen Servoverstärker, für die Steuerung einer Verfahreinheit mittels Visual Basic, anzusteuern.
Und zwar gibt es für den Servoverstärker im Handbuch eine Tabelle mit ASCII Commands mit denen sich einzelne Fahrbefehle mittels der RS232 Schnittstelle ansteuern lassen.
Hier mal ein Ausschnitt der Tabelle:
Das ganze klappt mithilfe von Putty auch einwandfrei, nur mit VB tut sich iwie nichts.
Mein Code sieht wie folgt aus:
ich versuche schon seit einiger Zeit vergebens einen Servoverstärker, für die Steuerung einer Verfahreinheit mittels Visual Basic, anzusteuern.
Und zwar gibt es für den Servoverstärker im Handbuch eine Tabelle mit ASCII Commands mit denen sich einzelne Fahrbefehle mittels der RS232 Schnittstelle ansteuern lassen.
Hier mal ein Ausschnitt der Tabelle:
Das ganze klappt mithilfe von Putty auch einwandfrei, nur mit VB tut sich iwie nichts.
Mein Code sieht wie folgt aus:
Quellcode
- Imports System.IO
- Imports System.IO.Ports
- Public Class Form1
- Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
- SerialPort1.PortName = "COM3"
- SerialPort1.BaudRate = 9600
- SerialPort1.DataBits = 8
- SerialPort1.Parity = Parity.None
- SerialPort1.StopBits = StopBits.One
- SerialPort1.Handshake = Handshake.None
- SerialPort1.Open()
- End Sub
- Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
- SerialPort1.Write("MH")
- End Sub
- End Class