96 messaggi dal 12 maggio 2001
Vorrei sottoporre al forum questo quesito:

Dovrei leggere un fil di testo così composto:

05/05/2003 pippo.exe Testo del messaggio
06/05/2003 pippo2.exe Testo2 del messaggio


I campi sono separati da tab ed il file di testo contiene molte righe uguali come struttura.

Ho provato questo script, che mi dovrebbe restituire i record per mese corrente, ma non funziona.


Questo è lo script:
set fso = Server.CreateObject("Scripting.FileSystemObject")
set file = fso.OpenTextFileServer.MapPath"/newebtda/aggiornamenti.txt"),1)
mese_corrente = Month(Date())
miofile = ""
commento = ""

while (not file.AtEndOfStream) AND Len(miofile)=0
contenuto = Split(file.ReadLine,vbtab)

if contenuto(0)= mese_corrente then
miofile= contenuto(1)
commento = contenuto(2)
end if

%> <tr bgcolor="#ECEFF2">
<td colspan="2"><%Response.write miofile &" -- "
Response.write commento %></td>
</tr>
<%wend%>

sicuramente sbaglio nel ricavare il valore della data perchè non so come si fa a ricavare il valore del mese da un testo ( infatti Month(contenuto(0)) non funziona) , ma inoltre non cicla le righe , mostra un solo record !!!

SAluti Davide

11.886 messaggi dal 09 febbraio 2002
Contributi
esatto, l'errore è in questa riga:

if contenuto(0)= mese_corrente then

perchè contenuto(0) contiene una data in formato stringa, mentre mese_correte è un numero. Dovresti provare così:

if Month(CDate(contenuto(0)))= mese_corrente then

CDate ti converte una stringa nel tipo di dati "data" e poi con Month leggi il mese

Enjoy learning and just keep making
96 messaggi dal 12 maggio 2001

avevo già provato , ma da errore di conversione data.

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.