Soft avec droit admin

Salut,

Dans un soft VB NET, je doit lancer deux commande:
Un ping
test = PingReply.Address.ToString & " : octets=" & PingReply.Buffer.Length & " temps=" & PingReply.RoundtripTime & " ms " & vbCrLf

Une demande de nom d'utilisateur logué
strComputer = Computer
objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
colComputer = objWMIService.ExecQuery("Select * from Win32_ComputerSystem")

Et bien sur, pour avoir ces infos, il faut être admin du poste qui recois la demande.
Je voudrais donc envoyer ces commandes avec les droits admin.
J'ai trouvé CreateProcessWithLogon, mais je ne sais pas comment l'utiliser avec ces commandes.

Comment fais-je?????
Merci

Il faut réaliser ces opérations dans un autre programme, qui sera exécuté en tant qu'administrateur :

Code:

---

1 2 3 4 5

Dim psi As New ProcessStartInfo(chemin_programme, arguments) psi.UserName = "unAdministrateur" psi.Password = "leMotDePasse" Process.Start(psi)

---

Pas moyen de faire ca sur le même soft?
Je ne voudrais pas distribuer 2 ou 3 EXE.

Non, un process est lancé pour un utilisateur donné et ne peut pas changer d'utilisateur en cours de route... De toutes façons, si ton programme fait des tâches administratives, il devrait être entièrement lancé en tant qu'admin à mon avis

Merci pour tes réponses.
Pour les taches admin, c'est juste un ping. Et puis les utilisateurs ont des droits restreins sur les machines.

Autre question, serait-il possible, pour ne pas troubler les utilisateurs, de faire un .EXE et un autre fichier non EXE.

Euh, depuis quand un ping nécessite des droits d'administrateur ?
Par contre pour WMI je ne sais pas trop
Tu as testé ton programme sans droits d'admin ?

Oh pardon ce n'est pas le ping, mais je fais une recherche si quelqu'un est logué sur le PC et là, il me faut les droits admin.