fso recuperare solo l'ultimo file caricato

[djjunior]

Grazie per la pazienza, invece penso che tu sia la persona + adatta a risolvere questo problema comunque riposto lo script con la modifica.
Grazie ugualmente per l'aiuto...

<%

dim fs,fo,x,nome,extfile,sf,folder
set fs=Server.CreateObject("Scripting.FileSystemObject")
set fo=fs.GetFolder("d:\inetpub\webs\miosioit\public\clienti\pdf\")

for each folder in fo.SubFolders
set sf = fs.GetFolder("d:\inetpub\webs\miositoit\public\clienti\pdf\"&folder.Name)

set custRs = Server.CreateObject("ADODB.Recordset")
custRs.Fields.Append "nome", 200, 300 ' adVarChar
custRs.Fields.Append "data", 7 ' Date

custRs.Open

nome = rs.fields("codice_cliente")

for each x in sf.files
extfile = left(split(x.Name,".pdf")(0),14)

custRs.AddNew
custRs("nome") = x.Name
custRs("data") = x.DateCreated     

custRs.Sort = "data asc"

if nome = extfile And custRs("data") <= date() Then



  %>
  
  <%=custRs("nome")%>
  
  <%
		end if
		next
next
set sf=nothing
set fo=nothing
set fs=nothing
%>

[cavicchiandrea]

Non conosco bene il recordest disconesso, ma credo che ci vada un custRs.Update per aggiornare il recordest e una chiusura .close() e poi metterei dei response.write (sparsi in giro per il codice) per capire cosa passi cosa verifichi, queste sono tutte cose che dovresti sapere visto che non sei nuovo di asp o mi sbaglio?

[djjunior]

diciamo che quello che passo è ok, ho fatto già un controllo di response.write, però stampa sempre a video tutti i risultati nel ciclo invece di stampare solo l'ultimo inserito.

[djjunior]

nessun aiuto???