|
| Valeur et modification de la passerelle |
| Iniciado por pbousquet, jan., 11 2005 3:05 PM - 6 respostas |
| |
| | | |
|
| |
Publicado em janeiro, 11 2005 - 3:05 PM |
Bonjour,
Connaissez-vous un moyen de récupérer et modifier la valeur de la passerelle
windows obtenue avec ipconfig
merci d'avance |
| |
| |
| | | |
|
| | |
| |
Publicado em janeiro, 11 2005 - 3:26 PM |
Voici le code que j'utilise :
lpCmdLine est une chaîne =""
nCmdShow est un entier=0
nRetour est un entier
fSupprime(fRepEnCours()+"\IPCONFIG.TXT")
lpCmdLine="CMD.EXE /C "+Caract(34)+"IPCONFIG.EXE >"+fRepEnCours()+"\IPCONFIG.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
<L'utilisation de l'API permet d'éxécuter une commande DOS en mode invisible>
<Traiter le fichier retourné IPCONFIG.TXT pour récupérer la passerelle>
<Puis pour changer la configuration : >
ftmp=fOuvre(fRepEnCours()+"\NETSH.TXT",foCréation)
SI ftmp>0 ALORS
fEcritLigne(ftmp,"interface")
fEcritLigne(ftmp,"ip")
fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+" source=static addr="+ip_Adresse+" mask%5.255.255.0")
fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+" gateway="+ip_passerelle+" gwmetric=1")
fFerme(ftmp)
fSupprime(fRepEnCours()+"\RESULNET.TXT")
Sablier(Vrai)
lpCmdLine="CMD.EXE /C "+Caract(34)+"NETSH.EXE EXEC "+fRepEnCours()+"\NETSH.TXT >"+fRepEnCours()+"\RESULNET.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
Sablier(Faux)
FIN
<Il faut environ 3 à 5 secondes pour que la commande soit effective par le système en dynamique> |
| |
| |
| | | |
|
| | |
| |
Publicado em janeiro, 11 2005 - 4:19 PM |
merci beaucoup pour ta réponse, je vais essayer
"Rémy" <remy.bisson@cegeinformatique.com> a écrit dans le message de
news:41e3c991@news.pcsoft.fr...
Voici le code que j'utilise :
lpCmdLine est une chaîne =""
nCmdShow est un entier=0
nRetour est un entier
fSupprime(fRepEnCours()+"\IPCONFIG.TXT")
lpCmdLine="CMD.EXE /C "+Caract(34)+"IPCONFIG.EXE
"+fRepEnCours()+"\IPCONFIG.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
<L'utilisation de l'API permet d'éxécuter une commande DOS en mode
invisible>
<Traiter le fichier retourné IPCONFIG.TXT pour récupérer la passerelle> <Puis pour changer la configuration : > ftmp=fOuvre(fRepEnCours()+"\NETSH.TXT",foCréation) SI ftmp>0 ALORS fEcritLigne(ftmp,"interface") fEcritLigne(ftmp,"ip") fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+"
source=static addr="+ip_Adresse+" mask%5.255.255.0")
> fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+"
gateway="+ip_passerelle+" gwmetric=1")
fFerme(ftmp)
fSupprime(fRepEnCours()+"\RESULNET.TXT")
Sablier(Vrai)
lpCmdLine="CMD.EXE /C "+Caract(34)+"NETSH.EXE EXEC
"+fRepEnCours()+"\NETSH.TXT >"+fRepEnCours()+"\RESULNET.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
Sablier(Faux)
FIN
<Il faut environ 3 à 5 secondes pour que la commande soit effective par le
système en dynamique>
|
| |
| |
| | | |
|
| | |
| |
Publicado em janeiro, 11 2005 - 5:17 PM |
et pour changer les DNS comment on fait, j'ai rien trouver dans l'aide de
netsh.exe chez microsoft 
par avance merci
Antoine
"Pierre BOUSQUET" <pbousquet@quid-info.fr> a écrit dans le message de
news:41e3d748@news.pcsoft.fr...
merci beaucoup pour ta réponse, je vais essayer "Rémy" <remy.bisson@cegeinformatique.com> a écrit dans le message de news:41e3c991@news.pcsoft.fr...
Voici le code que j'utilise :
lpCmdLine est une chaîne =""
nCmdShow est un entier=0
nRetour est un entier
fSupprime(fRepEnCours()+"\IPCONFIG.TXT")
lpCmdLine="CMD.EXE /C "+Caract(34)+"IPCONFIG.EXE
"+fRepEnCours()+"\IPCONFIG.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
<L'utilisation de l'API permet d'éxécuter une commande DOS en mode
invisible>
<Traiter le fichier retourné IPCONFIG.TXT pour récupérer la passerelle> <Puis pour changer la configuration : > ftmp=fOuvre(fRepEnCours()+"\NETSH.TXT",foCréation) SI ftmp>0 ALORS fEcritLigne(ftmp,"interface") fEcritLigne(ftmp,"ip") fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+" source=static addr="+ip_Adresse+" mask%5.255.255.0") fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+"
gateway="+ip_passerelle+" gwmetric=1") fFerme(ftmp)
fSupprime(fRepEnCours()+"\RESULNET.TXT")
Sablier(Vrai)
lpCmdLine="CMD.EXE /C "+Caract(34)+"NETSH.EXE EXEC
"+fRepEnCours()+"\NETSH.TXT >"+fRepEnCours()+"\RESULNET.TXT"+Caract(34) nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
Sablier(Faux)
FIN
<Il faut environ 3 à 5 secondes pour que la commande soit effective par
le
|
| |
| |
| | | |
|
| | |
| |
Publicado em janeiro, 11 2005 - 5:36 PM |
je crois l'avoir
netsh interface ip set dns static adrDNS1
netsh interface ip add dns adrDNS2
merci internet 
Antoine
"Antoine GIDROL" <agidrol@free.fr> a écrit dans le message de
news:41e3e427@news.pcsoft.fr...
et pour changer les DNS comment on fait, j'ai rien trouver dans l'aide de netsh.exe chez microsoft par avance merci Antoine "Pierre BOUSQUET" <pbousquet@quid-info.fr> a écrit dans le message de news:41e3d748@news.pcsoft.fr... merci beaucoup pour ta réponse, je vais essayer "Rémy" <remy.bisson@cegeinformatique.com> a écrit dans le message de news:41e3c991@news.pcsoft.fr...
Voici le code que j'utilise :
lpCmdLine est une chaîne =""
nCmdShow est un entier=0
nRetour est un entier
fSupprime(fRepEnCours()+"\IPCONFIG.TXT")
lpCmdLine="CMD.EXE /C "+Caract(34)+"IPCONFIG.EXE
"+fRepEnCours()+"\IPCONFIG.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
<L'utilisation de l'API permet d'éxécuter une commande DOS en mode
invisible>
<Traiter le fichier retourné IPCONFIG.TXT pour récupérer la
passerelle>
<Puis pour changer la configuration : > ftmp=fOuvre(fRepEnCours()+"\NETSH.TXT",foCréation) SI ftmp>0 ALORS fEcritLigne(ftmp,"interface") fEcritLigne(ftmp,"ip") fEcritLigne(ftmp,"set address
name="+Caract(34)+nom_reseau+Caract(34)+"
source=static addr="+ip_Adresse+" mask%5.255.255.0") fEcritLigne(ftmp,"set address
name="+Caract(34)+nom_reseau+Caract(34)+"
gateway="+ip_passerelle+" gwmetric=1") fFerme(ftmp)
fSupprime(fRepEnCours()+"\RESULNET.TXT")
Sablier(Vrai)
lpCmdLine="CMD.EXE /C "+Caract(34)+"NETSH.EXE EXEC
"+fRepEnCours()+"\NETSH.TXT >"+fRepEnCours()+"\RESULNET.TXT"+Caract(34) nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
Sablier(Faux)
FIN
<Il faut environ 3 à 5 secondes pour que la commande soit effective
par
|
| |
| |
| | | |
|
| | |
| |
Publicado em janeiro, 13 2005 - 9:53 AM |
génial ca marche ... pour une carte réseau
et pour le PPP , j'y arrive pas !
"Rémy" <remy.bisson@cegeinformatique.com> a écrit dans le message de
news:41e3c991@news.pcsoft.fr...
Voici le code que j'utilise :
lpCmdLine est une chaîne =""
nCmdShow est un entier=0
nRetour est un entier
fSupprime(fRepEnCours()+"\IPCONFIG.TXT")
lpCmdLine="CMD.EXE /C "+Caract(34)+"IPCONFIG.EXE
"+fRepEnCours()+"\IPCONFIG.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
<L'utilisation de l'API permet d'éxécuter une commande DOS en mode
invisible>
<Traiter le fichier retourné IPCONFIG.TXT pour récupérer la passerelle> <Puis pour changer la configuration : > ftmp=fOuvre(fRepEnCours()+"\NETSH.TXT",foCréation) SI ftmp>0 ALORS fEcritLigne(ftmp,"interface") fEcritLigne(ftmp,"ip") fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+"
source=static addr="+ip_Adresse+" mask%5.255.255.0")
> fEcritLigne(ftmp,"set address name="+Caract(34)+nom_reseau+Caract(34)+"
gateway="+ip_passerelle+" gwmetric=1")
fFerme(ftmp)
fSupprime(fRepEnCours()+"\RESULNET.TXT")
Sablier(Vrai)
lpCmdLine="CMD.EXE /C "+Caract(34)+"NETSH.EXE EXEC
"+fRepEnCours()+"\NETSH.TXT >"+fRepEnCours()+"\RESULNET.TXT"+Caract(34)
nRetour=API("kernel32","WinExec" , &lpCmdLine, nCmdShow)
Sablier(Faux)
FIN
<Il faut environ 3 à 5 secondes pour que la commande soit effective par le
système en dynamique>
|
| |
| |
| | | |
|
| | |
| |
Publicado em agosto, 06 2005 - 5:19 PM |
sltr
merci pour le code c interessant mais j'ai un petit probleme:qd je l'execute il me donne l'erreur suivante ds le fichier texte RESULNET.TXT "Interface non valide connexion au réseau local sp‚cifi‚e." sachant que j'ai mis comme nom du réseau "connexion au résau
local" et que la commande dos toute seule s'execute bien sous l'interface noir de DOS .
aider moi SVP |
| |
| |
| | | |
|
| | | | |
| | |
|