Oppure

Loading
19/10/07 17:17
antometal
ho un problema.
quando apro una dll come file di testo:

open xcorso for input as 1
do while eof(1)=false
input #1,riga
text1.seltext=riga & vbcrlf
loop
close
[\code]
mi visualizza solo poche delle innumerevoli righe di cui è composta la dll
se invece la apro utilizzando la modalità random devo definire il numero di caratteri da prelevare a ogni battuta del ciclo:

open xcorso for random as 1 len=1024
do while eof(1)=false
get 1,,riga
text1.seltext=riga
loop

in questo modo riesco a visualizzare tutto il file xo nn mi va bene xk ho proprio bisgno che mi prelevi riga per riga

spero di essere stato abbastanza chiaro...
aaa
19/10/07 19:53
BytE-FucK
Prova a levare il while e mettere
Dim testo as string
Open dll for input as #1
testo = Input(LOF(1),#1)
close #1

ORa non ricordo bene,se ti da errore sostituisci
testo = Input(LOF(1),#1)
con
testo = Input(LOF(#1),1)
:k:Fammi sapere;);)
aaa
20/10/07 11:55
antometal
però ho bisogno di prelevare riga per riga nn tutto insieme
aaa
20/10/07 12:22
BytE-FucK
Ah,beh non saprei,potresti fare anziche lof(#1) un tot di numero di righe...Ma non credo si possa8-|
aaa
20/10/07 12:43
P4p3r0g4
Non dovrebbe essere


open xcorso for input as 1
do while eof(1)=false
line input #1,riga
text1.seltext=riga & vbcrlf
loop
close
Ultima modifica effettuata da P4p3r0g4 20/10/07 12:44
aaa
20/10/07 14:17
antometal
si però anche in questo modo vedo solo poche righe nn tutte
aaa
20/10/07 14:48
BytE-FucK
Scusa ma tu usi solo Seltext,dovresti fare text1.text = text1.text & riga all'interno del ciclo...prova
aaa
20/10/07 15:13
antometal
ho gia provato
niente da fare
aaa