Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Сайт

Страница: 1 | 2 |

 

  Вопрос: Вечер воспоминаний Добавлено: 24.04.09 03:21  

Автор вопроса:  Sharp | Web-сайт: sharpc.livejournal.com | ICQ: 216865379 
Перегнал БД митуя к себе в MySQL до поста 187563 (2009-04-22 20:30:17) и попытаюсь подбить некоторые интересные мне статсы. Претензии к структуре БД и к орфографии не ко мне. В основном результаты приведены в CSV, что представляет собой хороший компромисс между читабельностью и моей ленью.


Митуй это 15533 человека, 5886 из которых написали 177243 постов в 24398 топиках общим размером 125.23 мегабайта, плюс 1.07 мегабайт на размер названий топиков. На форуме "спасибо" было сказано 5194 раз, а плохое слово из 3 букв всего 5 раз. В коде, который был выложен на форум, 24508 раз была объявлена переменная ключевым словом Dim и 4903 раза ее распечатывали Print. VB был упомянут 61770 раз, дотнет - 25913, Basic - 5448, ассемблер - 4743, C++ - 1890, богомерзкий паскакаль - 752 раза, а слово "квант" встретилось 95 раз. Кроме того, один раз вспомнили про древнее пламя Анора :)


Оглавление
Топ20 флудерс
Топ20 врайтерс
Топ10 простыней
Мистер улыбка
Топ3 по годам
Овер100 эпик-баттлы
Кто с кем бился в Эээээ
| или по размерам
Топ10 топикстартеров по числу постов в их топиках
| и по их длине
Города, где больше 10 митуевцев (сгруппировал ручками из более 5 упоминаний)
 
 
 
Топ20 флудерс

select count(*) as c, vbnet_users.id, username
 from vbnet join vbnet_users on vbnet.id_autor=vbnet_users.id
 group by id_autor
 order by c desc
 limit 20


"c","id","username"
"8352","1669","Sharp"
"8299","1165","HACKER"
"5880","3","Павел"
"5153","33","sne"
"4487","915","Steel Brand"
"4298","9","CyRax"
"3546","1908","Morpheus"
"3091","7","User Unknown"
"2515","2575","LamerOnLine"
"2215","579","EROS"
"1894","1493","Александр"
"1878","9800","Executioner"
"1856","4497","GSerg"
"1739","3816","someone"
"1726","4132","AgentFire"
"1652","2903","cresta"
"1651","6003","Arseny"
"1631","1724","mc-black"
"1623","3208","ZagZag"
"1525","8984","VBD"


Топ20 врайтерс

select sum(length(txt)) as s, count(*) as c, vbnet_users.id, username
 from vbnet join vbnet_users on vbnet.id_autor=vbnet_users.id
 group by id_autor
 order by s desc
 limit 20


"s","c","id","username"
"9447873","8299","1165","HACKER"
"4868128","4487","915","Steel Brand"
"4777582","5153","33","sne"
"4388589","8352","1669","Sharp"
"3147191","3546","1908","Morpheus"
"2950981","5880","3","Павел"
"2653832","2215","579","EROS"
"2644195","4298","9","CyRax"
"2638185","1623","3208","ZagZag"
"1756798","1006","2934","Neco"
"1751025","2515","2575","LamerOnLine"
"1730794","3091","7","User Unknown"
"1459936","1652","2903","cresta"
"1275054","1050","8130","-АлександР-"
"1175814","1028","5873","HOOLIGAN"
"1131962","1631","1724","mc-black"
"1074880","1856","4497","GSerg"
"1070026","1427","9396","Winand"
"1064746","1651","6003","Arseny"
"1052069","773","6539","vito"


Топ10 простыней

select length(txt), vbnet.id, thread_parent, username
 from vbnet join vbnet_users on vbnet.id_autor=vbnet_users.id
 order by length(txt) desc
 limit 10


"length(txt)","id","thread_parent","username"
"853464","178571","178555","Steel Brand" - о переводе в римские цифры
"461417","151156","150889","ZagZag" - файлик jauntepe.zip в XXE
"274471","100016","0","KLN" - топик начинается со слов "Собственно, сначала покажу код, который я накорябал, потом задам вопрос"
"267912","156708","156663","HACKER" - модуль для работы с DBF-файлами
"248193","50015","50013","sne" - модуль для работы с DUN и RAS
"246232","59641","59314","sne" - еще один модуль для диалапа
"244384","87937","87920","HACKER" - модуль работы с сокетами
"239508","114713","114632","alex" - исходник почтового подергивателя
"235900","87866","87783","HACKER" - модуль для кейлоггинга
"223707","133448","133418","HACKER" - еще один модуль для кейлоггинга


Мистер улыбка

select count(*) as c, username
 from vbnet join vbnet_users on vbnet.id_autor=vbnet_users.id
 where txt=":)" or txt=";)" or txt=":-)" or txt=";-)" or txt=":D" or txt=":)))" or txt=":))"
 group by username
 order by c desc
 limit 1


Этот титул отдается HACKER'у, 11 раз написавшему пост, состоящий только из простого смайлика


Топ3 по годам

select count(*) as c, username
 from vbnet join vbnet_users on vbnet.id_autor=vbnet_users.id
 where vbnet.id>=158225 and vbnet.id<=181033
 group by username
 order by c desc
 limit 10



Год Иды Постов Топиков Топ3 флудерс (число постов)
2002 1-7739 7294 1762 CyRax (516), User Unknown (383), Иван (362)
2003 7740-31011 21566 3086 Павел (1069), CyRax (522), Morpheus (364)
2004 31012-62291 29737 4321 sne (2869), Sharp (1829), Павел (1741)
2005 62292-95548 31132 3608 HACKER (2054), Sharp (1831), CyRax (1700)
2006 95549-126953 30484 3528 HACKER (2555), Sharp (1360), [root] (1162)
2007 126954-158224 30111 3070 HACKER (2260), Sharp (2091), Steel Brand (1490)
2008 158225-181033 21100 2464 Executioner (1493), Steel Brand (1374), Winand (986)
2009 181034- 5819 659 Smith (501), Steel Brand (351), EROS (311)



Овер100 эпик-баттлы

select count(*)+1 as c, v1.thread_parent, v2.subject
 from vbnet as v1 join vbnet as v2 on v1.thread_parent=v2.id
 group by thread_parent
 order by c desc
 limit 10

 
"c","thread_parent","subject"
"761","70634","эээээ"
"347","69496","Анекдоты здесь"
"194","137777","Игра!!!!!!"
"188","109220","Парочка логических задач"
"187","77870","Давайте напишем игру &amp;quot;Жизнь взломщика&amp;quot;?"
"178","80997","Новости Будущего! о vbnet.ru"
"165","159792","Марсиане"
"163","152280","Когда вымрет VB6"
"152","52577",".NET vs Basic 6"
"130","72611","Давайте покончим с этим"
"128","68158","C++ vs Basic"
"126","73723","Разгоняем CHR : Почти в 2 раза!"
"124","48094","Кто-то смотрел фильм &amp;quot;Послезавтра&amp;quot;?"
"122","136604","Как получить ответ на запрос MySql ?"
"120","160803","Лицензирование Windows"
"110","135705","Шифровка файла от 15 до ... MB"
"110","170570","сортировка массива строк"
"109","142102","Кошка"
"108","146191","расшифровка ХЭШей"
"103","185006","*.INI"
"101","156686","HNY 2008"
"100","183962","&amp;nbsp;VB.NET вопрос что он можит:?"


Кто с кем бился в Эээээ

"c","s","username"
"147","117920","CyRax"
"139","302220","Steel Brand"
"96","48356","Morpheus"
"89","176099","sne"
"54","192904","Sharp"
"35","25943","Coder"
"33","55649","Павел"
"27","30581","cresta"
"24","18796","Дмитрий Щапов"
"20","7636","Enter The Matrix"

или по размерам

select sum(length(txt)) as s, count(*) as c, username
 from vbnet join vbnet_users on vbnet.id_autor=vbnet_users.id
 where vbnet.thread_parent=70634 or vbnet.id=70634
 group by username
 order by s desc
 limit 10


"s","c","username"
"302220","139","Steel Brand"
"192904","54","Sharp"
"176099","89","sne"
"117920","147","CyRax"
"55649","33","Павел"
"48356","96","Morpheus"
"38838","13","User Unknown"
"30581","27","cresta"
"25943","35","Coder"
"19683","19","Standa Oerby"


Топ10 топикстартеров по числу постов в их топиках

select sum(length(v1.txt)) as s, count(*) as c, username
 from vbnet as v1
  join vbnet as v2 on v1.thread_parent=v2.id
  join vbnet_users on v2.id_autor=vbnet_users.id
 where v1.thread_parent <> 0
 group by username
 order by c desc
 limit 10


"s","c","username"
"2374838","3253","HACKER"
"1906701","3232","Павел"
"2436881","3124","Morpheus"
"1153867","2173","VBD"
"972407","2063","someone"
"1351677","2058","Steel Brand"
"1270324","2016","CyRax"
"792071","1471","gvozd"
"676347","1403","Sharp"
"1491415","1309","Дмитрий Щапов"

и по их длине

"s","c","username"
"2436881","3124","Morpheus"
"2374838","3253","HACKER"
"1906701","3232","Павел"
"1491415","1309","Дмитрий Щапов"
"1449269","913","ZagZag"
"1351677","2058","Steel Brand"
"1270324","2016","CyRax"
"1200615","924","-АлександР-"
"1153867","2173","VBD"
"1062331","906","Neco"


Города, где больше 10 митуевцев (сгруппировал ручками из более 5 упоминаний)

select count(*) as c, sity
 from vbnet_users  
 where sity <> ""
 group by sity  
 having c >= 5
 order by c desc


Москва 265
Санкт-Петербург 99
Киев 39
Екатеринбург 23
Харьков 18
Лондон 17
Одесса 17
Минск 15
Днепропетровск 14
Новосибирск 12
Ростов-на-Дону 12
Ташкент 12
Самара 11
Краснодар 10




Мы все такие разные, и все-таки мы вместе. Выпьем же за это морковного сока!

Ответить

  Ответы Всего ответов: 22  

Номер ответа: 1
Автор ответа:
 Morpheus



Вопросов: 224
Ответов: 3777
 Web-сайт: xury.zx6.ru
 Профиль | | #1
Добавлено: 24.04.09 03:38
Опа, классная статистика!
Интересно что я упомянут почти во всех категориях, а в теме эээээ даже дважды :)

Ответить

Номер ответа: 2
Автор ответа:
 Павел



Администратор

ICQ: 326066673 

Вопросов: 368
Ответов: 5968
 Web-сайт: www.vbnet.ru
 Профиль | | #2
Добавлено: 24.04.09 04:23
:)

Ответить

Номер ответа: 3
Автор ответа:
 gvozd



Разработчик Offline Client

Вопросов: 164
Ответов: 1317


 Web-сайт: www.gvozdsoft.com
 Профиль | | #3
Добавлено: 24.04.09 09:43
О, даже я в историю попал. :)

Ответить

Номер ответа: 4
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #4
Добавлено: 24.04.09 19:02
Я тоже :)

Ответить

Номер ответа: 5
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #5
Добавлено: 25.04.09 22:33
Sharp
Создал ажиотаж))) Терь все будут еще больше стараться попасть в анал, теперь в твою статистику

Ответить

Номер ответа: 6
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #6
Добавлено: 25.04.09 22:46
5 ответов это не ажиотаж.

Ответить

Номер ответа: 7
Автор ответа:
 Morpheus



Вопросов: 224
Ответов: 3777
 Web-сайт: xury.zx6.ru
 Профиль | | #7
Добавлено: 25.04.09 22:47
Мне больше интересно как Шарп получил всю базу да ещё и с нешифрованными паролями.. или уже исправили?

Ответить

Номер ответа: 8
Автор ответа:
 User Unknown



Вечный Юзер!

ICQ: uu@jabber.cz 

Вопросов: 120
Ответов: 3302
 Профиль | | #8 Добавлено: 26.04.09 00:23
Arvitaly
попасть в анал


Сличай: http://ru.wikipedia.org/wiki/Анал и http://ru.wikipedia.org/wiki/Анналы

Ответить

Номер ответа: 9
Автор ответа:
 Arvitaly



ICQ: 301746136 

Вопросов: 28
Ответов: 549
 Web-сайт: okazani.ru
 Профиль | | #9
Добавлено: 26.04.09 12:34
Ну эт типа шутка была...

Ответить

Номер ответа: 10
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #10
Добавлено: 26.04.09 16:54
Увы, без паролей.

Ответить

Номер ответа: 11
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #11
Добавлено: 26.04.09 20:18
Да прям? :)

Ответить

Номер ответа: 12
Автор ответа:
 Morpheus



Вопросов: 224
Ответов: 3777
 Web-сайт: xury.zx6.ru
 Профиль | | #12
Добавлено: 26.04.09 20:41
Oga, tak i soznalsya :D

Ответить

Номер ответа: 13
Автор ответа:
 Smith



ICQ: adamis@list.ru 

Вопросов: 153
Ответов: 3632
 Профиль | | #13 Добавлено: 27.04.09 04:12
Шутка ли? Да никтоб не сознался :)
А тема топика тянет на рекордную длину?

Ответить

Номер ответа: 14
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #14
Добавлено: 27.04.09 15:09
Нет, в топ10 простыней есть первый пост топика длиннее:
"274471","100016","0","KLN" - топик начинается со слов "Собственно, сначала покажу код, который я накорябал, потом задам вопрос"

Ответить

Номер ответа: 15
Автор ответа:
 Morpheus



Вопросов: 224
Ответов: 3777
 Web-сайт: xury.zx6.ru
 Профиль | | #15
Добавлено: 27.04.09 18:01
Кстати, а почему бы не повесить скрипт на сервер, который будет генерить статистику как в этом топике, но обновлённую? всего то надо пределать запросы с мускула на что-там-у-нас.. А join'ы долго обрабатывались?

Ответить

Страница: 1 | 2 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам