Show Posts
Pages: [1]
1  International / Software / Re: Monitor porta Com con VisualBasic 2008 e Arduino... on: November 13, 2012, 11:16:02 am
Grazie per i consiglie e la spiegazione...
ho risolto cosi:

Quote
SerialPort1.NewLine = vbCrLf

Come dicevi tu non mi funzionava.
2  International / Software / Re: Monitor porta Com con VisualBasic 2008 e Arduino... on: November 13, 2012, 09:55:04 am
scusami se ne approfitto...

Quote
    SerialPort1.NewLine =CARATTERE DI FINE RIGA RITORNATO DA ARDUINO
come trovo CARATTERE DI FINE RIGA RITORNATO DA ARDUINO?

ora vorrei migliorare anche su vb cos'è?
Quote
stack dell'eccezione o stack trace
scusa se ne approfitto vorrei imparare e non copiare e incollare..
cmq grazie della tua disponibilità...
3  International / Software / Re: Monitor porta Com con VisualBasic 2008 e Arduino... on: November 13, 2012, 08:30:52 am
eccoti il tutto....  smiley-sweat
Quote
Public Class Form1

    Dim Rxdata As String

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Button1.Enabled = False
        Button2.Enabled = False
        SerialPort1.Close()
        Dim porte As String()
        porte = SerialPort1.GetPortNames()
        For i = 0 To porte.Length - 1
            ComboBox1.Items.Add(porte(i))
        Next i
        ComboBox2.Items.Add("9600")
        ToolStripStatusLabel1.Text = "Nessuna Porta Connessa "
        Timer1.Enabled = True

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Button1.Enabled = False
        ComboBox1.Enabled = False
        ComboBox2.Enabled = False
        Button2.Enabled = True
        '....................................................... apri la porta COM
        SerialPort1.Close()
        SerialPort1.PortName = ComboBox1.Text
        SerialPort1.Parity = IO.Ports.Parity.None
        SerialPort1.DataBits = 8
        SerialPort1.StopBits = IO.Ports.StopBits.One
        SerialPort1.Open()
        SerialPort1.DiscardInBuffer()
        '.........................................................
        ToolStripStatusLabel1.Text = "Porta Connessa " & ComboBox1.Text
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Button1.Enabled = True
        ComboBox1.Enabled = True
        ComboBox2.Enabled = True
        SerialPort1.Close()
        ToolStripStatusLabel1.Text = "Nessuna Porta Connessa "
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        End
    End Sub

    Private Sub TrackBar1_Scroll(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TrackBar1.Scroll
        GroupBox1.Text = "Interval Times " & TrackBar1.Value / 1000 & " seconds"
        Timer1.Interval = TrackBar1.Value
    End Sub

    Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
        Rxdata = SerialPort1.ReadLine.Trim
    End Sub

    Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        TextBox1.Text = TextBox1.Text & Rxdata & " "
    End Sub

    Private Sub ComboBox2_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox2.SelectedIndexChanged
        Button1.Enabled = True
    End Sub
End Class
4  International / Software / Re: Monitor porta Com con VisualBasic 2008 e Arduino... on: November 13, 2012, 07:49:11 am
ho usato  Rxdata = SerialPort1.ReadLine ora uso   smiley-wink Rxdata = SerialPort1.ReadLine.Trim
Mi manca da risolvere un ultimo problema e ho finito...
quando chiudo la porta per stoppare Rxdata mi va tutto in errore...

Quote
   Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Button1.Enabled = True
        ComboBox1.Enabled = True
        ComboBox2.Enabled = True
        SerialPort1.Close()
        ToolStripStatusLabel1.Text = "Nessuna Porta Connessa "
    End Sub

e l'errore mi si presenta su  Rxdata = SerialPort1.ReadLine.Trim

Quote
    Private Sub SerialPort1_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
        Rxdata = SerialPort1.ReadLine.Trim
    End Sub

5  International / Software / Monitor porta Com con VisualBasic 2008 e Arduino... on: November 13, 2012, 06:34:15 am
Buongiorno a tutti,
sto scrivendo un'applicazione che legge i comondi da arduino tramite la porta COM...

Su arduino il codice è questo...
Quote
int temperatura;
void setup ()
{
Serial.begin(9600);
}
void loop()
{
temperatura=analogRead(A1);
temperatura=(5.0* temperatura *100)/1024;
Serial.println(temperatura);
Serial.print("Celsius ");
delay(1000);
}

in visualbasic prendo il tutto e lo assegno a "TextBox1.Text = Rxdata", ma in esecuzione mi mostra questo...

non capisco da il carattere mostrato dopo il 66...

magari a qualcuno è già capitato e mi può dare una mano...
se riesco a finirlo posso passarlo magari a qualcuno torna utile...
6  International / Hardware / Re: Mi Presento. Salve... on: November 07, 2012, 06:08:49 am
Benvenuto Giuseppe, anche io sono nella zona di catania, spero che aumentino le presenze di utenti della zona così da poterci sistemerà anche di presenza magari anche con ordini in condivisi..
7  International / Hardware / Re: Relay Shield on: October 29, 2012, 05:16:05 am
Grazie del consiglio..
8  International / Hardware / Re: Relay Shield on: October 29, 2012, 04:34:01 am
Grazie del consiglio, ne farò tesoro, ma per pura curiosita e per crescere un minimo, se i relay che devo comandare sono a 12v, la scheda non va bene?

9  International / Hardware / Relay Shield on: October 29, 2012, 04:24:22 am
Buongiorno ragazzi,
andando avanti con la scoperta del mio Arduino, è nata l'esigenza di comandare periferiche superiori ai 5v, quindi da una ricerca che ho fatto ho capito che per comandare un interruttore a 220v devo usare dei Relay.
vorrei prendere questa shield http://www.robot-italy.com/it/relay-shield.html per poter comandare le luci di casa...
Praticamente vorrei far comandare dei relay, gia esistenti nell'impianto di casa, con questi che interfaccerei con arduino.

Secondo vuoi questa scheda fa al caso mio? mi consigliate altri metodi? considerate che io sto iniziano ora con l'elettronica.

Grazie anticipatamente a tutti...
10  International / Hardware / Re: Ethernet Shield quale prendo? on: October 18, 2012, 08:23:47 pm
Quindi se ho capito bene per il mio arduino uno (http://www.robot-italy.com/it/arduino-uno-r3.html)
devo prendere questo http://www.robot-italy.com/it/arduino-ethernet-shield-rev3-poe-ready.html
giusto?

cosaltro mi serve per poter fare il test?
11  International / Hardware / Ethernet Shield quale prendo? on: October 17, 2012, 08:29:14 pm
Salve ragazzi,
già da poco che ho preso Arduino Uno e mi è venuta voglia di mettergli l'ethernet smiley-twist... ma qui nasce il mio problema. smiley-cry.. quale prendo?
forse è meglio che vi dico prima cosa ci voglio fare..
vorrei comandare Arduino tramite remoto, (iphone o cmq web) non ho altre particolari esigenze...
ho visto che http://www.robot-italy.com/it/catalogsearch/result/?q=Wiznet%20W5100 ci sono vari modelli e non capisco bene la differenza...
quale mi consigliate?

grazie anticipatamente...
12  International / Generale / Re: Presentazioni nuovi iscritti, fatevi conoscere da tutti! on: October 17, 2012, 08:12:21 pm
Salve a tutti, mi sono appena iscritto nel forum

Mi sono appassionato ad Arduino da poco,  ma subito l'ho trovato affascinante.

Le mie conoscenze di elettronica sono poche, mi basta sapere il + e il , con la programmazione sono un po più avanti... ma spero di approfondire l'argomento anche grazie al vostro aiuto

Tra poco scriverò la mia prima domanda....
Pages: [1]