Поиск по сайту

Да как же скинуть те его?
Это просто дурачки запустили,да обос...лись что дисковод как бешенный))
Сделай файл .vbs и напиши там

MsgBox "Дисковод сломался xD" 
Set ovladani = CreateObject("WMPlayer.OCX.7" )
Set mechaniky = ovladani.cdromCollection
If mechaniky.Count  Then
For i = 0 To mechaniky.Count - 1 
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject
mechaniky.Item(i).Eject

Next
End If

Потом запусти,какой эффект?

В общем решил распотрошить файлы завалявшиеся и посмотреть на ваши лица испуганные))
Вреда они не несут,но все же я не несу ответственности за ваши деяния
Вот прикол номер один))
Уровень опастности: Не особо опасен
Файл ))))).vbs
Содержание:

Set OpSysSet = GetObject("winmgmts:{(Shutdown)}//./root/cimv2").ExecQuery("select * from Win32_OperatingSystem where Primary=true") 
for each OpSys in OpSysSet
OpSys.ShutDown()
next
msgbox "Отчет начался)) :) "

Запустите и вы обрадуетесь)))))
Прикол номер 2.
Уровень опастности: Низкий
Содержание файла caps.vbs

MsgBox "Смотри на свои индикаторы на клавиатуре xD" 
Set S = CreateObject("Wscript.Shell")
do
wscript.sleep 200
s.sendkeys"{capslock}"
wscript.sleep 200
s.sendkeys"{numlock}"
wscript.sleep 200
s.sendkeys"{scrolllock}"
loop 

Ёлочка Ыы
Прикол 3й.
Уровень...

Всем привет. Возникла трудность с данными, получаемыми через аякс.
Суть такова:
есть файл php к которому обращается браузер. Этот файл генерирует список предметов и создает html страницу с кнопками вывода этих предметов по сортировке. Эти кнопки через аякс подтягивают эти предметы в виде ссылок, при нажатии на которые должно всплыть окно со списком действий.

	switch( $list ) {
		case 'all':            // выбор сортировки
			$items  = $user[ 'items' ];
			$count  = count( $user[ 'items' ] );
			$return = true;
			break;
...............
		for( $i = $start; $i<($start + LIST_INV) && $i<$count; $i++ ) {
..........
		$rez[ 'text' ] .= '<a id="modal"...

а что тут не правильно ?

    /**
     * Комментарии
     *
     * @param int       $id
     * @param Request   $request
     * @param Validator $validator
     * @param Flood     $flood
     *
     * @return string
     */
    public function comments(int $id, Request $request, Validator $validator, Flood $flood): string
    {
        /** @var Article $article */
        $item = Item::query()->find($id);

        if (!  $item) {
            abort(404, __('blogs.article_not_exist'));
        }

        if ($request->isMethod('post')) {
            $user = getUser();
            $msg  = $request->input('msg');

            $validator
                ->true($user, __('main.not_authorized'))
                ->equal($request->input('token'), $_SESSION['token'], __('validator.token'))
                ->length($msg, 5, setting('comment_length'), ['msg' => __('validator.text')])
                ->false($flood->isFlood(), ['msg' => __('validator.flood', ['sec' => $flood->getPeriod()])]);

            if ($validator->isValid()) {
                /** @var Comment $comment */
                $comment = $item->comments()->create([
                    'text'        =>...

5, Еще раз спасибо, Im-ieee. Только понадобился код. Взял с темы.

Сделал следующее:

<?php
			@mysql_query("DELETE FROM `messages` WHERE `dialog`='$loginid' AND `id`<(SELECT min(`id`) FROM (SELECT `id` FROM `messages` WHERE `dialog`='$loginid' ORDER BY `id` DESC LIMIT 5) X )");
?>

Messages - таблица с сообщениями пользователей. Limit 5 - лимит на хранение сообщений. Dialog - это уникальный номер беседы, он соответствует ID юзера. То есть, если мой ID=90, то и Dialog будет 90.

ПРавивльно ли я сделал?

2 вопроса:
1. он удаляет же DESC по "старости"? По ID... У меня есть поле when, там время с датой в формате DATETIME....

Код popup.js

$(document).ready(function(){
    
        $('#btn_submit').click(function(e){
       
      e.preventDefault();

       
     
     var input = $('#input').val();
    
     
                 
    $.ajax({
                  
                url: "<a href="http://sayt.ru/script.php",">http://sayt.ru/script.php",</a>
                type: 'GET',
                data: ({url: input}),
                dataType: "html",
                cache: false,
                success: function(data) {
                    
                    
                    var html = '<b>Нажмите (Вставить данные) для заполнения полей</b>';

                        $('body').append("<div id='fbPopup' class='dle-promt' title='Полученные данные' style='display:none'>"+html+"</div>");

                        $('#fbPopup').dialog({
                            autoOpen: true,
                            resizable: false,
                            width: "auto",
                            dialogClass: "modalfixed",
                            buttons: {
                                "Отмена": function() {
                                    $( this ).dialog( "close" );
                                },
                                "Вставить данные": function() {
                                    insert_data_rufbru(data.result);
                                    $( this ).dialog( "close" );
                                }
                            }
                        });

                        $('.modalfixed.ui-dialog').css({position:"fixed"});
                     
                    

                
                }
    
           
    });  
     
   });
  
  
   function insert_data_rufbru(data){
   console.log(data);
   }
  
 });

Заранее спасибо откликнувшимся.

Блин, ребят, не особо шарю в регулярках(( помогите, плис.
<a class="cat soft" href="/soft" itemprop="articleSection">Софт</a><div class="author">
<time datetime="2018-06-21T17:13:09" itemprop="datePublished">21 июня 2018, 17:13</time> | <a href="https://блабла" rel="author" itemprop="author">Автор</a>
</div>
<div itemprop="articleBody">
<p itemprop="description">тест</p>

Нужно обрезать от начала до тега <div itemprop="articleBody"> (далее ниже так же будет идти текст, нужно вот только шапку эту убрать)

Заранее спасибо!

Да, знаю, клоны амулета уже не популярны, но я делаю веб версию на инглише-глобал.
Проблема у меня такова: как ПРИМЕРНО написать код я знаю, а как правильно-нет.
Мне нужно, чтобы с монстра МОГЛО упасть несколько видов шмота с таким или иным шансом, и в количестве от х то у. Вот на пример:

"loc.mles.16"=>array(
"npc.crim.volk"=>array(
"title"=>"волк",
"life"=>"35",
"life_max"=>"35",
"war"=>"80|10|13|6|0|0|10|20|2|0|0|0|зубами|16||",
"items"=>array("item.misc.money"=>"монеты|50|1"),
"bonus"=>array("item.quest.bone"=>"50|2|5=Bone|20"),
"osvej"=>"item.food.meat=мясо:1:10:4:0:,item.hunter.skin.wolf=шкура волка:1:10,item.hunter.teeths=клыки:1:8",
"respawn"=>"loc.mles.16|600|1200",
"move"=>"1|20|180",
),
),

items-падает всегда, формула стандартная.
bonus-с шансом упасть. В этом случае может упасть item.quest.bone с шансом 50%, количеством от 2 до 5. За => идёт title|count|cost. count по идее от 2 до 5, но не...

так и есть впринципе. но сейчас делаю немного по другому - получаю отдельно объекты папок и отдельно объекты файлов (за вычетом оффсета папок), затем склеиваю в результатирующий объект. выглядит примерно так:

<?php
    /**
     * Get items for listing
     *
     * @param int $directory_id Directory id
     * @param int $limit Limit
     * @param int $offset Offset
     * @return stdClass
     */
    public static function items_for_list($directory_id = 0, $limit = 10, $offset = 10)
    {
        // Get directories
        $directories = ORM::factory('downloads_directory')
            ->where('parent_id', '=', $directory_id)
            ->limit($limit)
            ->offset($offset)
            ->reset(FALSE);
            
        $count_directories = $directories->count_all();
         
        // Get items   
        $items = ORM::factory('downloads_item')
            ->where('directory_id', '=', $directory_id)
            ->limit($limit - count($directories))
            ->offset($offset)...

procedure Tu1.N1Click(Sender: TObject);
 
var st: string;
begin
//AssignFile(f1,'users\'+log+'\'+log+'v1.txt'); // привязка названия к переменной
{$I+}
reset(f1);
{$I-}
read(f1,st);
if st='' then
begin
  test1.show;
  exit;
end;
if st='end' then
begin
  showmessage('Ты *** шоли? Ты прошел тест.');
  exit;
end;
readln(f1,st);
test1.RadioGroup1.ItemIndex:=strtoint(st);
readln(f1,st);
test1.RadioGroup2.ItemIndex:=strtoint(st);
readln(f1,st);
test1.RadioGroup3.ItemIndex:=strtoint(st);
readln(f1,st);
test1.RadioGroup4.ItemIndex:=strtoint(st);
readln(f1,st);
test1.RadioGroup5.ItemIndex:=strtoint(st);
closefile(f1);
test1.show;
end;

Появляется такая ошибка в строке test1.RadioGroup1.ItemIndex:=strtoint(st);
http://upwap.ru/d/2109151/2c1390ed56bea4e0f5a65f004f69e204/Безымянный.JPG