Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1506 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [ VBS - Active Directory ] Fin d'instruction attendue

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[ VBS - Active Directory ] Fin d'instruction attendue

n°1540911
tuxy_co_ps​ylo
Mangez-Moi !! <8-)
Posté le 10-04-2007 à 17:08:04  profilanswer
 

Bonjour, voila en grOs mon problème.
 

Code :
  1. set shell = WScript.CreateObject("WScript.shell" )
  2. dim nto As New IADsNameTranslate


 
Quand je lance j'ai "Fin d'instruction Attendue."
 
Je débute en VBS , donc je ne sais pas trop.
Je pense qu'il doit y avoir une galère du coté de "wscript.CreateObject", mais je connais pas les composants ou librairies à inscrire.
 
 
Si quelqu'un a une idée.

mood
Publicité
Posté le 10-04-2007 à 17:08:04  profilanswer
 

n°1541161
tuxy_co_ps​ylo
Mangez-Moi !! <8-)
Posté le 11-04-2007 à 10:26:39  profilanswer
 

up
 
personne la dessus ?

n°1541192
Macromorph
Tu l'as vu ?
Posté le 11-04-2007 à 11:14:16  profilanswer
 

déjà c'est pas à la première ligne.
ensuite tu cherches à faire quoi ?

n°1541194
tuxy_co_ps​ylo
Mangez-Moi !! <8-)
Posté le 11-04-2007 à 11:18:54  profilanswer
 

quand je lance ce script j'ai une erreur fin d'instruction attendu a la deuxieme ligne.
 
Ce que je veux faire, c'est recuperer un objet ADSI par le provider LDAP, pour ensuite l'utiliser avec un provider WINNT
 
C'est pour ajouter des groupes globaux à des groupes locaux

n°1542040
Macromorph
Tu l'as vu ?
Posté le 12-04-2007 à 15:34:08  profilanswer
 

Perso je saurais pas te dire comme çà.
Y'a pas des exemples dans ScriptCenter ?
 
http://www.microsoft.com/technet/s [...] bs/ad.mspx


Message édité par Macromorph le 12-04-2007 à 15:35:16
n°1545440
jcdumas
Posté le 19-04-2007 à 21:59:04  profilanswer
 

Tu es sur que c'est du VBS que tu veux utiliser??
Car new n'existe pas en VBS (ou me trompje!)
 
Un exemple tiré de MSDN :

Code :
  1. Dim nto
  2.   const ADS_NAME_INITTYPE_SERVER = 2
  3.   const ADS_NAME_TYPE_1779 = 1
  4.   const ADS_NAME_TYPE_NT4 = 3
  5.   server = "aDsServer"
  6.   user   = "jeffsmith"
  7.   dom    = "Fabrikam"
  8.   passwd = "top secret"
  9.   dn = "CN=jeffsmith,CN=Users,DC=Fabrikam,DC=COM"
  10.   Set nto = Server.CreateObject("NameTranslate" )
  11.   nto.InitEx ADS_NAME_INITTYPE_SERVER, server, user, dom, passwd
  12.   nto.Set ADS_NAME_TYPE_1779, dn
  13.   result = nto.Get(ADS_NAME_TYPE_NT4)


Message édité par jcdumas le 19-04-2007 à 21:59:17

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  [ VBS - Active Directory ] Fin d'instruction attendue

 

Sujets relatifs
[VBS] [résolu]Pb avec fonction STRCOMPMessage sécurité active X injustifié
Modifier active directory en pl/sqlVBS : mise en forme texte dans popup
[MFC - C++] Probleme exécution instructionzone de dessin active en PHP
[VBS]exectution d'un exe via le compte admin[VBS] Ajout d'un utilisateur à un groupe AD
[Résolu] [VBS] Mappage réseaux selon le groupe de l'utilisateur AD 
Plus de sujets relatifs à : [ VBS - Active Directory ] Fin d'instruction attendue


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR