Lettura File di Testo

giovedì 24 maggio 2007 - 13.27

cloud85it Profilo | Newbie

Ciao , ho un problema :

Devo effettuare una lettura di un file di testo , cioè la prima riga di un file di testo. Riesco a farlo , ma avrei il bisogno di leggere carattere per carattere la stringa , in modo tale da passargli un comando tramite testo.

Ora io ho deciso di farlo tramite un txt per facilità , ma l'obbiettivo è leggere i carateri singolarmente e fermarmi o ad un blank o ad un separatore da me definito per estrarre una sintassi. (es. " INS PIPPO IN PAPERINO SU SERVER_XYZ " cioè vorrei che lui riconoscesse INS e mi lanciasse la routin per l'inserimento che io ho preparato e che riconoscesse tutto il resto nella medesima maniera.)

Grazie a chi mi risponderà.....

Ciao

blaudio Profilo | Newbie

ciao
ti ho buttato giù un esempio

Public Class Form1

Function read()
Dim prova = System.IO.File.ReadAllLines("c:\tuofile.txt")
Return prova
End Function

Sub prova()
Dim temp() As String = read()
Dim numerorighe As Integer = temp.Length
Dim a As Integer = 0
Do


If a >= 0 And a <= numerorighe - 1 Then
Dim temp2() As String = temp(a).Split(" ")
Dim numeroparole As Integer = temp2.Length
Dim b As Integer = 0
Do
If b >= 0 And b <= numeroparole - 1 Then
'leggi le parole della riga "a" una per una
Dim parola As String = temp2(b)
MsgBox(parola)
b = b + 1
Else
Exit Do
End If

loop
a = a + 1
Else : Exit Do

End If
Loop

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
prova()
End Sub
End Class

prova è un array di stringhe diviso per righe con numero righe sai quante righe hai ricavato dal file.
temp2 è un array di parole, le parole con uno spazio vengono divise, numeroparole è il numero di parole per riga,
al posto di msgbox puoi inserire il codice che ti fa quello che vuoi per esempio pui inserire un select case parola poi imposti case = "INS" e se la parola è uguale a INS fa quello che vuoi tu.

Ciao

cloud85it Profilo | Newbie

Grazie mille , comunque avevo un pò risolto , e più o meno è simile...

Grazie ancora....ciao
Partecipa anche tu! Registrati!
Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !
Copyright © dotNetHell.it 2002-2024
Running on Windows Server 2008 R2 Standard, SQL Server 2012 & ASP.NET 3.5