Suona come il nome di schedario che è immagazzinato in vostra tabella già contiene il periodo (.) quale regola esso fuori dall'estensione di lima, o quello il nome di schedario immagazzinato in vostra tabella non è completo. Prova:
strFileName = Dir (“f:\Test Directory\Live\„ & FName & “*.*") questo non funziona
Il motivo sta trovando che la stessa lima sempre è che non state rimuovendo la lima troviate appena, voi sta copiandola. In vostro alberino originale avete detto: “Se allora spostino le lime verso l'indice„. Ma l'ordine di FileCopy non sposta la lima, esso appena la copia. Che I perché nel mio codice più recente vederete che ho cambiato titolo la lima, che realmente lo sposta verso il nuovo indice.
Chiamare “C:\Access\test\Source\„ & lo strFileName come “C:\Access\test\Destination\„ & strFileName
Inoltre, se usate la funzione di Dir () e gli passate un foldername ogni volta, restituirà la prima lima nel dispositivo di piegatura, sempre. Se realmente volete visualizzare tutte lime in un dispositivo di piegatura, dovreste usare qualcosa come:
strFileName = Dir (“f:\Test Directory\Live ")
strFileName di debug.print
Fare
strFileName = Dir ()
strFileName di debug.print
Collegare mentre Len (strFileName) > 0
Inoltre, il codice che state usando non cercherà una seconda o terza lima con la stessa estensione di lima. Escluderà appena quelli. Se quella non è un'edizione allora allora lasciare al vostro codice il senso che è. Se quella potesse essere un'edizione allora voi necessità di esaminare il mio segmento di codice più recente e di copiare quella logica.
