[VB6] copiare un file

[folal]

Salve,
usando il codice:
FileCopy CommonDialogImgImmo.FileName, pathImmagine

dove "pathImmagine" è una cartella che si trova su un server,
quindi non sul disco locale, mi va in errore dicendo "Nome o numero
file non valido" oppure "percorso non trovato".

Il percorso. "pathImmagine" è valorizzato tipo
\\192.168.XX.XX\c:\tmp\immagini.

Devo usare qualche altra funzione al posto di FileCopy?

P.S: con CommonDialogImgImmo.FileName vado a pescare il file da copiare, sempre nel medesimo server, per cui vi accedo senza problemi.

[Marvellous]

Ho lo stesso identico problema... nessuno ha la soluzione?

[tas]

Hai provato con il FileSistemObject (libreria Microsoft Scripting Runtime)?

[Luciano79]

Ciao, non puoi dare il percorso con i ":"
\\192.168.XX.XX\c: \tmp\immagini
ma
\\192.168.XX.XX\c\tmp\immagini

Inoltre non devi specificare la cartella di destinazione, ma il nome del file, quindi

  FileCopy CommonDialogImgImmo.FileName, pathImmagine & "\" & NomeFile

[Marvellous]

Grazie Luciano79

L'unica differenza da FolAl è che lui usa un persorso di rete mentre io lavoro sempre in locale (ma questo non dovrebbe far differenza giusto?)

Cmq ora funziona correttamente. Il mio errore stava nel fatto che non indicavo il nome del file di destinazione ma solo la cartella di destinazione.

Per cui se faccio:
SourceFile = Me.CommonDialog_Phto.FileName
DestinationFile = App.Path & "\" & "1.gif"
FileCopy SourceFile, DestinationFile
la copia va a buon fine.

Ora il problema è questo: vorrei che la copia del file mantenga lo stesso nome del file originale. Come posso fare per ricavare nome+estensione di Me.CommonDialog_Phto.FileName?

Grazie

[Luciano79]

ok...
con "Me.CommonDialog_Phto.FileName" ottieni percorso e nome file.
Se vuoi ottenere solo il nome del file usa "Me.CommonDialog_Phto.FileTitle".

Quindi...

SourceFile = Me.CommonDialog_Phto.FileName
DestinationFile = App.Path & "\" & Me.CommonDialog_Phto.FileTitle
FileCopy SourceFile, DestinationFile

[Marvellous]

Ok funziona

Grazie mille

[yyzyyz]

nn conviene filtrare la stringa con replace prima di mandarla al filecopy?

miopercorso=Replace("\192.168.XX.XX\c:\tmp\immagini", ":", "")

[Luciano79]

Beh... certo! E' un controllo sulla correttezza dei parametri di input ed è sicuramente una cosa utile in piu', ma non ha senso, cioè: è un controllo che inserisci pensando che chi digita il percorso puo' inserire i duepunti; dovresti anche prevedere che uno puo' dimenticarsi di inserire i "\\" all'inizio (come nel tuo esempio), che non metta un punto nell'ip, che l'ip non esita, o tanti altri motivi. Piuttosto è meglio verificare che il percorso esista, e far visualizzare un messaggio d'errore in modo che l'utente possa verificare cio' che ha scritto.

[yyzyyz]

Originariamente inviato da Luciano79
Beh... certo! E' un controllo sulla correttezza dei parametri di input ed è sicuramente una cosa utile in piu', ma non ha senso, cioè: è un controllo che inserisci pensando che chi digita il percorso puo' inserire i duepunti; dovresti anche prevedere che uno puo' dimenticarsi di inserire i "\\" all'inizio (come nel tuo esempio), che non metta un punto nell'ip, che l'ip non esita, o tanti altri motivi. Piuttosto è meglio verificare che il percorso esista, e far visualizzare un messaggio d'errore in modo che l'utente possa verificare cio' che ha scritto.

la fretta di scrivere
Dipendende da come gestisci la cosa, cmq grazie x la tua risposta