Hej!


Jag har två frågor.

1. om man tittar i min kod så ser man att jag vill visa användaren vilen fil han har hämtat. Som det är nu så syns hela sökvägen. Hur sorterar jag ut endast filnanamnet inte hela sökvägen


2. Min fil jag skall läsa in innehåller data separerade med kommatecken. Jag vill kunns sortera ut dessa värden och visa dem i listboxen JAg inbillade mig att nedanstående kod skulle göra suset, men jag får bara med den första 122

/phinala

<code>
CommonDialog1.Filter = "Text files (*.txt)|*.txt|All files (*.*)|*.*"
CommonDialog1.InitDir = App.Path & ("\In")
CommonDialog1.ShowOpen
filnamn = CommonDialog1.FileName

Label2.Caption = filnamn

Open filnamn For Input As #1

tmpSplit = split(int1, ",", 12)
For i = 0 To 12
List1.AddItem tmpSplit(i) & vbCrLf
Next i

Close #1
</code>


filen ser ut så här:

122,493,2002-05-31,2002-05-31,0,30005,"Miranda",5,"Chouk Li",0,5200,"Obehandlad order"

Förstod inte din kod. Vadå Split(int1... Vad står int1 för?

Jag kan tänka mig att felet beror på att den rutin du använder för att läsa in med tar hänsyn till kommatecknen och tar alltså bara med första värdet och inte hela raden. Den rutin du ska använda är väl Line Input?

/Jörgen

Det här borde bli rätt (om jag uppfattade din fråga på rätt sätt):

<code>
'Svar på fråga 1
Label2.Caption = Mid(filnamn, InStrRev(filnamn, "\") + 1)

'Svar på fråga 2
Open filnamn For Input As #1
While Not EOF(1)
Line Input #1, sBuffer
tmpSplit = Split(sBuffer, ",")
For i = 0 To UBound(tmpSplit)
List1.AddItem tmpSplit(i) & vbCrLf
Next i
Wend
Close #1
</code>

Fredrik