Quel un pourrait me dire quel est le problème ?
il me fait une erreur sur la ligne
'oManagementObject("Password") = #P@sw0rd#'
Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "Domain\Admin"
oConnexion.Password = "#P@sw0rd#"
Dim oManagementScope As New ManagementScope("\\" & TextBox1.Text & _
"\root\cimv2", oConnexion)
Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem")
Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery)
Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get
oManagementObject("Name") = InputBox("Quel est le nouveau nom de la machine
?")
oManagementObject("UserName") = "Domain\Admin"
oManagementObject("Password") = #P@sw0rd#
Dim obj() As Object = {oManagementObject}
oManagementObject.InvokeMethod("Rename", obj)
Next
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Patrice
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
-- Patrice
"TroXsA" a écrit dans le message de news:diimtf$mt8$
Bonjour a tous
Quel un pourrait me dire quel est le problème ? il me fait une erreur sur la ligne 'oManagementObject("Password") = ##' Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin" oConnexion.Password = "##" Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _ "rootcimv2", oConnexion) Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem") Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery) Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Dim obj() As Object = {oManagementObject} oManagementObject.InvokeMethod("Rename", obj) Next
Merci d'avance ...
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
--
Patrice
"TroXsA" <neat@pk.com> a écrit dans le message de
news:diimtf$mt8$1@s1.news.oleane.net...
Bonjour a tous
Quel un pourrait me dire quel est le problème ?
il me fait une erreur sur la ligne
'oManagementObject("Password") = #P@sw0rd#'
Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin"
oConnexion.Password = "#P@sw0rd#"
Dim oManagementScope As New ManagementScope("\" & TextBox1.Text & _
"rootcimv2", oConnexion)
Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem")
Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery)
Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get
oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
-- Patrice
"TroXsA" a écrit dans le message de news:diimtf$mt8$
Bonjour a tous
Quel un pourrait me dire quel est le problème ? il me fait une erreur sur la ligne 'oManagementObject("Password") = ##' Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin" oConnexion.Password = "##" Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _ "rootcimv2", oConnexion) Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem") Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery) Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Dim obj() As Object = {oManagementObject} oManagementObject.InvokeMethod("Rename", obj) Next
Merci d'avance ...
TroXsA
si ils y sont bien les " je les pas mi ici mais dans mon code ils y sont bien
"Patrice" a écrit dans le message de news:
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
-- Patrice
"TroXsA" a écrit dans le message de news:diimtf$mt8$
Bonjour a tous
Quel un pourrait me dire quel est le problème ? il me fait une erreur sur la ligne 'oManagementObject("Password") = ##' Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin" oConnexion.Password = "##" Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _ "rootcimv2", oConnexion) Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem") Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery) Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Dim obj() As Object = {oManagementObject} oManagementObject.InvokeMethod("Rename", obj) Next
Merci d'avance ...
si ils y sont bien les "
je les pas mi ici mais dans mon code ils y sont bien
"Patrice" <nobody@nowhere.com> a écrit dans le message de news:
OJ8UnzxzFHA.1040@TK2MSFTNGP14.phx.gbl...
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
--
Patrice
"TroXsA" <neat@pk.com> a écrit dans le message de
news:diimtf$mt8$1@s1.news.oleane.net...
Bonjour a tous
Quel un pourrait me dire quel est le problème ?
il me fait une erreur sur la ligne
'oManagementObject("Password") = #P@sw0rd#'
Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin"
oConnexion.Password = "#P@sw0rd#"
Dim oManagementScope As New ManagementScope("\" & TextBox1.Text & _
"rootcimv2", oConnexion)
Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem")
Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery)
Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get
oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
si ils y sont bien les " je les pas mi ici mais dans mon code ils y sont bien
"Patrice" a écrit dans le message de news:
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
-- Patrice
"TroXsA" a écrit dans le message de news:diimtf$mt8$
Bonjour a tous
Quel un pourrait me dire quel est le problème ? il me fait une erreur sur la ligne 'oManagementObject("Password") = ##' Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin" oConnexion.Password = "##" Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _ "rootcimv2", oConnexion) Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem") Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery) Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Dim obj() As Object = {oManagementObject} oManagementObject.InvokeMethod("Rename", obj) Next
Merci d'avance ...
TroXsA
Voila le message d'erreur complet ! :) _________________________________________________ Une exception non gérée du type 'System.Management.ManagementException' s'est produite dans system.management.dll
Informations supplémentaires : Non trouvé _________________________________________________
"Patrice" a écrit dans le message de news:
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
-- Patrice
"TroXsA" a écrit dans le message de news:diimtf$mt8$
Bonjour a tous
Quel un pourrait me dire quel est le problème ? il me fait une erreur sur la ligne 'oManagementObject("Password") = ##' Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin" oConnexion.Password = "##" Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _ "rootcimv2", oConnexion) Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem") Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery) Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Dim obj() As Object = {oManagementObject} oManagementObject.InvokeMethod("Rename", obj) Next
Merci d'avance ...
Voila le message d'erreur complet ! :)
_________________________________________________
Une exception non gérée du type 'System.Management.ManagementException'
s'est produite dans system.management.dll
Informations supplémentaires : Non trouvé
_________________________________________________
"Patrice" <nobody@nowhere.com> a écrit dans le message de news:
OJ8UnzxzFHA.1040@TK2MSFTNGP14.phx.gbl...
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
--
Patrice
"TroXsA" <neat@pk.com> a écrit dans le message de
news:diimtf$mt8$1@s1.news.oleane.net...
Bonjour a tous
Quel un pourrait me dire quel est le problème ?
il me fait une erreur sur la ligne
'oManagementObject("Password") = #P@sw0rd#'
Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin"
oConnexion.Password = "#P@sw0rd#"
Dim oManagementScope As New ManagementScope("\" & TextBox1.Text & _
"rootcimv2", oConnexion)
Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem")
Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery)
Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get
oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Voila le message d'erreur complet ! :) _________________________________________________ Une exception non gérée du type 'System.Management.ManagementException' s'est produite dans system.management.dll
Informations supplémentaires : Non trouvé _________________________________________________
"Patrice" a écrit dans le message de news:
Erreur à la compilation ? Le mot de passe n'est pas entre " ?
-- Patrice
"TroXsA" a écrit dans le message de news:diimtf$mt8$
Bonjour a tous
Quel un pourrait me dire quel est le problème ? il me fait une erreur sur la ligne 'oManagementObject("Password") = ##' Obj non trouvé ... et je sais pas du tout a quoi il fait allusion !!!
oConnexion.Username = "DomainAdmin" oConnexion.Password = "##" Dim oManagementScope As New ManagementScope("" & TextBox1.Text & _ "rootcimv2", oConnexion) Dim oQuery As New SelectQuery("Select * From Win32_ComputerSystem") Dim oSearch As New ManagementObjectSearcher(oManagementScope, oQuery) Dim oManagementObject As ManagementObject
For Each oManagementObject In oSearch.Get oManagementObject("Name") = InputBox("Quel est le nouveau nom de la
Salut, Pourquoi ne passerais-tu pas par l'API SetComputerName? Voici un exemple ici http://www.programmershelp.co.uk/showcode.php?eI0
TroXsA
Car cette api ne fait pas la ré-intergration au domaine, puis je souhaite utiliser ce qui ce fait dans VB.net que d'utiliser des api a tout bout de champs :) je ne dit pas que les API c'est caca :) au contraire des fois heureusement qu'elles sont là :D
si j'y arrive pas j'utiliserais l'API car pas le choix :o/
mais bon chaque chose a son temps je vais bien finir par trouvé la solution si personne me la donné avant :)
merci en tout cas pour ton aide A bientot !
"Titeuf [VB.Net 2005]" a écrit dans le message de news:
Salut, Pourquoi ne passerais-tu pas par l'API SetComputerName? Voici un exemple ici http://www.programmershelp.co.uk/showcode.php?eI0
Car cette api ne fait pas la ré-intergration au domaine, puis je souhaite
utiliser ce qui ce fait dans VB.net que d'utiliser des api a tout bout de
champs :) je ne dit pas que les API c'est caca :) au contraire des fois
heureusement qu'elles sont là :D
si j'y arrive pas j'utiliserais l'API car pas le choix :o/
mais bon chaque chose a son temps je vais bien finir par trouvé la solution
si personne me la donné avant :)
merci en tout cas pour ton aide
A bientot !
"Titeuf [VB.Net 2005]" <titeuf@nospam.fr> a écrit dans le message de news:
edMYY9yzFHA.3312@TK2MSFTNGP09.phx.gbl...
Salut,
Pourquoi ne passerais-tu pas par l'API SetComputerName?
Voici un exemple ici http://www.programmershelp.co.uk/showcode.php?eI0
Car cette api ne fait pas la ré-intergration au domaine, puis je souhaite utiliser ce qui ce fait dans VB.net que d'utiliser des api a tout bout de champs :) je ne dit pas que les API c'est caca :) au contraire des fois heureusement qu'elles sont là :D
si j'y arrive pas j'utiliserais l'API car pas le choix :o/
mais bon chaque chose a son temps je vais bien finir par trouvé la solution si personne me la donné avant :)
merci en tout cas pour ton aide A bientot !
"Titeuf [VB.Net 2005]" a écrit dans le message de news:
Salut, Pourquoi ne passerais-tu pas par l'API SetComputerName? Voici un exemple ici http://www.programmershelp.co.uk/showcode.php?eI0
TroXsA
Une autre erreur ... mais là je ne sais pas pas du tout comment faire pour faire ce qu'il dit ! qu'ellequ'un s'aurait quoi faire ? ___________________________________________ Une exception non gérée du type 'System.Management.ManagementException' s'est produite dans system.management.dll
Informations supplémentaires : La connexion client à WINMGMT doit être cryptée pour cette opération. Ajustez vos paramètres de sécurité proxy IWbemServices et recommencez. ___________________________________________
-- Mail : http://cerbermail.com/?rIXgaw9Xsl Site : http://planetenova.free.fr/
"TroXsA" a écrit dans le message de news: dij5le$gp$
Car cette api ne fait pas la ré-intergration au domaine, puis je souhaite utiliser ce qui ce fait dans VB.net que d'utiliser des api a tout bout de champs :) je ne dit pas que les API c'est caca :) au contraire des fois heureusement qu'elles sont là :D
si j'y arrive pas j'utiliserais l'API car pas le choix :o/
mais bon chaque chose a son temps je vais bien finir par trouvé la solution si personne me la donné avant :)
merci en tout cas pour ton aide A bientot !
"Titeuf [VB.Net 2005]" a écrit dans le message de news:
Salut, Pourquoi ne passerais-tu pas par l'API SetComputerName? Voici un exemple ici http://www.programmershelp.co.uk/showcode.php?eI0
Une autre erreur ... mais là je ne sais pas pas du tout comment faire pour
faire ce qu'il dit !
qu'ellequ'un s'aurait quoi faire ?
___________________________________________
Une exception non gérée du type 'System.Management.ManagementException'
s'est produite dans system.management.dll
Informations supplémentaires : La connexion client à WINMGMT doit être
cryptée pour cette opération. Ajustez vos paramètres de sécurité proxy
IWbemServices et recommencez.
___________________________________________
--
Mail : http://cerbermail.com/?rIXgaw9Xsl
Site : http://planetenova.free.fr/
"TroXsA" <neat@pk.com> a écrit dans le message de news:
dij5le$gp$1@s1.news.oleane.net...
Car cette api ne fait pas la ré-intergration au domaine, puis je souhaite
utiliser ce qui ce fait dans VB.net que d'utiliser des api a tout bout de
champs :) je ne dit pas que les API c'est caca :) au contraire des fois
heureusement qu'elles sont là :D
si j'y arrive pas j'utiliserais l'API car pas le choix :o/
mais bon chaque chose a son temps je vais bien finir par trouvé la
solution si personne me la donné avant :)
merci en tout cas pour ton aide
A bientot !
"Titeuf [VB.Net 2005]" <titeuf@nospam.fr> a écrit dans le message de news:
edMYY9yzFHA.3312@TK2MSFTNGP09.phx.gbl...
Salut,
Pourquoi ne passerais-tu pas par l'API SetComputerName?
Voici un exemple ici http://www.programmershelp.co.uk/showcode.php?eI0
Une autre erreur ... mais là je ne sais pas pas du tout comment faire pour faire ce qu'il dit ! qu'ellequ'un s'aurait quoi faire ? ___________________________________________ Une exception non gérée du type 'System.Management.ManagementException' s'est produite dans system.management.dll
Informations supplémentaires : La connexion client à WINMGMT doit être cryptée pour cette opération. Ajustez vos paramètres de sécurité proxy IWbemServices et recommencez. ___________________________________________
-- Mail : http://cerbermail.com/?rIXgaw9Xsl Site : http://planetenova.free.fr/
"TroXsA" a écrit dans le message de news: dij5le$gp$
Car cette api ne fait pas la ré-intergration au domaine, puis je souhaite utiliser ce qui ce fait dans VB.net que d'utiliser des api a tout bout de champs :) je ne dit pas que les API c'est caca :) au contraire des fois heureusement qu'elles sont là :D
si j'y arrive pas j'utiliserais l'API car pas le choix :o/
mais bon chaque chose a son temps je vais bien finir par trouvé la solution si personne me la donné avant :)
merci en tout cas pour ton aide A bientot !
"Titeuf [VB.Net 2005]" a écrit dans le message de news:
Salut, Pourquoi ne passerais-tu pas par l'API SetComputerName? Voici un exemple ici http://www.programmershelp.co.uk/showcode.php?eI0
