|
|||||||
|
|
|
![]() |
|
|
Strumenti |
|
|
#1 |
|
Senior Member
Iscritto dal: Oct 2007
Messaggi: 364
|
[ Vb.NET 2008 ] Righe In File - Genymus
Salve, sto creando un'applicazione in vb.net e nella gestione delle opzioni, vorrei fare una cosa del tipo:
File "options.txt" << Opzione1=1; Opzione2=1; Opzione3=0; >> E che il software prenda la prima riga, legga solo quello che c'è tra il segno = e tra il segno ; Inserendolo in una variabile, poi prenda la seconda riga e così via Qualcuno sa come fare?
__________________
Genymus!!! "Che cosa vorreste far incidere sulla vostra tomba?". "Torno fra 5 minuti." "Lucido" è quando credi soltanto a metà di ciò che ti dicono. "Brillante" è quando sai a quale metà credere. "Pensa, ogni volta che respiro muore un uomo." "Hai provato a fare qualcosa per l'alito?" Aforismieaforismi.it |
|
|
|
|
|
#2 |
|
Senior Member
Iscritto dal: Oct 2007
Messaggi: 364
|
. . .
__________________
Genymus!!! "Che cosa vorreste far incidere sulla vostra tomba?". "Torno fra 5 minuti." "Lucido" è quando credi soltanto a metà di ciò che ti dicono. "Brillante" è quando sai a quale metà credere. "Pensa, ogni volta che respiro muore un uomo." "Hai provato a fare qualcosa per l'alito?" Aforismieaforismi.it |
|
|
|
|
|
#3 |
|
Senior Member
Iscritto dal: Nov 2001
Città: Milano
Messaggi: 2361
|
Primo risultato del primo motore di ricerca che mi è venuto in mente:
http://www.freevbcode.com/ShowCode.asp?ID=4492
__________________
La parola d'ordine, tanto per cambià è sempre la stessa: VIUUULENZA!!! Trattative MAC: Powerbook 12" PC1: GA-X48-DS4, Q9300, 2x2GB Corsair 8500, 2 Ati 4870 Crossfire, Seagate 1.5TB PC2: M2NPV-VM, 64x2 4800+, 1GB DDR2, Ati 4670, Maxtor 120GB PC3: GA-7VT600 1394, Barton 2500+@3000+, 2GB DDR400, 6800, Seagate 160GB PHOTO: Canon Digital IXUS 430 |
|
|
|
|
|
#4 |
|
Senior Member
Iscritto dal: Oct 2007
Messaggi: 364
|
Purtroppo non riesco a fare qullo che volevo... altre soluzioni?
Comunque grazie di tutto
__________________
Genymus!!! "Che cosa vorreste far incidere sulla vostra tomba?". "Torno fra 5 minuti." "Lucido" è quando credi soltanto a metà di ciò che ti dicono. "Brillante" è quando sai a quale metà credere. "Pensa, ogni volta che respiro muore un uomo." "Hai provato a fare qualcosa per l'alito?" Aforismieaforismi.it |
|
|
|
|
|
#5 | |
|
Senior Member
Iscritto dal: Dec 2004
Messaggi: 3210
|
Quote:
Comunque sia ecco una soluzione che dovrebbe risolvere in modo abbastanza compatto il problema : Codice:
Dim percorso As String = Application.StartupPath & "\"
Dim fileOpzioni As String = "options.txt"
Dim txtLinea As String = ""
Dim valore As String = ""
Dim SR As New System.IO.StreamReader(fileOpzioni)
Do While SR.Peek() <> -1
txtLinea = SR.ReadLine()
If txtLinea <> ">>" And txtLinea <> "<<" Then
valore = txtLinea.Substring(txtLinea.LastIndexOf("=") + 1).Replace(";", "")
MsgBox(valore)
End If
Loop
|
|
|
|
|
|
|
#6 |
|
Senior Member
Iscritto dal: Oct 2007
Messaggi: 364
|
Grazie, proverò appena ne avrò l'occasione, grazie per la risposta...
__________________
Genymus!!! "Che cosa vorreste far incidere sulla vostra tomba?". "Torno fra 5 minuti." "Lucido" è quando credi soltanto a metà di ciò che ti dicono. "Brillante" è quando sai a quale metà credere. "Pensa, ogni volta che respiro muore un uomo." "Hai provato a fare qualcosa per l'alito?" Aforismieaforismi.it |
|
|
|
|
| Strumenti | |
|
|
Tutti gli orari sono GMT +1. Ora sono le: 17:05.




















