- 1
- 2
- 3
- 4
public boolean isAdmin() {
//TODO: remove this.
return admin || "***[email protected]".equals(getEmail());
}
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+138.5
public boolean isAdmin() {
//TODO: remove this.
return admin || "***[email protected]".equals(getEmail());
}
авторизация хардкодом
+150
function ruslat ($string) # Задаём функцию перекодировки кириллицы в транслит.
{
$string = ereg_replace("ж","zh",$string);
$string = ereg_replace("ё","yo",$string);
$string = ereg_replace("й","i",$string);
$string = ereg_replace("ю","yu",$string);
$string = ereg_replace("ь","II",$string);
$string = ereg_replace("ч","ch",$string);
$string = ereg_replace("щ","sh",$string);
$string = ereg_replace("ц","c",$string);
$string = ereg_replace("у","u",$string);
$string = ereg_replace("к","k",$string);
$string = ereg_replace("е","e",$string);
$string = ereg_replace("н","n",$string);
$string = ereg_replace("г","g",$string);
$string = ereg_replace("ш","sh",$string);
$string = ereg_replace("з","z",$string);
$string = ereg_replace("х","h",$string);
$string = ereg_replace("ъ","II",$string);
$string = ereg_replace("ф","f",$string);
$string = ereg_replace("ы","y",$string);
$string = ereg_replace("в","v",$string);
$string = ereg_replace("а","a",$string);
$string = ereg_replace("п","p",$string);
$string = ereg_replace("р","r",$string);
$string = ereg_replace("о","o",$string);
$string = ereg_replace("л","l",$string);
$string = ereg_replace("д","d",$string);
$string = ereg_replace("э","yе",$string);
$string = ereg_replace("я","jа",$string);
$string = ereg_replace("с","s",$string);
$string = ereg_replace("м","m",$string);
$string = ereg_replace("и","i",$string);
$string = ereg_replace("т","t",$string);
$string = ereg_replace("б","b",$string);
$string = ereg_replace("Ё","yo",$string);
$string = ereg_replace("Й","I",$string);
$string = ereg_replace("Ю","YU",$string);
$string = ereg_replace("Ч","CH",$string);
$string = ereg_replace("Ь","II",$string);
$string = ereg_replace("Щ","SH",$string);
$string = ereg_replace("Ц","C",$string);
$string = ereg_replace("У","U",$string);
$string = ereg_replace("К","K",$string);
$string = ereg_replace("Е","E",$string);
$string = ereg_replace("Н","N",$string);
$string = ereg_replace("Г","G",$string);
$string = ereg_replace("Ш","SH",$string);
$string = ereg_replace("З","Z",$string);
$string = ereg_replace("Х","H",$string);
$string = ereg_replace("Ъ","II",$string);
$string = ereg_replace("Ф","F",$string);
$string = ereg_replace("Ы","Y",$string);
$string = ereg_replace("В","V",$string);
$string = ereg_replace("А","A",$string);
$string = ereg_replace("П","P",$string);
$string = ereg_replace("Р","R",$string);
$string = ereg_replace("О","O",$string);
$string = ereg_replace("Л","L",$string);
$string = ereg_replace("Д","D",$string);
$string = ereg_replace("Ж","Zh",$string);
$string = ereg_replace("Э","Ye",$string);
$string = ereg_replace("Я","Ja",$string);
$string = ereg_replace("С","S",$string);
$string = ereg_replace("М","M",$string);
$string = ereg_replace("И","I",$string);
$string = ereg_replace("Т","T",$string);
$string = ereg_replace("Б","B",$string);
$string = ereg_replace(":","-",$string);
return $string;
}
На одном форуме нашел.
Функция транслитерации.
+150
$yj_date .='<table class="yj_contentpaneopen"><tr><td>';
$yj_date .= '<table width="100%" border="0"><tr valign="top">';
$yj_date .= '<td class="yj_date">';
$yj_date .= $dispaly.'</td><td style="width:100%;">';
echo $yj_date;
Классический говнокодец, к тому же выдает ворнинг.
К слову ребята делают платные компоненты для Joomla которые стоят недешево...
Совершенно не разбираясь в PHP тупо упростил до:
$yj_date ='<table class="yj_contentpaneopen"><tr><td><tabl e width="100%" border="0"><tr valign="top"><td class="yj_date">'. $dispaly .'</td><td style="width:100%;">';
echo $yj_date;
+146
foreach($TEREMOK as $Блины => $Начинка){
switch($Блины)
{
case Ветчина_и_пюре : print "Да я хочу такой блин ";break;
case Ветчина_и_сыр : print"Да я хочу и такой блин )";break
default : print"Ничего не хочу";break
}
}
Кто хоть раз бывал в теремке - русскиеблины? :))
+148.2
if ( is_array($_GET) ) {
while( list($k, $v) = each($_GET) ) {
if ( is_array($_GET[$k]) ) {
while( list($k2, $v2) = each($_GET[$k]) ) {
$k=key_check("$k");//Кавычки не убирать
$k2=key_check("$k2");
$_GET[$k][$k2] = str_check($v2);
@eval("\$".$k."[\$k2] = str_check(\$v2);");
}
}
else { $k=key_check("$k");$_GET[$k] = str_check($v); $$k = $_GET[$k];}
}
}
WCPS WebCodePortalSystem
+154
#include "stdafx.h"
#include "windows.h"
#include <iostream>
int main()
{
STARTUPINFOA si;
PROCESS_INFORMATION pi;
ZeroMemory( &si, sizeof(si) );
ZeroMemory( &pi, sizeof(pi) );
SECURITY_ATTRIBUTES secat;
secat.nLength = sizeof(SECURITY_ATTRIBUTES);
secat.bInheritHandle = TRUE;
HANDLE newin, writein;
CreatePipe(&newin,&writein,&secat,0);
si.dwFlags = STARTF_USESTDHANDLES | STARTF_USESHOWWINDOW;
si.wShowWindow = SW_SHOWNORMAL;
si.hStdInput=newin;
GetStartupInfoA(&si);
si.cb;
CreateProcessA(NULL, "cmd.exe", NULL, NULL, TRUE, CREATE_NEW_CONSOLE, NULL, NULL, &si, &pi);
DWORD bytes;
char command[100] = "mkdir 1254655553";
WriteFile(writein, command, 100, &bytes, NULL);
std::cin.get();
}
Создание директории.
p.s. ачат и иже с ним.
+151
</div>
<b class="r1"></b><b class="r1"></b><b class="r1"></b><b class="r2"></b><b class="r2"></b><b class="r3"></b><b class="r4"></b><b class="r5"></b><b class="r7"></b><b class="r10"></b>
</div>
говнокод из хтмл-ки >>>ЭТОГО<<< сайта! ;)
+118.3
private string StrColor(decimal x)
{
if (x.ToString().Contains("-"))
{
string adj = x.ToString();
adj = string.Concat("(", adj.Substring(1, adj.Length - 1), ")");
//adj = System.Drawing.Color.Red.ToString();
return adj;
}
else
{
return x.ToString();
}
}
Определение знака числа в строке 3
−276.6
Function ShowAddressBook() As String
On Error GoTo ErrorHandler
Dim miTempItem As MailItem
Dim inTempInspector As Inspector
Dim Pomoechka As MAPIFolder
Dim objNS As outlook.NameSpace
' Загружаем шаблон формы онового сообщения
' на нём есть нужная кнопка
Dim Reg As New CReg
10 Reg.m_MainKey = "Software\Content Manager\MS_OUTLOOK"
20 Set miTempItem = Application.CreateItemFromTemplate(Reg.GetValue("path") & "\crutch.oft")
30 Set inTempInspector = miTempItem.GetInspector
32 miTempItem.UserProperties.Add("TempItemForAddressBook", olYesNo) = True
' Убираем инспектор с глаз долой
40 inTempInspector.Left = -20000
50 inTempInspector.Top = -20000
'51 inTempInspector.Width = 0
'52 inTempInspector.Height = 0
' пока инспектор не покажеться адресбук из него не выдавишь
60 inTempInspector.Activate
' если до вызова адресбука пользователь работал
' с развёрнутым на весь экран письмом - то хрен мы его куда свинем
' нужно, поэтому, вернуть нормальное состояние
70 inTempInspector.WindowState = olNormalWindow
' правда, это в некоторых случаях моргает - но поставить olonormalWindow
' до того как инспектор показан - нельзя.
' рахзвёрнутость ил не развёрнутость задаёться в реестре по пути
' HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Outlook\Message\Frame
' там храниться REG_BINARY и внём меняетсья 0xB байт либо на 3 либо на 1
' подгрузили всё что надо - вызываем саму книгу
'НОВАЯ ВЕРСИЯ
80 inTempInspector.CommandBars.FindControl(Id:=353).Execute
Dim strBuff As String
' Пока не сделаю сейв, поле TO через мапи будет не доступным
90 miTempItem.save
' получаю поле ТО через MAPI
' если попытаться взять его на прямую - то аутлук будет ругатся
' своим ёбанным диалогом безопасности
100 strBuff = GetToField(miTempItem)
' закрываем итемку
110 miTempItem.Close olDiscard
' Теперь, из-за того что вызывали метод save итемка лежит в папке
' с черновиами, нахер она там не сдалась - нужно удалять
' если её просто удалить .delete то она передвиниться в папку
' с удалёнными письмами - тоже нафик не надо
' поэтому, сначала переносим её в эту папку самостоятельно
' и от туда вызываем .delete - письмо исчезает
' Получаем доступ к папке с удалёнными письмами
120 Set objNS = Application.GetNamespace("MAPI")
' вот тут она лежит
130 Set Pomoechka = objNS.GetDefaultFolder(olFolderDeletedItems)
' перемещаем туда письмецо
140 miTempItem.Move Pomoechka ' хотя можно и просто miTempItem.Delete
' теперь берём последнее письмо из помойки - это наше
' и удаляем его от туда
150 Pomoechka.Items(Pomoechka.Items.Count).Delete
' Теперь письма нету
ShowAddressBook = strBuff
KillObjects:
' Всё подчистим
160 Set miTempItem = Nothing
170 Set inTempInspector = Nothing
180 Set Pomoechka = Nothing
190 Set objNS = Nothing
200 Set Reg = Nothing
Exit Function
ErrorHandler:
subGlobalErrorHandler Err.Description, Err.number, Erl, "ShowAddressBook"
Resume KillObjects
End Function
EPIC FAIL
Вызов диалога адресной книги аутлука, и получение выбранных в ней адресов.
+148
<div class="hright"><span id='ratig-layer-1146605335'><div class="rating" style="float:left;">
<ul class="unit-rating">
<li class="current-rating" style="width:0px;">0</li>
<li><a href="#" title="Плохо" class="r1-unit" onclick="dleRate('1', '1146605335'); return false;">1</a></li>
<li><a href="#" title="Приемлемо" class="r2-unit" onclick="dleRate('2', '1146605335'); return false;">2</a></li>
<li><a href="#" title="Средне" class="r3-unit" onclick="dleRate('3', '1146605335'); return false;">3</a></li>
<li><a href="#" title="Хорошо" class="r4-unit" onclick="dleRate('4', '1146605335'); return false;">4</a></li>
<li><a href="#" title="Отлично" class="r5-unit" onclick="dleRate('5', '1146605335'); return false;">5</a></li>
</ul>
</div></span></div>