neriton (Normal User)
Newbie
Messaggi: 12
Iscritto: 16/01/2013
|
Buonasera a tutti voi,
vi pongo il seguente problema.
In un form vi è un pulsante LEGGI con il seguente codice:
Codice sorgente - presumibilmente VB.NET |
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim leggi As New System.IO.StreamReader("K:\cappero.csv") Dim riga As String Dim dividi() As String Do While leggi.Peek() <> -1 riga = leggi.ReadLine() dividi = Split(riga, ",") DataGridView1.Rows.Add(dividi) Loop End Sub
|
Vi è inoltre un pulsante SALVA con il seguente codice
Codice sorgente - presumibilmente VB.NET |
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim scrivi As New System.IO.StreamWriter("K:\cappero.csv") Dim a As Integer Dim b As Integer Dim testo As String For a = 0 To DataGridView1.RowCount - 2 testo = "" For b = 0 To 2 If b <> 2 Then testo = testo + DataGridView1.Rows(a).Cells(b).Value + "," Else testo = testo + DataGridView1.Rows(a).Cells(b).Value End If Next scrivi.WriteLine(testo) Next scrivi.Close() End Sub
|
Infine, vi è un datagridview1.
Nell'evento load del form1 è inserito il seguente codice
Codice sorgente - presumibilmente VB.NET |
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load DataGridView1.ColumnCount = 3 DataGridView1.Columns(0).Name = "tipo" DataGridView1.Columns(1).Name = "prezzo" DataGridView1.Columns(2).Name = "quantità" DataGridView1.Columns(0).HeaderText = "tipo prodotto" End sub
|
Quando avvio l'applicazione, inserisco i dati e clicco sul pulsante SALVA.
Esce fuori il seguente messaggio di errore:
"Il processo non può accedere al file K:\cappero.csv perchè in uso in altro processo"
Vi chiedo perchè esce il messaggio, dove ho sbagliato e se vi è una soluzione al problema.
Vi ringrazio per l'attenzione che porrete al problema e chiedo scusa per il disturbo.
NERITON Ultima modifica effettuata da neriton il 24/03/2013 alle 22:33 |
|
Saik (Normal User)
Pro
Messaggi: 117
Iscritto: 07/08/2011
|
Codice sorgente - presumibilmente VB.NET |
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim leggi As New System.IO.StreamReader("K:\cappero.csv") Dim riga As String Dim dividi() As String Do While leggi.Peek() <> -1 riga = leggi.ReadLine() dividi = Split(riga, ",") DataGridView1.Rows.Add(dividi) Loop End Sub
|
Devi chiudere il file con leggi.close al termine della funzione
|
|
neriton (Normal User)
Newbie
Messaggi: 12
Iscritto: 16/01/2013
|
Non ti adirare!!
Chiedo scusa per la grossa svista!
Grazie
NERITON
|
|
Saik (Normal User)
Pro
Messaggi: 117
Iscritto: 07/08/2011
|
non volevo sembrare arrabbiato anzi il forum è fatto apposta per il confronto e la correzione dei propri errori scusami se sono sembrato scortese
|
|
neriton (Normal User)
Newbie
Messaggi: 12
Iscritto: 16/01/2013
|
Caro Saik,
non devi assolutamente scusarti, ho solo visto la faccetta verde e ho pensato che avessi scritto qualcosa che non andava bene: d'altra parte sono nuovo dei forum e devo imparare ancora tante cose.
Ti saluto e ti ringrazio ancora x l'aiuto.
Neriton
|
|