Bonjour a tous

j'ai une petite application qui récupère le nom du PC le nom d'utilisateur et le numéro de série du PC et j'aimerais pouvoir passer d'un pc a un autre et exécuter mon application et j'aimerais sauvegarder les données récupéré dans un fichier CSV dans un serveur par réseau

actuellement je récupére les données un par un dans un TEdit text

exemple numero_de_serie := Edit1.text
Nom_Du_PC := Edit2.text
Nom_Dutilisateur := Edit3.text

etc ...

comment sauvegarder sur un emplacement réseau avec utilisateur réseau admin et mot de passe dans un fichier CSV Merci

je m’explique

pour accéder au serveur par réseau et y mettre des fichiers il nous faut sois le mot de passe admin du serveur ou un utilisateur ayant accès modification sur le dossier partagé sur le serveur .

j'ai réussi a le faire avec un fichier text

comme ça

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
var
   SomeTxtFile : TextFile;
   begin
   AssignFile(SomeTxtFile, '\\serveur\Install\HelpDesk.txt') ;
   Append(SomeTxtFile) ;
   WriteLn(SomeTxtFile, JvEdit1.text,';', JvEdit2.text);
  CloseFile(SomeTxtFile) ;
   ShowMessage('Enregistré avec succés');
 end;
j'ai séparé les données par une semi-colonne ; pour pouvoir les exporter dans un fichier excel plus tard .

Merci