prima di

Set Leggi=Fso.OpenTextFile(Percorso & Nome_File)

metti

Response.Write "maGGico file...: " & Percorso & Nome_File & "
"
Response.Flush

e controlla il nome del file