Prikazi cijelu temu 25.06.2015 18:56
Gjoreski Van mreze
Administrator
Registrovan od:02.02.2009
Lokacija:Ohrid Makedonija


Predmet:Re: Import iz txt
eve ti loop gi cita site redovi od pocetok do kraj:
PreuzmiIzvorni kôd (Visual Basic):
  1. Dim strVlez As String
  2.          Open "C:\zipTest\data.txt" For Input As 1
  3.              Do
  4.            
  5.                 Line Input #1, strVlez
  6.                 MsgBox strVlez
  7.             Loop Until EOF(1)
  8.             Close 1

Ova cita dve linii mozes da dodadis kolku sakas

PreuzmiIzvorni kôd (Visual Basic):
  1.   Dim strVlez As String
  2.          Open "C:\zipTest\data.txt" For Input As 1
  3.                 Line Input #1, strVlez    ' prv red
  4.                MsgBox strVlez
  5.                 Line Input #1, strVlez    ' vtor red
  6.                MsgBox strVlez
  7.        
  8.             Close 1