Visual Studio 2008 - paramètre carte réseau - protocole TCP/IP
AfroDurf
Messages postés23Date d'inscriptionjeudi 18 septembre 2003StatutMembreDernière intervention12 mai 2010
-
11 mai 2010 à 17:07
AfroDurf
Messages postés23Date d'inscriptionjeudi 18 septembre 2003StatutMembreDernière intervention12 mai 2010
-
12 mai 2010 à 08:47
Bonjour à tous (tes),
Voilà je vous expose mon problème. J'ai créer un fichier.bat qui une fois lancer ouvre une fenêtre DOS permettant à l'utilisateur de choisir sa configuration pour sa carte WIFI (DCHP, Travail, Maison).
Cela fonctionne parfaitement si les conditions suivantes sont réunies :
Le nom de la carte réseau Wifi se nomme clairement : WIFI (renommage a la main une unique fois)
Le contrôle utilisateur est désactivé.
Je souhaite donc faire évoluer ce petit log vers un truc un peu plus "sexy" et plus fonctionnel. Pour cela et connaissant un peu le VBA je me suis lancé tête baissé dans Visual Studio 2008 sous Windows 7.
Mais lorsque je souhaite ne serait-ce que reproduire un exemple hyper simple du type :
Affichage de l'IP local avec Winsock par exemple c'est impossible. Apparent, winsock n'est pas compatible x64bit ? Que faire et surtout j'aimerais un peu d'aide pour partir et commencer. Voici mon log de mon bat :
@echo off
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem Configuration IP automatique pour windows XP - Vista
rem AfroDurf - Septembre2008
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem ----------------------
rem Section MAISON
rem ----------------------
set adr_m=192.168.1.xxx
set masq_m=255.255.255.0
set gate_m=192.168.xx.xxx
set dns1_m=80.xxxxxxxxxxx
set dns2_m=80.xxxxxxxxx
rem ----------------------
rem Section TRAVAIL
rem ----------------------
set adr_a=192.168.1.xxxxxx
set masq_a=255.255.255.0
set gate_a=192.168.xxxxxxxx
set dns1_a=80.xxxxxxxxxx
set dns2_a=80.xxxxxxxxxxx
rem ----------------------
set carte="WIFI"
cls
@echo off
cls
:MENU
cls
color 0F
echo **************************************************************
echo º º
echo º CONFIGURATION IP AUTOMATIQUE º
echo º par AfroDurf º
echo º º
echo **************************************************************
echo.
echo Bonjour cher(e) %USERNAME%
echo.
echo Nous sommes le %date%, il est %time%
echo.
echo **************************************************************
echo º º
echo º (M) = Maison º
echo º (T) = Travail º
echo º (H) = Hotel º
echo º (A) = Aide º
echo º (Q) = Quitter º
echo º º
echo **************************************************************
echo.
echo.
set /P confnet=Faites votre choix :
for %%r in (A H M Q T) do if /i %confnet%==%%r goto %%r
echo.
echo Option est invalide !
echo.
goto MENU
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem Récupération et application
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
:M
set adresse=%adr_m%
set masque=%masq_m%
set gate=%gate_m%
set dns1=%dns1_m%
set dns2=%dns2_m%
goto AFFECTA
:T
set adresse=%adr_a%
set masque=%masq_a%
set gate=%gate_a%
set dns1=%dns1_a%
set dns2=%dns2_a%
goto AFFECTA
:AFFECTA
echo.
echo La configuration appliquee sera la suivante :
echo.
echo Adresse : %adresse%
echo Masque : %masque%
echo Gateway : %gate%
echo Dns1 : %dns1%
echo Dns2 : %dns2%
echo.
echo Processus en cours ...
netsh interface ip set address %carte% static %adresse% %masque% %gate% 1
netsh interface ip set dns %carte% static %dns1%
netsh interface ip add dns %carte% %dns2%
echo.
echo La configuration a ete realisee avec succes !
echo.
goto CONFIRM
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem DHCP
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
:H
cls
echo Configuration du mode DHCP.
echo.
echo Processus en cours ...
netsh interface ip set address %carte% dhcp
netsh interface ip set dns %carte% dhcp
netsh interface ip set wins %carte% dhcp
echo.
echo Votre interface WIFI est maintenant configuree en mode DHCP.
echo.
pause
goto Q
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem VALIDATION
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
:CONFIRM
echo.
echo Votre acces au reseau internet est maintenant operationnel.
echo.
goto Q
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem AIDE
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
:A
cls
echo Attention en cas de probleme :
echo.
echo Verifier que votre connexion reseau se nomme bien WIFI.
echo.
echo Pour connaitre comment renommer votre connexion merci
echo de choisir votre systeme exploitation dans le menu ci-dessous.
echo.
echo Si vous etes sous Windows XP taper 1
echo.
echo Si vous etes sous Windows Vista taper 2
echo.
set /P confnet=Faites votre choix ?(Q-M):
for %%r in (1) do if %confnet%==%%r goto 1
for %%r in (2) do if %confnet%==%%r goto 2
:1
cls
echo.
echo Si vous etes sous WINDOWS XP :
echo.
echo 1. Ouvrir le Panneau de configuration ;
echo.
echo 2. Cliquer sur Connexions Reseau ;
echo.
echo 3. Renommer votre Connexion au reseau sans fil (Wireless)
echo par WIFI en cliquant droit dessus puis Renommer.
echo.
echo.
goto Q
:2
cls
echo Si vous etes sous Windows Vista :
echo.
echo A. Renommer votre connexion
echo.
echo 1. Ouvrir le Panneau de configuration ;
echo 2. Cliquer sur Centre reseau et partage ;
echo 3. Cliquer sur Gerer les connexions reseau ;
echo 4. Renommer votre Connexion au reseau sans fil (Wireless)
echo par WIFI en cliquant droit dessus puis Renommer.
echo.
echo B. Desactiver le controle des comptes d'utilisateurs
echo.
echo 1. Ouvrir le Panneau de configuration ;
echo 2. Cliquer sur Comptes d'utilisateurs ;
echo 3. Cliquer sur Activer ou desactiver le controle des
echo comptes d'utilisateurs ;
echo 4. Decocher le controle des comptes d'utilisateurs puis
echo OK. Windows demandera de redemarrer.
echo.
goto Q
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem CHOIX QUITTER
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
:Q
echo.
echo Si vous voulez quitter le programme taper Q
echo.
echo Si vous voulez revenir au Menu taper M
echo.
set /P confnet=Faites votre choix ?(Q-M):
for %%r in (Q q) do if %confnet%==%%r goto EXIT
for %%r in (M m) do if %confnet%==%%r goto MENU
goto EXIT
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
rem QUITTER
rem +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
:EXIT
exit
Merci beaucoup par avance de votre aide.
A voir également:
Visual Studio 2008 - paramètre carte réseau - protocole TCP/IP
