Sujet Précédent Sujet Suivant

Copier une BD de C:\ vers E:\

Résolu/Fermé
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 - 26 mai 2020 à 19:37
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 - 28 mai 2020 à 01:51
Bonjour,

N.B : l'environnement du travail est VB6

Je tente de copier ma BD de C:\ vers E:\ sans résultat, l'application me renvoie un message de "Permission refusée"

Mon code est comme suite: 

Private Sub LblCopier_Click()

On Error GoTo nnn:

CmnDialog.Filter = "Toutes les extensions (*.*)|*.*"
CmnDialog.InitDir = "C:\InstLiquidations\BDLiquidations.mdb"
lblchemin=CmnDialog

FileCopy LblChemin, "E:\InstLiquidations\"

nnn:

End Sub


Merci d'avance pour votre aide
A voir également:

7 réponses

Réponse 1 / 7
NHenry Messages postés 15155 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 26 septembre 2024 334
26 mai 2020 à 21:03
Et si tu mets : 
FileCopy LblChemin, "E:\InstLiquidations\BDLiquidations.mdb"
0
Réponse 2 / 7
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 2
26 mai 2020 à 21:45
Re bonjour

Merci pour votre réactivité, l'application me revoie "Permission refusée" erreur 70
0
NHenry Messages postés 15155 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 26 septembre 2024 334
27 mai 2020 à 00:25
Est-ce que tu as la possibilité de craer un fichier "manuellement" déjà ?
0
Réponse 3 / 7
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 2
27 mai 2020 à 01:33
Justement, le fichier destinataire est crée manuellement
0
Réponse 4 / 7
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 2
27 mai 2020 à 01:53
Une idée dont je n'en suis pas sûr, ne faudrait il pas créer un module à part ?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Réponse 5 / 7
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 2
27 mai 2020 à 13:01
Bonjour,

Je vous remets ce que j'ai créer manuellement sans resultat, toujours ce message (Permission refusée), 'Erreur 70' 

'On error goto nnn:

CheminSource = "C:\InstAppSLiquidations\AppSLiquidations\BDLiquidations.mdb"
CheminDestination = "E:\InstAppSLiquidations\AppSLiquidations\BDLiquidations.mdb"

CmnDialog.ShowSave
CmnDialog.Filter = "Toutes les extensions (*.*)|*.*"
CmnDialog.InitDir = "E:\InstAppSLiquidations\AppSLiquidations\BDLiquidations.mdb"
FileCopy CheminSource, CheminDestination


'nnn:


Faudrait il recourir au creatObjet ?
Je ne sais plus quoi fait, vraiment je suis bloqué, et toute ma petite application avec
0
NHenry Messages postés 15155 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 26 septembre 2024 334
27 mai 2020 à 17:01
Alors que je reprenne :
Tu tentes de copier le fichier "C:\InstAppSLiquidations\AppSLiquidations\BDLiquidations.mdb" dans le fichier "E:\InstAppSLiquidations\AppSLiquidations\BDLiquidations.mdb".
Tu as déjà créé manuellement le fichier "E:\InstAppSLiquidations\AppSLiquidations\BDLiquidations.mdb"
Et tu as l'erreur.

VB6 est vieux et remplacé par VB.NET et C#, mais passons ce point.

As-tu essayé avec un OPEN "..." FOR OUTPUT AS #... ?
pour voir si VB6 peut écrire dedans ?
As-tu essayé en mode compilé ou seulement en debug ?
0
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 2 > NHenry Messages postés 15155 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 26 septembre 2024
27 mai 2020 à 17:07
Bonjour,

L'essai est fait seulement en debug.
Concernant cette procédure de Open ....., Sincèrement je ne le comprenais pas
0
NHenry Messages postés 15155 Date d'inscription vendredi 14 mars 2003 Statut Modérateur Dernière intervention 26 septembre 2024 334 > Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024
27 mai 2020 à 17:18
En gros avec OPEN (instruction VB6) tu ouvre un fichier en écriture dans le dossier cible (voir même en essaye d'écraser le fichier), si ça passe, c'est que le problème est hors de ce qui est imaginé (droits d'accès au dossier), sinon, c'est qu'un problème est présent et doit être corrigé.

Question doute, les fichier à copier (source ET destination) ne sont aps ouvert/utilisée par d'autres applis pendant que tu copies ?
0
Réponse 6 / 7
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 2
27 mai 2020 à 19:01
Pas du tout, les fichiers sont en principe, fermés.
0
Réponse 7 / 7
Lenouveauapprenti Messages postés 300 Date d'inscription samedi 22 décembre 2018 Statut Membre Dernière intervention 7 avril 2024 2
28 mai 2020 à 01:51
Bonjour

Faute de trouver mieux, je me suis contenter d'une solution simple, selon laquelle,
j'ai usé de CommonDialog.ShowOpen, puis de sélectionne le fichier (Source) à copier à partir de C:\, et je le copie via le menu du bouton droite de la souris, puis je sélectionne le dossier destinataire de l'unité E:\, et je l'y colle.
0

Discussions similaires

comment lire des bd gratuitement en ligne sur internet ?
theodu13480 -
Ereka -

2 réponses
Dessiner avec son clavier et avec des lettres
JSS -
Polodu33 -

78 réponses
Comment télécharger des BD en pdf
kawax -
bentafat -

4 réponses
lire ou télécharger le magasin WITCH MAG
qualinka -
mangoan -

9 réponses
Lire des bd en ligne
miss-titi -
Ananas1 -

3 réponses