J'ai fais un truc qui marche, mais pour tout!!!

Question

Bonjour, des deux lignes ci-dessous, seule la première fonctionne. La deuxième plante, Acces denied, pourtant en VBS, ça marchait, mais j'ai pas sus ajouter l'heure et le date en VBS, donc je suis maintenant en VB6.

FileCopy "b:\Rapport2.exe", "z:\Rapport2.exe" & " " & Day(Date) & "_" & Month(Date) & "_" & Year(Date) & " " & Hour(Time) & "_" & Minute(Time)

FileCopy "b:\donnees.mdb", "z:\donnees.mdb" & " " & Day(Date) & "_" & Month(Date) & "_" & Year(Date) & " " & Hour(Time) & "_" & Minute(Time)

Une idée? Merci,

cs_Exploreur · Answer

Salut,


Peut-être que le fichier est en cours d'utilisation au moment où tu fais la copie?


A+


Exploreur

jmfmarques · Answer

Un simple :

msgbox "z:\Rapport2.exe" & " " & Day(Date) & "_" & Month(Date) & "_" & Year(Date) & " " & Hour(Time) & "_" & Minute(Time)

suffirait pourtant pour qu'il voie clairement cette "destination" et sa cohérence avec FileCopy, notamment en raison du fait que ce chemin contient des espaces sans être entre guillemets, déjà

cs_JMO · Answer

Bonjour à tous

si le Replace est accepté en vb6, l'exemple ci-dessous semble plus logique.

Msgbox "z:\donnees " & Replace(Date,"/","-") & " " & Replace(Left(Time,5),":","_") & ".mdb"

donc:
FileCopy "b:\donnees.mdb" , "z:\donnees " & Replace(Date,"/","-") & " " & Replace(Left(Time,5),":","_") & ".mdb"

Comme le préconise jmfmarques , en test, mettre des msgbox à outrance, permet de vérifier
la cohérence des variables.

jean-marc

cs_Exploreur · Answer

Bonjour à Tous,

FormatDateTime ( now, vbShortDate)
FormatDateTime ( now, vbShortTime)

Il pourrai peut-être utiliser ces instruction pour le retour Date et Time, je dit bien peut-être...
A
Exploreur

cs_MPi · Answer

Selon le message "Access Denied" qu'il reçoit, je pense qu'Exploreur a bien su répondre. Le fichier est probablement en cours d'utilisation.

MPi

J'ai fais un truc qui marche, mais pour tout!!!

5 réponses

Votre réponse