1. Лучший говнокод

    В номинации:
    За время:

  2. Куча / Говнокод #3382

    +132

    1. 1
    oSqlStr[0, 12] = " '<DIV onclick=\"fShowWindow(''../ReglamSchemesDoc.aspx?code='+Cast(s1.n_pp AS VarChar(50))+''')\" align=\"center\"><img border=\"0\" src=\"../Image/sxemaRed.gif\"></DIV>'+CASE WHEN s1.s_reglament>'' THEN '<DIV onclick=\"fShowFile('''+Replace(Replace(s1.s_reglament,' ',''),';',''')\" align=\"center\"><img border=\"0\" src=\"../Image/sxema.gif\"></DIV><DIV onclick=\"fShowFile(''')+''')\" align=\"center\"><img border=\"0\" src=\"../Image/sxema.gif\"></DIV>' ELSE '' END ";

    Однострочная каша из трёх языков
    Взято отсюда...
    http://www.aspnetmania.com/Forums/ForumMessage/336926.html

    mrbig66, 03 Июня 2010

    Комментарии (7)

  3. C# / Говнокод #3353

    +113

    1. 1
    public static bool DefaultSuppressVersionCheck = true; //default is false

    Как пишут программисты США.

    Dmitriy, 31 Мая 2010

    Комментарии (7)

  4. PHP / Говнокод #3256

    +163

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    $metka=0;
$reason = $form->getValue("reason");
if ($activedate < $datenow)
	{
		$metka++;
	}

if (trim($reason) == "")
	{
		$metka++;
	}
if ($conflict>0)
	{
		$metka++;
	}

if ($metka == 0)
	{
		for ($i=0;$i<count($srid);$i++)
		{
			$this->changeRates($srid[$i],$rate[$i],$datenow,$activedate,$reason);
		}
		pageAlert::nextPageAlert("Ставки по тарифам успешно сохранены!", PAGE_ALERT_SUCCESS);
	}

    Вот как кодят программисты, не слышавшие про исключения и return false при ошибках

    1Ad_Astra1, 18 Мая 2010

    Комментарии (7)

  5. PHP / Говнокод #3252

    +163

    1. 1
    $NETCAT_FOLDER = join( strstr(__FILE__, "/") ? "/" : "\\", array_slice( preg_split("/[\/\\\]+/", __FILE__), 0, -3 ) ).( strstr(__FILE__, "/") ? "/" : "\\" );

    Метод определения абсолютного пути к папке, лежащей на сколько-то уровней выше текущей.

    telnet, 18 Мая 2010

    Комментарии (7)

  6. VisualBasic / Говнокод #3248

    −99

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    'Поиск с использованием Mid()
'-------
Dim B
'переменная Б - номер символа
Dim foundn
' номер найденной строки
Dim A As String
'A - текст в котором ищем
Dim find As String
'--------
A="this is text ! ololo 12345 abcd"
Call found("ololo",1)
 
Function found(Text As String, start)
B = start
find = Text
Do While Not (Mid(A, B, Len(find)) = find)
B = B + 1
If B > 1000000 Then
MsgBox ("overfloow")
'если номер символа > 10000000 - остановка процесса
End
End If
Loop
foundn = B
End Function

    Поиск в string

    hromjo, 17 Мая 2010

    Комментарии (7)

  7. JavaScript / Говнокод #3217

    +171

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    function isSpace(s){
return (s==" " || s=="n" || s=="13" || s=="t" || s=="r")?true:false
}
function count(){
var c=0
var i
var prevspace=true
var str=document.forms.form.text.value
for(i=str.length-1;i>=0;i--){
if(isSpace(str.charAt(i)) && prevspace){
}else{
c++
}
prevspace=isSpace(str.charAt(i))
}
document.forms.form.total.value=c
return false
}

    Вычисляем количество слов в поле. http://javascript.ru/forum/misc/9381-podschet-slov-v-forme.html
    P.S. спамеры могут не спрашивать, где здесь C++ — он в 12-ой строчке:)

    Infamous, 13 Мая 2010

    Комментарии (7)

  8. PHP / Говнокод #3212

    +144

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    <?php if(sizeof($v[1])==1) {?>
<?php
 }
 ?>
 <?php if(sizeof($v[1])>1) { $v[1]=ass_array_shuffle($v[1]); ?>

    и в завершение говнопоноса... не думаю что мне нужон был именно sizeof

    Lure Of Chaos, 12 Мая 2010

    Комментарии (7)

  9. Си / Говнокод #3191

    +136

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    if (init) {
} else {
  // thread is not initialized, run first time local state setup
  ...
}

    raorn, 11 Мая 2010

    Комментарии (7)

  10. C# / Говнокод #3189

    +103

    1. 1
    2. 2
    3. 3
    4. 4
    private ListBoxItem FindItem(string guid)
{
        return _userlist.Items.Cast<ListBoxItem>().FirstOrDefault(item => ((TextBlock) ((StackPanel) item.Content).Children[1]).Text == guid);
}

    Функция поиска элемента в ListBox по значению Guid в одну строку. Наговнокодил ReSharper.

    botinko, 09 Мая 2010

    Комментарии (7)

  11. Perl / Говнокод #3187

    −122

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    sub PrintToFile {
	
	my ($filename, @file) = @_;
	
	@file = sort {$a <=> $b} @file;
	
	open BK, ">backup.txt";
	foreach $line(@file) {
		print BK "$line";
	}
	close BK;
	
	rename "backup.txt", "$filename";
	unlink "backup.txt";
	
}

    А вот так мы записываем в файл. И нас не интересует многопоточность или проверка имени файла (в вызывающей функции тоже нет). А не записать ли нам ../index.html?

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

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

    da4ever, 09 Мая 2010

    Комментарии (7)