Batch Index du Forum
S’enregistrerRechercherFAQMembresGroupesConnexion
Répondre au sujet Page 1 sur 2
Aller à la page: 1, 2  >
Créer un VBS pour réinitialiser la pile TCP/Ip
Auteur Message
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Voilà, je ne connais pas très bien le vbs (voire pas du tout !), mais je dois en créer un pour permettre de modifier le registre directement.
Je dois pouvoir rétablir les valeurs de registre suivantes :

HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\Tcpip\Parameters
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\DHCP\Parameters




Ce qui correspond à netsh int ip reset en batch. Mais je ne peux l'utiliser même en le déclarant dans le VBS !

Je sèche...

Si vous pouviez m'aider.
Merci




______________________________________________________
-Il n'y a qu'en affrontant les plus forts que l'on progresse-

Visiter le site web du posteur
Message Publicité 
PublicitéSupprimer les publicités ?


Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
bonjour
en vbs aucune idée
mais en batch en faisant un reg add de tes clés si tu as les valeurs

quelles valeurs dois tu rétablir ?




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
en fait je ne sais pas trop quels sont les valeurs exactes à rétablir ! Je ne trouve rien sur le net...
Je sais juste que c'est dans ces deux dossiers de registre




______________________________________________________
-Il n'y a qu'en affrontant les plus forts que l'on progresse-

Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Quel os ?

dans quel but tu dois les rétablir ? interface ? suite à une infection ? si oui laquelle ?
j ai peut etre un truc sur mon autre pc mais j'y aurai accès seulement demain...


fais un netsh int ip reset et exporte tes clés de registre

reg export
reg query

puis ensuite poste le resultat on pourrait faire un reg add avec toutes les informations

et pourquoi tu n'utilises pas directement netsh int ip reset avec un batch , elle agit sur le registre logiquement en effaçant les entrées




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Quel os ?
Windows XP



dans quel but tu dois les rétablir ? interface ? suite à une infection ? si oui laquelle ?

A rétablir car dans sur le réseau en DHCP ou IP Fixe, nous sommes confrontés à des postes qui fixent leur adresse en 127.0.0.1 (loopback) et en utilisant un utilitaire tel que Winsock XP, tuot refonctionne.

et pourquoi tu n'utilises pas directement netsh int ip reset avec un batch , elle agit sur le registre logiquement en effaçant les entrées
Je ne peux utiliser les commandes, car pour réparer on doit se logguer en tant qu'admin local. Les utilisateurs n'y ont pas accès et on ne peut le faire à distance.
Donc l'intérêt est :

- Pouvoir modifier directement le registre avec un vbs, car les users y sont autorisé (mais ils ne le savent pas ! lol)
- Éviter les déplacer pour lancer le logiciel.
Ainsi on demande à l'utilisateur de transférer un fichier via clé" USB et de double-cliquer dessus et plus besoin de passer en admin. Donc plus besoin de se déplacer.

J'espère que c'est assez clair ^^


Voici les export pour la base de registre.

Code:
reset   SYSTEM\CurrentControlSet\Services\Dhcp\Parameters\Options\15\RegLocation
            old REG_MULTI_SZ =
                SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\?\DhcpDomain
                SYSTEM\CurrentControlSet\Services\TcpIp\Parameters\DhcpDomain

added   SYSTEM\CurrentControlSet\Services\Netbt\Parameters\Interfaces\Tcpip_{DD9EBAAF-B53C-448E-8967-F681A05D9139}\NetbiosOptions
added   SYSTEM\CurrentControlSet\Services\Netbt\Parameters\Interfaces\Tcpip_{F3A76DC5-E777-4861-A609-749C9DC6624E}\NetbiosOptions
deleted SYSTEM\CurrentControlSet\Services\Netbt\Parameters\EnableDns
deleted SYSTEM\CurrentControlSet\Services\Netbt\Parameters\EnableLmhosts
deleted SYSTEM\CurrentControlSet\Services\Netbt\Parameters\RandomAdapter
deleted SYSTEM\CurrentControlSet\Services\Netbt\Parameters\ScopeId
added   SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{0BDD3D33-E968-4C12-AD9D-F8A37B169820}\DisableDynamicUpdate
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{0BDD3D33-E968-4C12-AD9D-F8A37B169820}\IpAutoconfigurationAddress
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{0BDD3D33-E968-4C12-AD9D-F8A37B169820}\IpAutoconfigurationMask
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{0BDD3D33-E968-4C12-AD9D-F8A37B169820}\IpAutoconfigurationSeed
reset   SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{0BDD3D33-E968-4C12-AD9D-F8A37B169820}\RawIpAllowedProtocols
            old REG_MULTI_SZ =
                0

reset   SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{0BDD3D33-E968-4C12-AD9D-F8A37B169820}\TcpAllowedPorts
            old REG_MULTI_SZ =
                0

reset   SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\Interfaces\{0BDD3D33-E968-4C12-AD9D-F8A37B169820}\UdpAllowedPorts
            old REG_MULTI_SZ =
                0

deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\DisableTaskOffload
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\DontAddDefaultGatewayDefault
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\EnableDeadGwDetect
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\EnableIcmpRedirect
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\EnablePmtuBhDetect
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\EnablePmtuDiscovery
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\EnableSecurityFilters
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\SackOpts
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\SearchList
deleted SYSTEM\CurrentControlSet\Services\Tcpip\Parameters\UseDomainNameDevolution
reset   Linkage\UpperBind for PCI\VEN_10EC&DEV_8168&SUBSYS_E0151631&REV_01\4&293AFFCC&0&00E0.  bad value was:
            REG_MULTI_SZ =
                PSched

reset   Linkage\UpperBind for ROOT\MS_NDISWANIP\0000.  bad value was:
            REG_MULTI_SZ =
                PSched

<completed>





______________________________________________________
-Il n'y a qu'en affrontant les plus forts que l'on progresse-

Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
si il te fait absolument un vbs je ne pourrai pas t'aider, ce n'est pas mon domaine.

Je ne comprend pas la politique de l'entreprise si winsock xp fonctionne, il suffirait de le copier sur tout les machines et de l'executer à distance avec psexec dans ma tite théorie réseau....

pour netsh je pensai qu'en tant qu'admin réseau il avait le pouvoir de tout lancer sur un PC à distance avec un login+mdp
pour l'executer




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 

Je ne comprend pas la politique de l'entreprise si winsock xp fonctionne, il suffirait de le copier sur tout les machines et de l'executer à distance avec psexec dans ma tite théorie réseau....

pour netsh je pensai qu'en tant qu'admin réseau il avait le pouvoir de tout lancer sur un PC à distance avec un login+mdp
pour l'executer



Oui en tant qu'admin, mais le but serait de pouvoir utiliser cette commande en tant que user ^^
Et donc seul le vbs le permet.

Et si pas de réseau pas d'accès à distance...




______________________________________________________
-Il n'y a qu'en affrontant les plus forts que l'on progresse-

Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
ok j'ai compris que c'etait au niveau utilisateur du PC.
le bat n'est donc pas autoriser ?




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
faudrait surement voir du coté de la commande WMI...

peut être que ça peut t'aider :

http://www.petri.co.il/forums/showthread.php?t=37378
http://www.microsoft.com/downloads/details.aspx?FamilyID=AC4948C2-9605-4EBC…
http://www.bigresource.com/VB-Using-WMI-Network-Card-Configuration-Solved--…



edit : voici d'autres liens

http://vbnet.mvps.org/index.html?code/wmi/win32_networkadapterconfiguration…
http://www.serverwatch.com/tutorials/article.php/1548421
https://www.planet-source-code.com/vb/scripts/ShowCode.asp?txtCodeId=8105&a…




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Je me suis mis au VBS j'y comprend quelques trucs mais pas tout ce script permet d'apres ce que j'ai compris d'attribuer une IPfixe au PC ainsi que son masque de sous reseau, sa passerel
Code:

strComputer = "."
Set objWMIService = GetObject( _
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
    ("Select * from Win32_NetworkAdapterConfiguration " _
        & "where IPEnabled=TRUE")
strIPAddress = Array("192.168.1.141")
strSubnetMask = Array("255.255.255.0")
strGateway = Array("192.168.1.100")
strGatewayMetric = Array(1)
 
For Each objNetAdapter in colNetAdapters
    errEnable = objNetAdapter.EnableStatic( _
        strIPAddress, strSubnetMask)
    errGateways = objNetAdapter.SetGateways(_
        strGateway, strGatewaymetric)
Next


et celui ci de mettre ENABLE DHCP donc activé

Code:

strComputer = "."
Set objWMIService = GetObject(_
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
    ("Select * from Win32_NetworkAdapterConfiguration " _
        & "where IPEnabled=TRUE")
 
For Each objNetAdapter In colNetAdapters
    errEnable = objNetAdapter.EnableDHCP()
Next


Source : http://msdn.microsoft.com/en-us/library/aa394595(VS.85).aspx

donc il est possible de fusionner les deux :

Code:

strComputer = "."
Set objWMIService = GetObject( _
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colNetAdapters = objWMIService.ExecQuery _
    ("Select * from Win32_NetworkAdapterConfiguration " _
        & "where IPEnabled=TRUE")
strIPAddress = Array("192.168.1.141")
strSubnetMask = Array("255.255.255.0")
strGateway = Array("192.168.1.100")
strGatewayMetric = Array(1)

For Each objNetAdapter in colNetAdapters
    errEnable = objNetAdapter.EnableStatic( _
        strIPAddress, strSubnetMask)
    errGateways = objNetAdapter.SetGateways(_
        strGateway, strGatewaymetric)
    errEnable = objNetAdapter.EnableDHCP()
Next


Voila ça devrait être bon




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Merci pour toutes ces recherches et cette aide vraiment précieuse ^^

Par contre pour le script, je le trouve super, mais le but est de pouvoir remettre le registre réseau tel qu'il était.
Je ne pense pas que ce script puisse y répondre malheureusement...

Mais je vais tester ! ^^

Merci encore




______________________________________________________
-Il n'y a qu'en affrontant les plus forts que l'on progresse-

Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Je ne peux pas t'aider plus il te faut un expert VBS.
parce que ça m etonne que toutes tes clés soient modifiées, la command netsh ne fait pas de différences elle efface tout.

voir pour le vbscript comment lire, ecrire dans le registre : http://vb.developpez.com/faqvbs/?page=II.7




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Je me doute bien, mais à mon taff l'expert VBS est trop occupé ^^
Merci encore de toute cette aide bien précieuse.




______________________________________________________
-Il n'y a qu'en affrontant les plus forts que l'on progresse-

Visiter le site web du posteur
Répondre en citant
Message Créer un VBS pour réinitialiser la pile TCP/Ip 
Malheureusement pour moi, j'aurai bien aimé maitrisé ce language
poste sur ce forum : http://www.developpez.net/forums/f292/autres-langages/general-visual-basic-…
tu trouveras surement une réponse assez rapidement




______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Répondre en citant
Message Re: Créer un VBS pour réinitialiser la pile TCP/Ip 
Bonjour

A tester ...

reset tout la pile sans fichier journal

Code:
'script adapté by Laddy - bach.xoo.it
'execute la commande netsh int ip reset all en vbs
strCommand = "netsh int ip reset all "
set objWshShell = WScript.CreateObject("WScript.Shell")
intRC = objWshShell.Run(strCommand, 0, TRUE)
if intRC <> 0 then
 WScript.Echo "Error returned from running the command: " & intRC
else
 WScript.Echo "Command executed successfully"
end if





______________________________________________________
Faites paraitre votre batch sur BatchClipboard
Visiter le site web du posteur
Message Créer un VBS pour réinitialiser la pile TCP/Ip 


Montrer les messages depuis:
Répondre au sujet Page 1 sur 2
Aller à la page: 1, 2  >
  



Index | créer un forum | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation
Copyright 2008 - 2016 // Batch