I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
eliozorro
eliozorro
il 6 dicembre 2001 alle 16:08
16 messaggi dal 08 agosto 2001
Salve a tutti,
ho letto in più occasioni come leggere un file testo.
per leggere l'intero file nessun problema.

ho il problema invece di leggere un file di grosse dimensioni dal quale estrappolarene una determinata pagina;
tutte le pagine sono titolate;

come potrei, facendo riferimento al titolo della pagina per ottenerne appunto la relativa pagina??
Grazie

eliozorro
www.severoz.com

RispondiQuoting
pljluca
pljluca
l'11 dicembre 2001 alle 16:22
205 messaggi dal 14 luglio 2001
Contributi
www.pljsoftware.com
Hai provato a salvare il contenuto di un file in una variabile e poi a richiamare la InStr(...) ? Credo sia una soluzione ottimale.
La InStr(...) ti restituisce la prima occorrenza del testo immesso e quindi recuperi subito la posizione della pagina.

Ciao

Dr. Panetta Luca Jonathan
Pisa (Italy)
http://www.pljsoftware.com
http://pljluca.blogspot.com
http://www.perledellojonio.it
RispondiQuoting
eliozorro
eliozorro
il 12 dicembre 2001 alle 17:20
16 messaggi dal 08 agosto 2001
Grazie per il consiglio
riesco ad ottenere una riga solo individuadola nella fase codizionale if...= then facendo riferimento ad ese. alla riga 42,ma io vorrewi ottenere un certo numero di righe,ossia una pagina.
ho provato anche con un ciclo for, ma non capisco perchè il testo venga inteso come unica riga E' QUESTO IL PROBLEMA.

questo è lo script sul quale sto lavorando.
una alternativa con un file .doc sarebbe gradita.
grazie e grazie ancora

<%
Set objFile =Server.CreateObject("Scripting.FileSystemObject")
Set oFileInLettura = objFile.OpenTextFile(Server.MapPath(file),1,false)

do while not oFileInLettura.AtEndOfStream
i=i+1
strLinea= oFileInLettura.readLine
strLinea2=left(i,10) 'numero delle righe
strLinea3=strLinea2+strlinea ' nuemero righe +testo
strLinea4=left(strLinea3,20)
if strLinea2=42 then
Response.Write("<br>" & strLinea3)
end if
loop
oFileInLettura.close
set objFile=nothing
set oFileInLettura=nothing
%>


RispondiQuoting
eliozorro
eliozorro
il 18 dicembre 2001 alle 15:37
16 messaggi dal 08 agosto 2001
<b>pljluca ha scritto:</b>
<BLOCKQUOTE id=quote><font size=1 face="Arial" id=quote><hr height=1 noshade id=quote>
Hai provato a salvare il contenuto di un file in una variabile e poi a richiamare la InStr(...) ? Credo sia una soluzione ottimale.
La InStr(...) ti restituisce la prima occorrenza del testo immesso e quindi recuperi subito la posizione della pagina.

Ciao


<hr height=1 noshade id=quote></BLOCKQUOTE id=quote></font id=quote><font face="Arial" size=2 id=quote>
Caro, Luca Jonathan Panetta
ciao

il suggerimento ad usare INSTR(...)per identificare una riga che contiene una determinata stringa è quello che ho seguito.

Il mio problema è questo:

devo visualizzare il testo compreso tra la prima riga INSTR(...) e
la successiva riga INSTR(...)

ho provato col seguente script senza molto successo!!
---------------------------------------
do while not oFileInLettura.AtEndOfStream
i=i+1
strlinea= oFileInLettura.readLine()
strLinea2=left(strLinea,10)

'ottengo la prima riga da cui partire

if INSTR(strLinea2, numero) then
Response.Write("&lt;br&gt;" & (i)& ")" & strlinea)
i=n
end if

'fin quì tutto ok
adesso dovrei ottenere la successiva riga dove il contatore dovrebbe terminare il ciclo
e visualizzare il testo tra la prima e la successiva riga.

For t=n to i
If INSTR(strLinea2, (numero)+1) then
strlinea1= oFileInLettura.readLine
Response.Write("&lt;br&gt;" & (t) & ")" & "&lt;b&gt;" & strlinea1)
'Exit For
End if
Next
loop

--------------------------------------
grazie ancora
cornelio
www.severoz.com

RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.