Re: copiare tutto dalla 7 riga

Article View: free.it.visual-basic

Article #384

Back to free.it.visual-basic Previous Next

#384

From: Papais Elio Enzo
Date: Thu, 18 May 2006 18:48

23 lines
1825 bytes

Dim TextLine
Open "FILEPROV" For Input As #1   ' Apre il file.
Do While Not EOF(1)   ' Ripete fino alla fine del file.
   Line Input #1, TextLine   ' Assegna la riga a una variabile.
       if conta > 6 then        Debug.Print TextLine   ' Scrive nella 
finestra Immediata.    end ifconta = conta +1
Loop
Close #1   ' Chiude il file.
"Brian" <brian@email.it> ha scritto nel messaggio 
news:jb%ag.384$mJ1.271@tornado.fastwebnet.it...
> ciao ragazzi, volevo chiedervi come faccio a copiare solo dalla settima 
> riga in poi un file:
>
> Open "C:\file.txt" For Output As #1
>
> 'qui vorrei prendere tutto quello che c'e dalla settima riga in poi
>
> close #1
>
> 'qui invece ricopiare i dati presi in un altro file
>
> Grazie
>

Technical Details

Message-ID: <446cc159$0$18290$4fafbaef@reader1.news.tin.it>

Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news.glorb.com!feeder.news.tin.it!spool.news.tin.it!not-for-mail

References: <jb%ag.384$mJ1.271@tornado.fastwebnet.it>

Show Full Headers

Complete Article Headers

X-Google-Thread: f94ee,482be90f581e92e7
X-Google-Attributes: gidf94ee,public
X-Google-Language: ITALIAN,ASCII-7-bit
Path: arc1-ca.pugleaf.net!g2news2.google.com!news4.google.com!news.glorb.com!feeder.news.tin.it!spool.news.tin.it!not-for-mail
From: "Papais Elio Enzo" <support@infoportal.it>
Newsgroups: free.it.visual-basic
References: <jb%ag.384$mJ1.271@tornado.fastwebnet.it>
Subject: Re: copiare tutto dalla 7 riga
Date: Thu, 18 May 2006 20:48:10 +0200
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2900.2180
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2900.2180
X-RFC2646: Format=Flowed; Response
X-Antivirus: avast! (VPS 0620-2, 18/05/2006), Outbound message
X-Antivirus-Status: Clean
Lines: 25
Message-ID: <446cc159$0$18290$4fafbaef@reader1.news.tin.it>
Organization: TIN.IT (http://www.tin.it)
X-Comments: Please send technical notifications to newsmaster@tin.it
NNTP-Posting-Host: 82.48.141.170
X-Trace: 1147978073 reader1.news.tin.it 18290 82.48.141.170:4119
X-Complaints-To: Please send abuse reports to abuse@tin.it

Reply to Parent Message