Newsgroup: it.comp.appl.access
Titolo: FileCopy e stringhe concatenate

Dim nomefile As String
Dim nomefisso As String
nomefisso = basedatibackup.mdb 'indico il nome del file di destinazione
nomefile = Me.Testo32 'l'utente sceglie l'unità di destinazione
FileCopy "c:\db\Backup\BaseDatibackup.mdb", nomefile & nomefisso
non riesco a trovare l'errore. Access non esegue nulla senza dare
spiegazioni.....
In testo32 l'utente ci può scrivere A, B, D, E eccc a cui io aggiungo :\ da
maschera input
vorrei che il risultato finale fosse un path valido per la copia di un file
ma il nome del file lo stabilisco io (nomefisso).
Non voglio utilizzare la soluzione del sito comune sull'apertura della
finestra di sfoglia, ho avuto un casino con le librerie (utenti win95,98,NT)
che metà mi è bastato (vista la mia limitata capacità nel gestire queste
cose)
grazie

 wrote in message
8u97ud$1u40$1...@stargate1.inet.it...

#####
prova con:
nomefisso =  "basedatibackup.mdb"
e se vuoi inserire ina path completa nel me.testo32 devi inserire p.e.:
d:\backuparchivi\
in modo che la stringa con il nome fisso diventa:
d:\backuparchivi\basedatibackup.mdb
ciao Riccardo

 wrote in message
8u9bo7$1i2$1...@news.panservice.it...

negativo, stesso comportamento. il db non fa' assolutamente nulla e senza
errori non copia il file
comunque in testo32 ci voglio mettere solo la lettera corrispondente
all'unità di destinazione

 wrote in message

vai in debug, controlla che il codice venga realmente eseguito, mi sembra
strano che non venga generato un errore
se il codice viene eseguito, controlla il valore delle variabili al momento del
FileCopy
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------

 > 8u97ud$1u40$1...@stargate1.inet.it...

____________
Ho fatto la prova creando una maschera con una casella di testo "nomefile"
ed un pulsante "Comando 4" e ho scritto nel modulo:
Private Sub Comando4_Click()
Dim nomefisso As String
Dim nomefile As String
nomefisso = "basedatibackup.mdb" 'indico il nome del file di destinazione
nomefile = Me.nomefile 'l'utente sceglie l'unità di destinazione
FileCopy "c:\db\Backup\BaseDatibackup.mdb", nomefile & nomefisso
End Sub
Funziona perfettamente se nella casella di testo "Nomefile", inserisci a:
oppure d: o qualsiasi altra unità, seguita da  \
ossia
d:\    e:\    a:\
altrimenti non copia nulla.
ciao Riccardo

 --------------------------------------
incredibile; ora funziona. Grazie al tuo suggerimento ho verificato che la
casella di testo32 mi restituiva A e non A:\ per esempio.
La cosa incredibile è che non ricevo errore se al posto del destinationfile
ci scrivo abasedatibackup.mdb invece che a:\basedatibackup.mdb
mah.....


infatti! (leggi altro mio msg)
ma non copia nulla uscendo senza errori, vero?

 mah.....
prova a fare una ricerca sul disco, imho da qualche parte ci sono i file i
copiati.
un cosiglio:
se e' l'utente che deve scegliere l'unita' e la directory di destinazione del
file ti consiglio di utilizzare la finestra di selezione, ti eviti dei casini
come questo.
nel sito comune guarda la faq: 'Richiamare la finestra di dialogo per la
selezione di una directory'



grazie del consiglio. L'avevo già utilizzata per un altro db in rete. Poi
quando abbiamo cambiati gli OS da win95 a winNT non funzionava più per un
errore di DLL e non riuscendo a venirne fuori l'ho tolta. Riconosco i miei
limiti......
grazie e tutti e due, comunque
ciao



_______
vero!
almeno cosě sembra
ciao