Scripting - Restaurar relaciones de confianza

:( sigo con errores.. te adjunto el archivito pero tengo el
presentimiento que tamos cerca ehhh jejeje

todo esto lo hago por que con el comando netdom no puedo lograr restablecer
el canal seguro entre un win2k prof y el DC

salu2 y gracias Jose

Jamon

"José Antonio Quílez [MS MVP]" escribió en el
mensaje news:
tu script

Set objComputer = comercio
("LDAP://CN=comercio,CN=Computers,DC=interno,DC=empresa,DC=com")
objComputer.SetPassword "comercio$"

el original

Set objComputer = GetObject _
("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=COM")
objComputer.SetPassword "atl-dc-01$


¿ves la diferencia? Por un lado pones el nombre "comercio" en el lugar de la
función GetObject, y por otro te está ocurriendo lo típico del ajuste de
linea, que son las lineas de comando partidas.
La cadena ("LDAP://CN) debe seguir a la función GetObject en la misma
linea; lo que permite VBScript es que para facilitar la lectura, puedes
"partir" la linea con el signo de subrayado, y te considera la siguiente
linea como si estuviese en lugar del mismo.

El código correcto deben ser sólo dos lineas como sigue, o tres si partes
con _

Set objComputer = GetObject
("LDAP://CN=comercio,CN=Computers,DC=interno,DC=empresa,DC=com")
objComputer.SetPassword "comercio$"


Saludos

José Antonio Quílez [MS MVP]
Sevilla - España

_________________


"Diego Sosnitsky" escribió en el mensaje
news:

jeje.. ok ok.. justo apareciste cuando postee un mensaje de S.O.S :)

ahora te pasteo el scripts

<paste>

Set objComputer = comercio
("LDAP://CN=comercio,CN=Computers,DC=interno,DC=empresa,DC=com")
objComputer.SetPassword "comercio$"

</paste>

"José Antonio Quílez [MS MVP]" escribió en el
mensaje news:OtGq%
¿puedes adjuntar el script exactamente como lo tienes cuando te da el

error?

No quites ni un sólo carácter

Saludos

José Antonio Quílez [MS MVP]
Sevilla - España

_________________


"Diego Sosnitsky" escribió en el mensaje
news:ecL$
> mmm, mira te cuento lo que hice
>
> segui tal cual tus instrucciones y me tiro un error, el mismo esta
adjuntado
> en el archivo "error 1.gif"
>
> por lo que modifique el script en la linea 1 y lo deje asi
>
> Set objComputer = comercio (donde comercio es el nombre de la pc que
perdio
> la relacion de confianza con el DC)
>
> luego, ejecuto el script modificado y me tira un segundo error, pero

esta

> vez en la linea 2, que a continuacion te adjunto el archivo "error

2.gif"

>
> y ahi ya no se que hacer
>
> por otra parte, en la linea tres modifique esto, decime si esta bien
>
> objComputer.SetPassword "comercio$ (ahi remplaze "atl-dc-01"$ por la
palabra
> comercio, donde comercio es el nombre de la pc que perdio la relacion de
> confianza con el DC)
>
> espero que vaya orientado
>
> un salu2 y desde ya muchas gracias
>
> Jamon
>
>
>
> "José Antonio Quílez [MS MVP]" wrote in message
> news:%
> Set objComputer = GetObject _
> ("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=COM")
> objComputer.SetPassword "atl-dc-01$"
>
> CN=atl-dc es el nombre del equipo
> CN=Computers es la OU en la que está la cuenta del equipo en AD, por
defecto
> Computers, aunque puede perfectamente estar en otra OU
> DC=fabrikam,DC=COM es la forma de escribir el dominio fabrikam.com ;
puede
> tener tantas entradas DC= como palabras separadas por . tenga el nombre
del
> dominio
>
> Las tres lineas las pones en un archivo con extensión .vbs y lo ejecutas
con
> doble click habiendo hecho login con un usuario admin del dominio. Hazlo
en
> un equipo que esté en ese momento conectado al dominio.
>
> Saludos
>
> José Antonio Quílez [MS MVP]
> Sevilla - España
>
> _________________
>
>
> "Diego Sosnitsky" escribió en el mensaje
> news:
> > Buenas foro en un ambiente de dominio, con estaciones win2k, una

de

> > ellas ha perdido la relacion de confianza (el canal seguro de
> comunicacion)
> > con el DC. Con el comando netdom no puedo solucionarlo me y
navegando
> > enconre este script en la pagina de MS - technet - pero se me hace
confuso
> > entenderlo para aplicarlo
> >
> > çAlguno me puede tirar una mano que debo hacer para correr el scripts
> este?
> > gracias a todos . salu2
> >
> > Jamon
> > Scripting Steps
> > Listing 9.9 contains a script that resets a computer account password.
To
> > carry out this task, the script must perform the following steps:
> >
> > 1.. Use a GetObject call to bind to the computer account in Active
> > Directory.
> > 2.. Use the SetPassword method to reset the password to the original
> > computer password: the computer name, with a dollar sign ($) appended

to

> it.
> > Listing 9.9 Resetting a Computer Account Password
> >
> > 1
> > 2
> > 3
> > Set objComputer = GetObject _
> > ("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=COM")
> > objComputer.SetPassword "atl-dc-01$"
> >
> >
>
>
>
>

begin 666 error.gif
M1TE&.#EAL@&C`*(``````/___P``@-30R/\``( ``(" @/___R'Y! $```<`
M+ ````"R`:,```/_&+K<_C#*2:N]..O-N_]@*(XD.9QHJJYLZ[YP+,]T;=]X
MKN]\[__ 8%! +!J/R*1RR6PZG]"H=$JM6J_8K';+[7J_X+!X3"Z;S^BT>LUN
MN]_PN'Q.9UX`];Q^S^_[U0$R!GA;"G^'B(F*BUV!,8,"AI$!1(:2=I1<#4Z7
M1YV5F9-0GXREIJ=HC@,``"FL)Y"2LJ&<M%BD5J27N$F\J+_ P56JJZW%*+&9
MLZ*;H O.RI26T9VZSY;,#-!&N]2AVMK"XN/D2L3%K\B$TZ+9H.WL[NRXSw
MTM'MW [P^/OE``...W<L!:1)_-PIC#?/7[A]]_Z]6V:M"$-\RP1JW,CH_QRK
M=+#6S<I'D:3)A \]^;/X;64\B0N]Z>-(LZ8>8NE 'NS'DF?)=SQAJIS9S:<M
M?1?_^;+)M&DJ%" +[LP8$YI,H"-M-4.X,MLS9S"S;@/KM*S9,@19[!2V]*S;
MMWS2KE@;K"W<NWC?!## MZ]?OX3R"AY,&,O'PX@/%U[,N+'CQY CCQ%"N;+E
:][,N;/GSZ!#BQY-NK3ITZA3JU[-NK7KU[!CRYY-N[;MV[ASZ][-N[?O
MW\"#"Q].O+CQX\B3*U_.O+GSY]"C2Y].O;KUZ]BS:]_.O;OW[[L+B!\O'KSY
M\]S'$UC/?OUX]/#C/R_0OG[]`LF-A=:/FG]O__^<\1<5"P#>4&!E!^,
MLE?>#XîJ *$THH6H2N0/619Q76X!^&%$(=;@*#!V:B*(,*M) 7X,P
MNN=#BYW1*(2-$+I0XHB;X:ACAB_LJ(.0*_+@'-G"BS'&B)^1*VQXPH9"
,.B(XQ4KJ2TY>M@&1EEQB2F5,0!58)I)EABDAEB6!R"2:%<6H8%8!C
MAOF*GF+F.666<L(YYXEMH@/HB(6R>:BA0!*JZ U,-ME@`0;T8*6;C19***8\
M_LFCI@)F>N*H'XZZZ9\[$FHAFF*JH7*+*Z:FFM@"JJ1^>*:NGM-ZJ*I&^
MNAEKJ)[*R:NFN-;Z:;+_2D:Z7@`Q0GM?I3-NB6RJ$;Z*:)?,@EBKMK%NR>RL
M>EY68;B[TCHNJ=:N6Q"=>Y)K:[O NEMNJX#&BVJVLR;+;K[WTCLON@'7X"P!
M"S28\'TYJGJLLMJF2ZRZC:X[K+:%&;'&Z#^<*J[P$0KQLQAH6VZF[
M(8OZK[)9FEPRP2D;7%\#]N'<'J75>HRRS_ZVS.NWG%XLL;]?6_31
M'@_]\\H8GTRRRD$'"[7+-$O-\L1$#P3H_RX!]E%)KX*.,EJDKJ?IZ*RZC
M7@:*=:"WSNWGT!!>*NR=?>+]K]W^[JDEO\5R>V6?,>>=[9W?!DYXE8."O#?M_V_C>OD,!YN]<-G3RG>;DL\=2'H.IW?6N></P,BSZ+6EGI^65&LF^V:KLWZV
MZWS![OOOK^6NN[2\JPW\\<B/)CS"H#.8=K7)1R]]#,)#X&3O!E;,X?3<+Y>[
M!,7C</L.M'=O/G"KZ]R\@]B3Z"K;9$)Y_OS#D;V[[FCW);ZK5V,])/T`1-_-
M[L>>YJ7->#3HV-_J!+T`.E W]B/>`"7HGO:YKVHNL]0#-Y@;LD4K?Q;T$/^V
MYC_4<?"$MEE>DPZ(P 1BB7*"0I?XRH?"&J9&A=<+H0UWR#T<.D]_/ RB^18D
M*0>Q4(A(Y)X!?,C"%B;QB;];(A'1)IZ_7 B*6!0.7__(0YZ_.'%(W/I1R4R8
MQ3*"QHMH_"(9-3A#,[KQC&BD3)K.1#A#[2U12WNC'H,SH8)9[F1AX]L>!YF;
M.>HK7T0#F-BT1\A&QBZ/O>I7(,_ER$J.#DF1_*/0!#D^2WI20GFZUATGI[TP
M?O*4J$RE*E?)RE:Z\I6PC&42.UF[,8J0C1>BI2Q!:<H>(4Y^M81D`GNV'SGN
M$C.ZO& PR3<#',D.634ZIFU*U292RC![I1Q4-8MVQ\@%+DK=/%K;VC8@;'US
MA*,T6BCM!+=DQM)M,>O6,I/D-Z_MJV4_<YC#D#8U6=7+:GP3$,WJ]3:M!52:
M.)A9,<DYS6B1Q-.V(+?_KTL-E%__W*3@/O5+Q&@.2YJ4&T+7^+!-XI*3
MT%/NET9&%:* O719 ,UE2F=K4I'D;*4-M"K3_,7*E+@5J4,&6M9ENLZ;\
M[!1!C8I!<;J3E1X-6ST7V<Q?8BYSA0LGU\+HMHGI35>5LY/C%%<WJ66NGG;;
MZ%-URM:VNO6M<(VK7.=*U]A(M*YX16;\ED9+^,6ICH\2:5Z#V")=]M-DA\WI
M8 E+(,FU$[ L:JI7Q=F_Q>[PKBM%&57AU=*5=2UQ-+0L!S$;+,TV4[*>Y>E-
M15M#TH[+M)$E8= 2^;+9LK:UF"PMR4R46'O.%*FW;>WE$-?5>;)S49BKFS8?
M%]^YQK<Y=;"^C2]WJ6O>ZV)T.;RF673WV$KJ;16=W!QG(`)WVFN/-(C5/
M5=RYA9>C!:5I>M7[4H@:%+WS:JEBYPO%]4*MH\J<6GGYBT3_"A6X26+J?@D\
M2Z;=MW"GU:]M&3Q+,4V4E"7DV(792^%4&G9_';;D=$\:VQ";^,0H3K&*5\SB
M%KOXQ3".L8QG3.,:V_C&.,ZQCG?,XQ[[^,= #K*0ATSD(MLP,4A.LI*7S.0F
M-]G(YP% ":9<@>9"'MEWF1Y-UON\G>^O*EMFKG,:#ZSFM/,9F.$
M6<S=^3*7T32 -\-Y.V3.C9WOG!TYNY"D4-HSGZ^3YZH"NML'@AYT=?P<6T$M
MJKT6'6:B%:U=N8A1AH=]WPTF3>GH,#K!M8VJ)$$J:2MW>CF%1I&H4TM9:,Z
MTZ=VSJ>#-$()FS2RL(XU<U)-ZXD^VDR(]%&N=:V<6:_*7'4V-;&-P^MC8V;8
MRSZ.L673"FA'NSAD7K.VV\SM;6\[V7.^MFJ:31MKBULX4DZCNM?-[G:[.XW*
M/C=PG$SO>MO[WO)NSKWWS>]^ASO?``^XP =.\((;_. (3[C"%\[PACO\X1 _
?^+LG3O&*6_SB&,^XQC?.\8Y[_.,@#[G(1Q[R! ``.P``
`
end

Joe... el error era de tipeo :) - ahora corre bien pero no me restaura
nada.. o sea termino de ejecutar ese scritp - hago \\comercio\c$

y me tira el errror

"Error en la relacion de confianza entre la estacion de trabajo y el dominio
principal"

hay que reiniciar? que pasos se siguen luego de correr ese script

gracias

JAmon

"Diego Sosnitsky" escribió en el mensaje
news:

:( sigo con errores.. te adjunto el archivito pero tengo el
presentimiento que tamos cerca ehhh jejeje

todo esto lo hago por que con el comando netdom no puedo lograr

restablecer

el canal seguro entre un win2k prof y el DC

salu2 y gracias Jose

Jamon

"José Antonio Quílez [MS MVP]" escribió en el
mensaje news:
tu script

Set objComputer = comercio
("LDAP://CN=comercio,CN=Computers,DC=interno,DC=empresa,DC=com")
objComputer.SetPassword "comercio$"

el original

Set objComputer = GetObject _
("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=COM")
objComputer.SetPassword "atl-dc-01$


¿ves la diferencia? Por un lado pones el nombre "comercio" en el lugar de

la

función GetObject, y por otro te está ocurriendo lo típico del ajuste de
linea, que son las lineas de comando partidas.
La cadena ("LDAP://CN) debe seguir a la función GetObject en la misma
linea; lo que permite VBScript es que para facilitar la lectura, puedes
"partir" la linea con el signo de subrayado, y te considera la siguiente
linea como si estuviese en lugar del mismo.

El código correcto deben ser sólo dos lineas como sigue, o tres si partes
con _

Set objComputer = GetObject
("LDAP://CN=comercio,CN=Computers,DC=interno,DC=empresa,DC=com")
objComputer.SetPassword "comercio$"


Saludos

José Antonio Quílez [MS MVP]
Sevilla - España

_________________


"Diego Sosnitsky" escribió en el mensaje
news:
> jeje.. ok ok.. justo apareciste cuando postee un mensaje de S.O.S :)
>
> ahora te pasteo el scripts
>
> <paste>
>
> Set objComputer = comercio
> ("LDAP://CN=comercio,CN=Computers,DC=interno,DC=empresa,DC=com")
> objComputer.SetPassword "comercio$"
>
> </paste>
>
> "José Antonio Quílez [MS MVP]" escribió en el
> mensaje news:OtGq%
> ¿puedes adjuntar el script exactamente como lo tienes cuando te da el
error?
> No quites ni un sólo carácter
>
> Saludos
>
> José Antonio Quílez [MS MVP]
> Sevilla - España
>
> _________________
>
>
> "Diego Sosnitsky" escribió en el mensaje
> news:ecL$
> > mmm, mira te cuento lo que hice
> >
> > segui tal cual tus instrucciones y me tiro un error, el mismo esta
> adjuntado
> > en el archivo "error 1.gif"
> >
> > por lo que modifique el script en la linea 1 y lo deje asi
> >
> > Set objComputer = comercio (donde comercio es el nombre de la pc que
> perdio
> > la relacion de confianza con el DC)
> >
> > luego, ejecuto el script modificado y me tira un segundo error, pero
esta
> > vez en la linea 2, que a continuacion te adjunto el archivo "error
2.gif"
> >
> > y ahi ya no se que hacer
> >
> > por otra parte, en la linea tres modifique esto, decime si esta bien
> >
> > objComputer.SetPassword "comercio$ (ahi remplaze "atl-dc-01"$ por la
> palabra
> > comercio, donde comercio es el nombre de la pc que perdio la relacion

de

> > confianza con el DC)
> >
> > espero que vaya orientado
> >
> > un salu2 y desde ya muchas gracias
> >
> > Jamon
> >
> >
> >
> > "José Antonio Quílez [MS MVP]" wrote in

message

> > news:%
> > Set objComputer = GetObject _
> > ("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=COM")
> > objComputer.SetPassword "atl-dc-01$"
> >
> > CN=atl-dc es el nombre del equipo
> > CN=Computers es la OU en la que está la cuenta del equipo en AD, por
> defecto
> > Computers, aunque puede perfectamente estar en otra OU
> > DC=fabrikam,DC=COM es la forma de escribir el dominio fabrikam.com ;
> puede
> > tener tantas entradas DC= como palabras separadas por . tenga el

nombre

> del
> > dominio
> >
> > Las tres lineas las pones en un archivo con extensión .vbs y lo

ejecutas

> con
> > doble click habiendo hecho login con un usuario admin del dominio.

Hazlo

> en
> > un equipo que esté en ese momento conectado al dominio.
> >
> > Saludos
> >
> > José Antonio Quílez [MS MVP]
> > Sevilla - España
> >
> > _________________
> >
> >
> > "Diego Sosnitsky" escribió en el mensaje
> > news:
> > > Buenas foro en un ambiente de dominio, con estaciones win2k, una
de
> > > ellas ha perdido la relacion de confianza (el canal seguro de
> > comunicacion)
> > > con el DC. Con el comando netdom no puedo solucionarlo me y
> navegando
> > > enconre este script en la pagina de MS - technet - pero se me hace
> confuso
> > > entenderlo para aplicarlo
> > >
> > > çAlguno me puede tirar una mano que debo hacer para correr el

scripts

> > este?
> > > gracias a todos . salu2
> > >
> > > Jamon
> > > Scripting Steps
> > > Listing 9.9 contains a script that resets a computer account

password.

> To
> > > carry out this task, the script must perform the following steps:
> > >
> > > 1.. Use a GetObject call to bind to the computer account in Active
> > > Directory.
> > > 2.. Use the SetPassword method to reset the password to the

original

> > > computer password: the computer name, with a dollar sign ($)

appended

to
> > it.
> > > Listing 9.9 Resetting a Computer Account Password
> > >
> > > 1
> > > 2
> > > 3
> > > Set objComputer = GetObject _
> > > ("LDAP://CN=atl-dc-01,CN=Computers,DC=fabrikam,DC=COM")
> > > objComputer.SetPassword "atl-dc-01$"
> > >
> > >
> >
> >
> >
> >
>
>