Et un post qui ressort de derriere les fagots !!
Sous windows 98 :
////////////////////////////////////////////////////////////////////
Set registre = CreateObject("WScript.Shell")
' ------------------------------------------------------------------
' MASQUE 16 BITS POUR WIN98
' ------------------------------------------------------------------
registre.regwrite "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0001\IPMask" , "255.255.255.0"
registre.regwrite "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0002\IPMask" , "255.255.255.0"
registre.regwrite "HKEY_LOCAL_MACHINE\System\CurrentControlSet\Services\Class\NetTrans\0003\IPMask" , "255.255.255.0"
msgbox "Changement de masque effectuer pour windows 98 !!"
//////////////////////////////////////////////////////////////////
Remarque : Sous windows 98 il y a une clé de créé a chaque installation, ou réinstallation de carte réseau (0001, 0002, 0003, ...). N'étant pas un AS de vbs j'evite les condition, pour savoir laquelle est utilisée. Bourrin, mais ca marche !! :)
Je suis en ce moment sur une version pour faire la meme chose avec XP, mais actuellement, meme si j'arrive a éditer le registre, le masque de connexion ne change pas.
AVIS AU ADMIN RESEAU : Si quelqu'un sait comment changer un masque de sous réseau XP via vbs, je suis preneur !!
MERCI !!
PS : Pr les tags : Masque sous réseau, windows 98, vbscript, changer, modification