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
Gilles LAURENT
"J.delmas" <santiag(at)netcourrier.com(eret)re> a écrit dans le message de news:% | Salut à tous,
Bonjour,
| J'aimerais faire un script pour créer une connexion vpn : fixer le | nom du serveur et décocher la case passerelle par défaut dans le | tcp-ip.
Ci-dessous le script VBScript 'createVpnConnection' permettant de créer une connexion vpn en ligne de commande. Ce script d'exemple permet uniquement de créer une nouvelle connexion. Il devra être compléter pour éventuellement supporter la suppression et/ou la modification d'une connexion vpn existante.
+++ Exemple >cscript createVpnConnection.vbs "Mon VPN" MONSERVER
Note : La connexion vpn est créée pour l'utilisateur courant avec les paramètres de configuration par défaut. Toutefois, la passerelle par défaut pour le réseau distant n'est pas utilisée (i.e option décochée).
--- Coupez ici : createVpnConnection.vbs ---
Option Explicit
' déclaration des variables Dim oSh, oFs, oFile Dim nCount Dim strGuid, strPbkPath
' initialisation des objects Set oSh = CreateObject ("WScript.Shell") Set oFs = CreateObject ("Scripting.FileSystemObject")
' génération d'un guid pour la connexion Randomize (Time ()) For nCount = 0 To 31 strGuid = strGuid + Hex (15*Rnd ()) Next
' détermination du chemin vers le dossier pbk privé strPbkPath = _ oSh.ExpandEnvironmentStrings ("%UserProfile%") & _ "Application DataMicrosoftNetworkConnectionsPbk"
-- Gilles LAURENT Me contacter : http://cerbermail.com/?zoTY7ZkLcD
"J.delmas" <santiag(at)netcourrier.com(eret)re> a écrit dans le message
de news:%23UVpNDc8GHA.3280@TK2MSFTNGP02.phx.gbl
| Salut à tous,
Bonjour,
| J'aimerais faire un script pour créer une connexion vpn : fixer le
| nom du serveur et décocher la case passerelle par défaut dans le
| tcp-ip.
Ci-dessous le script VBScript 'createVpnConnection' permettant de créer
une connexion vpn en ligne de commande. Ce script d'exemple permet
uniquement de créer une nouvelle connexion. Il devra être compléter pour
éventuellement supporter la suppression et/ou la modification d'une
connexion vpn existante.
+++ Exemple
>cscript createVpnConnection.vbs "Mon VPN" MONSERVER
Note : La connexion vpn est créée pour l'utilisateur courant avec les
paramètres de configuration par défaut. Toutefois, la passerelle par
défaut pour le réseau distant n'est pas utilisée (i.e option décochée).
--- Coupez ici : createVpnConnection.vbs ---
Option Explicit
' déclaration des variables
Dim oSh, oFs, oFile
Dim nCount
Dim strGuid, strPbkPath
' initialisation des objects
Set oSh = CreateObject ("WScript.Shell")
Set oFs = CreateObject ("Scripting.FileSystemObject")
' génération d'un guid pour la connexion
Randomize (Time ())
For nCount = 0 To 31
strGuid = strGuid + Hex (15*Rnd ())
Next
' détermination du chemin vers le dossier pbk privé
strPbkPath = _
oSh.ExpandEnvironmentStrings ("%UserProfile%") & _
"Application DataMicrosoftNetworkConnectionsPbk"
"J.delmas" <santiag(at)netcourrier.com(eret)re> a écrit dans le message de news:% | Salut à tous,
Bonjour,
| J'aimerais faire un script pour créer une connexion vpn : fixer le | nom du serveur et décocher la case passerelle par défaut dans le | tcp-ip.
Ci-dessous le script VBScript 'createVpnConnection' permettant de créer une connexion vpn en ligne de commande. Ce script d'exemple permet uniquement de créer une nouvelle connexion. Il devra être compléter pour éventuellement supporter la suppression et/ou la modification d'une connexion vpn existante.
+++ Exemple >cscript createVpnConnection.vbs "Mon VPN" MONSERVER
Note : La connexion vpn est créée pour l'utilisateur courant avec les paramètres de configuration par défaut. Toutefois, la passerelle par défaut pour le réseau distant n'est pas utilisée (i.e option décochée).
--- Coupez ici : createVpnConnection.vbs ---
Option Explicit
' déclaration des variables Dim oSh, oFs, oFile Dim nCount Dim strGuid, strPbkPath
' initialisation des objects Set oSh = CreateObject ("WScript.Shell") Set oFs = CreateObject ("Scripting.FileSystemObject")
' génération d'un guid pour la connexion Randomize (Time ()) For nCount = 0 To 31 strGuid = strGuid + Hex (15*Rnd ()) Next
' détermination du chemin vers le dossier pbk privé strPbkPath = _ oSh.ExpandEnvironmentStrings ("%UserProfile%") & _ "Application DataMicrosoftNetworkConnectionsPbk"
-- Gilles LAURENT Me contacter : http://cerbermail.com/?zoTY7ZkLcD
J.delmas
Merci pour ces tuyaux, je vais approfondir. Je suis à la fac et j'apprends peu à peu le c++, donc je pense que dans qq temps je pourrais me pencher sur vbs sans trop de difficulté. Merci beaucoup
Bonne fin de soirée. Dsl pour mon retard dans ma réponse.
"Gilles LAURENT" a écrit dans le message de news:
"J.delmas" <santiag(at)netcourrier.com(eret)re> a écrit dans le message de news:% | Salut à tous,
Bonjour,
| J'aimerais faire un script pour créer une connexion vpn : fixer le | nom du serveur et décocher la case passerelle par défaut dans le | tcp-ip.
Ci-dessous le script VBScript 'createVpnConnection' permettant de créer une connexion vpn en ligne de commande. Ce script d'exemple permet uniquement de créer une nouvelle connexion. Il devra être compléter pour éventuellement supporter la suppression et/ou la modification d'une connexion vpn existante.
+++ Exemple >cscript createVpnConnection.vbs "Mon VPN" MONSERVER
Note : La connexion vpn est créée pour l'utilisateur courant avec les paramètres de configuration par défaut. Toutefois, la passerelle par défaut pour le réseau distant n'est pas utilisée (i.e option décochée).
--- Coupez ici : createVpnConnection.vbs ---
Option Explicit
' déclaration des variables Dim oSh, oFs, oFile Dim nCount Dim strGuid, strPbkPath
' initialisation des objects Set oSh = CreateObject ("WScript.Shell") Set oFs = CreateObject ("Scripting.FileSystemObject")
' génération d'un guid pour la connexion Randomize (Time ()) For nCount = 0 To 31 strGuid = strGuid + Hex (15*Rnd ()) Next
' détermination du chemin vers le dossier pbk privé strPbkPath = _ oSh.ExpandEnvironmentStrings ("%UserProfile%") & _ "Application DataMicrosoftNetworkConnectionsPbk"
-- Gilles LAURENT Me contacter : http://cerbermail.com/?zoTY7ZkLcD
Merci pour ces tuyaux, je vais approfondir.
Je suis à la fac et j'apprends peu à peu le c++, donc je pense que dans qq
temps je pourrais me pencher sur vbs sans trop de difficulté. Merci beaucoup
Bonne fin de soirée.
Dsl pour mon retard dans ma réponse.
"Gilles LAURENT" <glsft@free.fr> a écrit dans le message de news:
u3dIB7f8GHA.4552@TK2MSFTNGP05.phx.gbl...
"J.delmas" <santiag(at)netcourrier.com(eret)re> a écrit dans le message
de news:%23UVpNDc8GHA.3280@TK2MSFTNGP02.phx.gbl
| Salut à tous,
Bonjour,
| J'aimerais faire un script pour créer une connexion vpn : fixer le
| nom du serveur et décocher la case passerelle par défaut dans le
| tcp-ip.
Ci-dessous le script VBScript 'createVpnConnection' permettant de créer
une connexion vpn en ligne de commande. Ce script d'exemple permet
uniquement de créer une nouvelle connexion. Il devra être compléter pour
éventuellement supporter la suppression et/ou la modification d'une
connexion vpn existante.
+++ Exemple
>cscript createVpnConnection.vbs "Mon VPN" MONSERVER
Note : La connexion vpn est créée pour l'utilisateur courant avec les
paramètres de configuration par défaut. Toutefois, la passerelle par
défaut pour le réseau distant n'est pas utilisée (i.e option décochée).
--- Coupez ici : createVpnConnection.vbs ---
Option Explicit
' déclaration des variables
Dim oSh, oFs, oFile
Dim nCount
Dim strGuid, strPbkPath
' initialisation des objects
Set oSh = CreateObject ("WScript.Shell")
Set oFs = CreateObject ("Scripting.FileSystemObject")
' génération d'un guid pour la connexion
Randomize (Time ())
For nCount = 0 To 31
strGuid = strGuid + Hex (15*Rnd ())
Next
' détermination du chemin vers le dossier pbk privé
strPbkPath = _
oSh.ExpandEnvironmentStrings ("%UserProfile%") & _
"Application DataMicrosoftNetworkConnectionsPbk"
Merci pour ces tuyaux, je vais approfondir. Je suis à la fac et j'apprends peu à peu le c++, donc je pense que dans qq temps je pourrais me pencher sur vbs sans trop de difficulté. Merci beaucoup
Bonne fin de soirée. Dsl pour mon retard dans ma réponse.
"Gilles LAURENT" a écrit dans le message de news:
"J.delmas" <santiag(at)netcourrier.com(eret)re> a écrit dans le message de news:% | Salut à tous,
Bonjour,
| J'aimerais faire un script pour créer une connexion vpn : fixer le | nom du serveur et décocher la case passerelle par défaut dans le | tcp-ip.
Ci-dessous le script VBScript 'createVpnConnection' permettant de créer une connexion vpn en ligne de commande. Ce script d'exemple permet uniquement de créer une nouvelle connexion. Il devra être compléter pour éventuellement supporter la suppression et/ou la modification d'une connexion vpn existante.
+++ Exemple >cscript createVpnConnection.vbs "Mon VPN" MONSERVER
Note : La connexion vpn est créée pour l'utilisateur courant avec les paramètres de configuration par défaut. Toutefois, la passerelle par défaut pour le réseau distant n'est pas utilisée (i.e option décochée).
--- Coupez ici : createVpnConnection.vbs ---
Option Explicit
' déclaration des variables Dim oSh, oFs, oFile Dim nCount Dim strGuid, strPbkPath
' initialisation des objects Set oSh = CreateObject ("WScript.Shell") Set oFs = CreateObject ("Scripting.FileSystemObject")
' génération d'un guid pour la connexion Randomize (Time ()) For nCount = 0 To 31 strGuid = strGuid + Hex (15*Rnd ()) Next
' détermination du chemin vers le dossier pbk privé strPbkPath = _ oSh.ExpandEnvironmentStrings ("%UserProfile%") & _ "Application DataMicrosoftNetworkConnectionsPbk"
