По колено в коде — Говнокод.ру

C++ / Говнокод #4683

+145

1
2
3
4

if (mode == MASTER)
	Dev_Mode = MASTER;
else
	Dev_Mode = SLAVE;

Vanuan, 19 Ноября 2010

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

1C / Говнокод #4682

−137

1
2
3
4
5
6
7
8
9

Перем ВидНДС;

.......................................................................................................................
	
	Если ВыбВидНДС = Перечисление.ВидыНДС.Реализация Тогда
		ВидНДС = Перечисление.ВидыНДС.Реализация;
	ИначеЕсли ВыбВидНДС = Перечисление.ВидыНДС.Авансы Тогда
		ВидНДС = Перечисление.ВидыНДС.Авансы;
	КонецЕсли;

ВыбВидНДС - реквизит формы.

antz, 19 Ноября 2010

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

Java / Говнокод #4681

+145

1
2
3
4
5
6
7

// где-то:
  public boolean isLoaded() {
    return (boolean) (this.sequencer.isOpen());
  }

//там:
public boolean isOpen();

код к книжке

Lure Of Chaos, 19 Ноября 2010

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

1C / Говнокод #4680

−121

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

Процедура УстановкаНомераЛицевогоСчета()
	
	Запрос = Новый Запрос();
	Запрос.Текст =
	"ВЫБРАТЬ
	|	КВП_ЛицевыеСчета.Наименование
	|ИЗ
	|	Справочник.КВП_ЛицевыеСчета КАК КВП_ЛицевыеСчета
	|ГДЕ
	|	(НЕ КВП_ЛицевыеСчета.ЭтоГруппа)";
	
	МаксНомер      = 0;
	Выборка        = Запрос.Выполнить().Выбрать();
	ВсегоВариантов = Выборка.Количество();
	ТекВариант     = 1;
	Пока Выборка.Следующий() Цикл
		Номер = ВыбратьТолькоЦифры(Выборка.Наименование);
		Если МаксНомер < Число(Номер) Тогда
			МаксНомер = Число(Номер);
		КонецЕсли;
		Состояние("Поиск максимального лицевого счета: " + ТекВариант + " / " + ВсегоВариантов);
		ТекВариант = ТекВариант + 1;
	КонецЦикла;
	
	МаксНомер = МаксНомер + 1;
	ИмяЛицевогоСчета = "л/с №" + Формат(МаксНомер, "ЧДЦ=0; ЧГ=0");
	
КонецПроцедуры

Процедура для присвоения Кода новому элементу справочника. Из одной серьезной официальной конфигурации.

nickkk, 19 Ноября 2010

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

PHP / Говнокод #4679

+155

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45

if(!CModule::IncludeModule("iblock")) return;
		
		$ID_PRODUCT = $_POST['prod_id'];
		$ID_USER = $USER->GetID();
		$TEXT = $_POST['txt'];
		$IBLOCK_ID = $_POST['iblock_id'];
		$NAME = "Отзыв";
		
		$arPROPS = Array(
			"ID_PRODUCT" => $ID_PRODUCT,
			"ID_USER" => $ID_USER,
			"TEXT" => $TEXT,
		);
		
		$arFields = Array(
			"IBLOCK_ID"=>$IBLOCK_ID,
			"NAME"=>$NAME,
			"PROPERTY_VALUES" => $arPROPS,
		);
		print_r ($arFields);
		$e = new CIBlockElement;
		if (!$e->Add($arFields,false,true,false)) {
			echo "Error: ".$e->LAST_ERROR;
		}
		else {
			echo "Всё ништяк";
		}
-------------------------------------------------------------------
Возвращается:
----------------------------------------------------------------
Array
(
    [IBLOCK_ID] => 5
    [NAME] => Отзыв
    [PROPERTY_VALUES] => Array
        (
            [ID_PRODUCT] => 119
            [ID_USER] => 1
            [TEXT] => kdfkja
        )

)
Всё ништяк
----------------------------------------------------------------
Создаётся новая запись, но почему-то в свойстве TEXT одна левая буква какая-то, ничо понять не могу(((

minnigaliev-r, 19 Ноября 2010

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

Куча / Говнокод #4678

+133

1
2
3

<li><em> Мечты в подарок <span class="style3"> <span class="style10">30.12.10 - 02.01.11</span> <span class="style18">от 175 е.     </span></span></em><span class="style2">    <a href="NG_Mecty_v_podarok_RU.doc" target="_blank">  скачать>> <img src="pics/wordico.jpg" border="0" alt="Скачать"></a></span></li>
<li>Новый год в Праге <span class="style19"> 29.10.10-02.01.11</span><span class="style2">  <span class="style17">от 160 е.      </span>     <a href="Prage.doc" target="_blank">скачать>> <img src="pics/wordico.jpg" border="0" alt="Скачать"></a></span></li>
<li> Прага+Вена<span class="style19"> 30.12.10-03.01.11</span><span class="style2"> <span class="style17">от 165 е.</span>                          <a href="Praga_Vena.doc" target="_blank"> скачать>> <img src="pics/wordico.jpg" border="0" alt="Скачать"></a></span></li>

Инновационная таблица методикой неразрывных пробелов :)

KamaZz, 19 Ноября 2010

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

C# / Говнокод #4677

+145

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50

using System;

//using System.Collections.Generic; Нафега ани???
//using System.Linq;
//using System.Text;

namespace ConsoleApplication5
{
    class Program
    {
        //Эт типа метад сёрч:)
        public static int[] Search(int[] arr)
        {
            int a = 0; //первае самае бальшое чесло
            int b = 0; //втарое самае бальшое чесло (Бирём n... Мала, нада m)
            for (int i = 0; i < arr.Length; i++) //Фигачем мосив, пака не дафигачим
            {
                if (arr[i] > a && arr[i] > b) //если нашлося бальшущее чесло, вписуем
                {
                    if (a < b) //либа в а
                    {
                        a = arr[i];
                    }
                    else if (b < a) //либа в b
                    {
                        b = arr[i];
                    }
                    else //либа тожэ в a
                    {
                        a = arr[i];
                    }
                }
            }
            int[] ret = { a, b }; //выплёвуем мосивом бальших и ни очинь чисил
            return ret; //да, таки выплёвуем
        }

        static void Main(/*string[] args*/) //нах.. вы мне эту фегню впехнуле. Уроды мелкомягкее
        {
            int[] m = { 1, 2, 4, 5, 6, 7, 8, 9 }; //Зодоём мосив
            int[] ret = Search(m); //ищим два самэх бальшых чесла

            for (int i = 0; i < 2; i++)
            {
                Console.WriteLine(ret[i]); //выводем их в кансоль
            }
            Console.ReadKey();
        }
    }
}

Таким я вижу говнокод. Или почти таким...:)

opentornado, 19 Ноября 2010

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

PHP / Говнокод #4676

+154

1
2
3
4
5
6

for ($i = 0; $i < count($_FILES['att']['name']); $i++) {
  if (copy($_FILES['att']['tmp_name'][$i], "files/".$_FILES['att']['name'][$i])) {
    unlink($_FILES['att']['tmp_name'][$i]);
    chmod("files/".$_FILES['att']['name'][$i], 0644);
  }
}

Из той же гостевухи как и кусок примера в http://www.govnokod.ru/4660.
Мультизагрузка файлов на сервер. Естественно, тоже пришлось до
ума доводить.

dwinner, 18 Ноября 2010

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

Pascal / Говнокод #4675

+145

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16

{pascal}
{$M 65520,0,10000}
program govnokod;
a:word;
begin
repeat
writeln('кто считает что он дебил нажмите 1, кто наоборот 2');
readln(a);
if a=1
then
writeln('да ты прав');
readln
else
writeln('да нет ты не понял, надо нажать 1');
until a=1
end.

просто прикольная надоедаловка,

we-stalkers, 18 Ноября 2010

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

VisualBasic / Говнокод #4674

−103

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43

'==========================================================================
            'обновляю таблицу okFIO
            lcSQl = "UPDATE okFIO SET"
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!dateBegin Is System.DBNull.Value) Then
                lcSQl &= " dateBegin = '" & Format(Me.DS_ExportFIO.okFIO.Rows(0)!dateBegin, "yyyyMMdd") & "'"
            End If
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!Prim Is System.DBNull.Value) Then
                lcSQl &= ", Prim = '" & Me.DS_ExportFIO.okFIO.Rows(0)!Prim.ToString & "'"
            End If
           If Not (Me.DS_ExportFIO.okFIO.Rows(0)!oldFam Is System.DBNull.Value) Then
                lcSQl &= ", oldFam = '" & Me.DS_ExportFIO.okFIO.Rows(0)!oldFam.ToString & "'"
            End If
            'If Not (Format(Me.DS_ExportFIO.okFIO.Rows(0)!dateFill.ToString, "yyyyMMdd")) = "" Then
            '    lcSQl &= ", dateFill = " & Format(Me.DS_ExportFIO.okFIO.Rows(0)!dateFill.ToString, "yyyyMMdd") & ""
            'End If
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!FIOR Is System.DBNull.Value) Then
                lcSQl &= ", FIOR = '" & Me.DS_ExportFIO.okFIO.Rows(0)!FIOR.ToString & "'"
            End If
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!FIOD Is System.DBNull.Value) Then
                lcSQl &= ", FIOD = '" & Me.DS_ExportFIO.okFIO.Rows(0)!FIOD.ToString & "'"
            End If

            ......

            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!isSoprPF Is System.DBNull.Value) Then
                lcSQl &= ", isSoprPF = " & Me.DS_ExportFIO.okFIO.Rows(0)!isSoprPF.ToString & ""
            End If
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!isReadyFotoPC Is System.DBNull.Value) Then
                lcSQl &= ", isReadyFotoPC = " & Me.DS_ExportFIO.okFIO.Rows(0)!isReadyFotoPC.ToString & ""
            End If
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!isReadySignPC Is System.DBNull.Value) Then
                lcSQl &= ", isReadySignPC = " & Me.DS_ExportFIO.okFIO.Rows(0)!isReadySignPC.ToString & ""
            End If
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!SNILS Is System.DBNull.Value) Then
                lcSQl &= ", SNILS = '" & Me.DS_ExportFIO.okFIO.Rows(0)!SNILS.ToString & "'"
            End If
            If Not (Me.DS_ExportFIO.okFIO.Rows(0)!idPrivilege Is System.DBNull.Value) Then
                lcSQl &= ", idPrivilege = " & Me.DS_ExportFIO.okFIO.Rows(0)!idPrivilege.ToString & ""
            End If
            lcSQl &= " WHERE(id = " & Me.idFIO & ")"
            myCommand = New SqlClient.SqlCommand(lcSQl, myConn)
            myCommand.CommandTimeout = 0
            myCommand.ExecuteNonQuery(

И так далее... всего около 150ти строк кода (весь сюда запихнуть не могу) на формирования SQL-запроса.

HellMaster_HaiL, 18 Ноября 2010

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

Говнокод: по колено в коде.

C++ / Говнокод #4683

1C / Говнокод #4682

Java / Говнокод #4681

1C / Говнокод #4680

PHP / Говнокод #4679

Куча / Говнокод #4678

C# / Говнокод #4677

PHP / Говнокод #4676

Pascal / Говнокод #4675

VisualBasic / Говнокод #4674