codice:Dim strFile As String strFile = Dir("PercorsoCartella") Do Until Len(strFile) = 0 MsgBox strFile strFile = Dir() Loop
codice:Dim strFile As String strFile = Dir("PercorsoCartella") Do Until Len(strFile) = 0 MsgBox strFile strFile = Dir() Loop
io sono festosamente cicciottello :: e. cartman
t'amo senza sapere come, nè quando nè da dove,
t'amo direttamente senza problemi nè orgoglio:
così ti amo perchè non so amare altrimenti
Permessi di invio
Rispondi quotando