Mars54 (Normal User)
Newbie
Messaggi: 7
Iscritto: 09/05/2018
|
Salve sono nuovo del forum.
In una vecchia discussione di un forum ho trovato questi codici che servono per salvare i dati di un programma:
Private Sub Button7_Click(sender As System.Object, e As System.EventArgs) Handles Button7.Click
Dim SaveFileDialog2 As New SaveFileDialog
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fo As StreamWriter = New StreamWriter(SaveFileDialog1.FileName)
fo.WriteLine(TextBox15.Text)
fo.WriteLine(TextBox16.Text)
fo.WriteLine(TextBox17.Text)
fo.Close()
End If
End Sub
Private Sub Button9_Click(sender As System.Object, e As System.EventArgs) Handles Button9.Click
Dim openFileDialog1 As New OpenFileDialog()
If openFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fr As StreamReader = New StreamReader(openFileDialog1.FileName)
TextBox15.Text = fr.ReadLine
TextBox16.Text = fr.ReadLine
TextBox17.Text = fr.ReadLine
fr.Close()
Text = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName)
End If
End Sub
Premesso che funziona alla grande , vorrei sapere se c'è un modo per poter salvare i dati all'interno del programma stesso senza le finestre di dialogo.
Premesso ancora che ci puo stare una finestra di dialogo per poter salvare un file , ma per richiamarlo vorrei che non si aprisse la finestra di dialogo ma che appaiono subito nel programma!
|
|
|
Mikelius (Member)
Expert
Messaggi: 525
Iscritto: 14/04/2017
|
Premesso che conosco solo c# e non VB, ma il concetto è lo stesso.
La finestra di dialogo serve per scegliere DOVE salvare il file.
La parte che CREA SCRIVE e SALVA il file è questa:
Codice sorgente - presumibilmente C# / VB.NET |
Dim fo As StreamWriter = New StreamWriter(SaveFileDialog1.FileName)
fo.WriteLine(TextBox15.Text)
fo.WriteLine(TextBox16.Text)
fo.WriteLine(TextBox17.Text)
fo.Close()
|
invece di "SaveFileDialog1.FileName" dovresti inserire il percorso di dove salvarlo.
Il problema potrebbe essere quello di avere il path giusto. (salvarlo ex novo, stessa cartella dell'eseguibile, desktop ecc ecc. ..) quello lo decidi tu. La finestra semplifica molto
Ultima modifica effettuata da Mikelius il 09/05/2018 alle 22:29 |
|
|
Mars54 (Normal User)
Newbie
Messaggi: 7
Iscritto: 09/05/2018
|
Mo potresti fare un esempio?
Sempre se non ti dispiace!
|
|
|
Mikelius (Member)
Expert
Messaggi: 525
Iscritto: 14/04/2017
|
Postato originariamente da Mars54:
Mo potresti fare un esempio?
Sempre se non ti dispiace! |
Codice sorgente - presumibilmente C++ |
using System; using System.IO; namespace scrivifile { class Program { static void Main(string[] args) { ///////Salva il file StreamWriter p = new StreamWriter("..\\prova.txt"); p.WriteLine("Hello World!"); p.Close(); ///Legge il file /// StreamReader pp = new StreamReader("..\\prova.txt"); Console.WriteLine("Il file contiene:"); Console.WriteLine(pp.ReadLine()); } } }
|
salva nella superiore a quella dell'eseguibile. Questo è un esempio base. Basta impostare il path che si vuole. Ultima modifica effettuata da Mikelius il 10/05/2018 alle 0:59 |
|
|
Carlo (Member)
Guru
Messaggi: 1198
Iscritto: 29/01/2018
|
Postato originariamente da Mars54:
Salve sono nuovo del forum.
In una vecchia discussione di un forum ho trovato questi codici che servono per salvare i dati di un programma:
Private Sub Button7_Click(sender As System.Object, e As System.EventArgs) Handles Button7.Click
Dim SaveFileDialog2 As New SaveFileDialog
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fo As StreamWriter = New StreamWriter(SaveFileDialog1.FileName)
fo.WriteLine(TextBox15.Text)
fo.WriteLine(TextBox16.Text)
fo.WriteLine(TextBox17.Text)
fo.Close()
End If
End Sub
Private Sub Button9_Click(sender As System.Object, e As System.EventArgs) Handles Button9.Click
Dim openFileDialog1 As New OpenFileDialog()
If openFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fr As StreamReader = New StreamReader(openFileDialog1.FileName)
TextBox15.Text = fr.ReadLine
TextBox16.Text = fr.ReadLine
TextBox17.Text = fr.ReadLine
fr.Close()
Text = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName)
End If
End Sub
Premesso che funziona alla grande , vorrei sapere se c'è un modo per poter salvare i dati all'interno del programma stesso senza le finestre di dialogo.
Premesso ancora che ci puo stare una finestra di dialogo per poter salvare un file , ma per richiamarlo vorrei che non si aprisse la finestra di dialogo ma che appaiono subito nel programma! |
Codice sorgente - presumibilmente VB.NET |
Private Sub Button7_Click(sender As System.Object, e As System.EventArgs) Handles Button7.Click Dim fo As StreamWriter = New StreamWriter("C:\MioFile.txt") fo.WriteLine(TextBox15.Text) fo.WriteLine(TextBox16.Text) fo.WriteLine(TextBox17.Text) fo.Close() End Sub
|
Codice sorgente - presumibilmente VB.NET |
Private Sub Button9_Click(sender As System.Object, e As System.EventArgs) Handles Button9.Click Dim fr As StreamReader = New StreamReader("C:\MioFile.txt") TextBox15.Text = fr.ReadLine TextBox16.Text = fr.ReadLine TextBox17.Text = fr.ReadLine fr.Close() Text = My.Computer.FileSystem.ReadAllText("C:\MioFile.txt") End Sub
|
Con questo sistema scrivi e leggi sempre sullo stesso file: "C:\MioFile.txt", per cambiare devi agire sul codice.
Ora hai due esempi uno in C# e uno in VB .NET Ultima modifica effettuata da Carlo il 11/05/2018 alle 0:05
in programmazione tutto è permesso |
|
|
nessuno (Normal User)
Guru^2
Messaggi: 6336
Iscritto: 03/01/2010
|
Ultima modifica effettuata da nessuno il 11/05/2018 alle 10:15
Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti (uno dei padri fondatori del moderno Calcolo delle probabilità) chiamava il gioco del Lotto Tassa sulla stupidità. |
|
|
Thejuster (Admin)
Guru^2
Messaggi: 2253
Iscritto: 04/05/2008
|
Forse ho capito cosa intende.
In pratica cerca un modo per memorizzare i valori all'interno del programma e non su file.
Usa le proprietà.
Tasto destro sul progetto -> Risorse
Aggiungi un campo di tipo string.
poi da codice
Assegni un valore
Properties.Setting.Default.CAMPO.value = "Ciao";
Per salvare
Properties.Setting.Default.Save();
Per Caricare
Properties.Settting.Default.Load();
Ed infine puoi recuperare il valore salvato.
|
|
|
nessuno (Normal User)
Guru^2
Messaggi: 6336
Iscritto: 03/01/2010
|
Sempre su file vanno a finire ...
Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti (uno dei padri fondatori del moderno Calcolo delle probabilità) chiamava il gioco del Lotto Tassa sulla stupidità. |
|
|
TheDarkJuster (Member)
Guru^2
Messaggi: 1620
Iscritto: 27/09/2013
|
Postato originariamente da nessuno:
Sempre su file vanno a finire ...
|
Si, ma non ti devi preoccupare del path...
|
|
|
| 
