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
j'ai séparé les données par une semi-colonne ; pour pouvoir les exporter dans un fichier excel plus tard .
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;
Merci
Partager