PDA

Visualizza la versione completa : Creare file con numero di righe imposto


virtualq2
28-04-2008, 13:57
Salve a tutti...

Ho un file txt che devo formattare a larghezza 30.. in pratica devo trovare un modo che ogni 30 caratteri mi vada a capo e crei questo nuovo file.. per poi importalo con access e creare una tabella..

Qualcuno ha qualche idea??

io avevo pensato di usare un programma in C++ che legga il file in modo sequenziale, riempie una stringa di 30 e una volta che l'ha riempita scrive nel nuovo file e vada a capo.. tutto questo ripetuto fino alla fine del file..

Sapete darmi una mano?

Grazie..

virtualq2
29-04-2008, 11:55
Salve forse mi sono espresso male..

Ho questo file che non v mai a capo.. e devo farlo andare a capo ogni 30 caratteri(spazi inclusi).. Ora per fare questo devo usare asp e non c++ e visto che asp lo appena iniziato a studiare non c' qualcuno che mi potrebbe dare una mano???

Grazie...

Stoicenko
29-04-2008, 12:06
b leggi riga per riga.. conti i caratteri ed aggiungi con un append() un "\r\n" ogni 30 caratteri..

virtualq2
29-04-2008, 14:26
Originariamente inviato da Stoicenko
b leggi riga per riga.. conti i caratteri ed aggiungi con un append() un "\r\n" ogni 30 caratteri..


Grazie... ma visto che sto ancora imparando questo linguaggio non riusciresti a farmi un piccolo esempio??

virtualq2
29-04-2008, 20:29
Ce lo fatta.. dopo un giorno a spulciare internet ho creato quello che volevo...

Guardate qui...

<html>
<head>
<title>leggi_file.asp</title>
</head>
<body bgcolor="#FFFFFF">

<%

Dim FileObject
Set FileObject=Server.CreateObject("Scripting.FileSystemObject")
Set OutStream=FileObject.CreateTextFile(Server.MapPath ("prova.txt"),true,0)
ilfile=server.mappath("inizio.txt")

Set file = CreateObject("Scripting.FileSystemObject")

Set ilfile = file.OpenTextFile(ilfile, 1, False)


do while not ilfile.AtEndOfStream
illine=ilfile.read(30)
response.write illine & "
"
Outstream.Writeline illine
loop

OutStream.Close

Set OutStream=Nothing

Set FileObject=Nothing

ilfile.Close
set ilfile=nothing
set file=nothing

%>

</body>
</html>


Apre il file inizio.. legge 30 caratteri.. li scrive nel nuovo file e va a capo...!!! :)

Stoicenko
02-05-2008, 10:01
si ma questo vb con asp... sezione sbagliata del forum...

Loading