Discussion :

[bvsud]

Bonjour à tous

J'utilise un SElectDirectory pour exporter, depuis une machine virtuelle, un répertoire de sauvegarde de celle-ci vers un répertoire du PC physique :



Mais lorsque le réseau ne répond pas (ne s'ouvre pas) : que faire ?

Ca ne marche pas à tous les coups.

Merci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
Procedure Pilote_Exportation_Rep_Sauvegarde;
var
      DossierChoisi : String;
      DossierInitial : WideString;
 
      Rep_Dest_Exportation : string;
      Retour : boolean;
 
begin
      Rep_Dest_Exportation := '';
 
      DossierInitial:='';
      IF SelectDirectory('CHOIX DU REPERTOIRE D''EXPORTATION', DossierInitial, DossierChoisi) = True then
          begin
                Rep_Dest_Exportation := DossierChoisi;
                Exportation_Sauvegarde(DossierChoisi);  // SHFileOperation
          end;
 
 
end;

Dans ces cas-là, la MV ne voit pas elle-même le réseau :

[Linkin]

Delphi ne sera d'aucune utilité dans un premier temps.

Si le réseau n'est pas reconnu par l'explorateur Windows, il faut agir sur Windows et ces paramètres, et/ou les paramètres de la VM. Trouver où cela bloque.
Est-ce qu'au bout de 5 minutes, le réseau est vu par Windows?

[bvsud]

Justement : pas systématiquement.

Mais je vais faire le test des 5 mn. Ca prend parfois assez longtemps. Système hôte : Seven 64.

[Linkin]

Désolé, je ne vois pas.
J'ai eu un problème similaire quand j'activais les fichiers hors connexion. Il mettait longtemps avant de retrouver le réseau quand je m'y reconnectais.
Je n'ai pas trouvé de solution du coup j'ai désactivé les fichiers hors connexion.

[bvsud]

Et il n'y aurait pas un composant (des Jedi, par exemple) pour tester si le réseau est "libre", ouvert ? Mapper le réseau, quoi.

Ca me permettrait de faire ça avant la copie, avec un message "Patientez".

[tourlourou]

Un ping ?

[bvsud]

Ah ? oui ! Dans une console, par exemple ?
Non : je retire. Il y a un composant pour ça.

[SergioMaster]

Bonjour,
Je conseillerais le TPing d'ICS plutôt que l'équivalent d'Indy (J'ai eu des problèmes de temps de réponse avec ce dernier)
Un seul point négatif, les antivirus lèvent souvent un faux positif en utilisant ce composant

[bvsud]

Le problème, c'est qu'il faut connaître l'IP de la machine hôte, non ? Or je n'ai pas une IP statique. Je dois modifier ça ?

[SkyZoThreaD]

Pas besoin d'ip, le hostname devrait suffire. Mais un ping ne te dira pas si ton partage est présent... Tu pourrait mapper le partage avec net use et faire tes copies après via la lettre de lecteur.

[bvsud]

Maintenant, j'ai l'erreur suivante : 0x800004005.
Sur le Net, je tombe sur des tonnes de problèmes relatifs, précisément, aux réseaux. Mais lequel concerne ce cas-là... ?

J'ai tenté une importation depuis la hôte (via une SHFileOperation), mais ça ne copie pas le répertoire source.

Il y a vraiment bcp de problèmes de réseau, entre les MV et les machines physiques ?

[SkyZoThreaD]

Il y a vraiment bcp de problèmes de réseau, entre les MV et les machines physiques ?

Certains hyperviseurs sont plus compliqués que d'autres à configurer mais si c'est bien fait, non.

Maintenant, j'ai l'erreur suivante : 0x800004005.
Sur le Net, je tombe sur des tonnes de problèmes relatifs, précisément, aux réseaux. Mais lequel concerne ce cas-là... ?

Il va falloir plus d'infos pour tenter de t'aider... On ne sait même pas sur quelle solution tu es partit, à quel moment l'erreur apparait, où est-ce qu'elle apparait... ?

J'ai tenté une importation depuis la hôte (via une SHFileOperation), mais ça ne copie pas le répertoire source.

La hôte du père noël ? non sérieux: j'ai pas comprit cette phrase mais il semble que SHFileOperation soit deprecated depuis Vista : https://msdn.microsoft.com/en-us/lib...=vs.85%29.aspx

[free07]

Bonjour,

Je ne sais pas quel est la version de Delphi qui est utilisée mais avec les versions XE, tu as pas mal de fonctions sur la gestion de fichiers, et notament la méthode Copy de TFile. ( dans System.ioUtils, il y a aussi TDirectory,Tpath, etc )

[ALWEBER]

Bonjour,

Une possibilité faire un ping par l’exécution d'une commande DOS depuis le programme Delphi:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
ping poste1 >D:\X.TXT

poste1 est le nom du poste à pinguer
>D:\X.TXT est le fichier généré par cette commande que tu peux analyser tranquillement
en cas danomalie tu as un message du genre

Envoi d'une requˆte 'ping' sur poste1.res [192.168.1.165] avec 32 octets de donn‚esÿ:
D‚lai d'attente de la demande d‚pass‚.
D‚lai d'attente de la demande d‚pass‚.
D‚lai d'attente de la demande d‚pass‚.
D‚lai d'attente de la demande d‚pass‚.
Statistiques Ping pour 192.168.1.165:
Paquetsÿ: envoy‚s = 4, re‡us = 0, perdus = 4 (perte 100%),