Лучший говнокод за всё время

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

В номинации:

Лучший рейтинг
Самый комментируемый

За время:

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)

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

+95

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

function  TForm1.beta(i:integer) : integer;
var bt:integer;
begin
bt:=0;
curI:=i;
if (alf=1) and (cad=0) then
begin
if i<=26 then bt:=2;
if (i<=36) and (i>=27) then bt:=3;
if (i<=48) and (i>=37) then  begin  bt:=1; addortolexlist(cT);  end;
if i=49 then bt:=4;
if i=50 then bt:=5;
if i=51 then bt:=6;
if i=52 then bt:=7;
end;
if (alf=2) and (cad=0) then
begin
if i<=26 then bt:=2;
if (i<=36) and (i>=27) then bt:=2;
end;
if (alf=3) and (cad=0) then
begin
if (i<=36) and (i>=27) then bt:=3;
end;
if (alf=4) and (cad=0) then
begin
if i=50 then
begin
 Tl[lexnow].n:=jj;
  Tl[lexnow].subst:='<>';
  Tl[lexnow].lexcod:=21;
  Tl[lexnow].index:=0;
  bt:=1;
   inc(lexnow);
   ii:=ii+1;
end;
if i=51 then
begin
  Tl[lexnow].n:=jj;
  Tl[lexnow].subst:='<=';
  Tl[lexnow].lexcod:=24;
  Tl[lexnow].index:=0;
 bt:=1;
 ii:=ii+1;
    inc(lexnow);
end;

Кусок кода из лабораторной работы по трансляторам. Как сказал парень - "Я не умею пользоваться функциями, поэтому я все пишу на массивах" О_о
Дальше в коде заполнение массивов размерностью в сотню элементов вручную!
Главное, что всё работает...

niravzi, 17 Ноября 2010

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

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

+121

01
02
03
04
05
06
07
08
09
10
11
12

string[] groups = LoadAllGroups();
var dt = new DataTable();
dt.Columns.Add("TEXT", typeof(string));
foreach (string g in groups)
{
    DataRow dr = dt.NewRow();
    dr["TEXT"] = g;
    dt.Rows.Add(dr);
}
var dv = new DataView(dt) { Sort = "TEXT" };
adGroups_ddl.DataSource = dv;
adGroups_ddl.DataBind();

synapse, 16 Ноября 2010

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

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

+113

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

public string UploadFileEx(string uploadfile, string url,string fileFormName, 
            string contenttype, NameValueCollection querystring, CookieContainer cookies
        ){
            if ((fileFormName == null) ||
                (fileFormName.Length == 0))
            {
                fileFormName = "file";
            }

            if ((contenttype == null) ||
                (contenttype.Length == 0))
            {
                contenttype = "application/octet-stream";
            }


            string postdata;
            postdata = "?";
            if (querystring != null)
            {
                foreach (string key in querystring.Keys)
                {
                    postdata += key + "=" + querystring.Get(key) + "&";
                }
            }

String.IsNullOrEmpty ??????
http://code.google.com/p/habreffect-uploader/source/browse/trunk/clipboardUploader/Uploader.cs
http://habrahabr.ru/blogs/net/108165/

Nigma143, 15 Ноября 2010

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

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

+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

string commQuery = "CREATE DATABASE " + this.textBox1.Text +
                               " ON" +
                               " ( " +
                                    "NAME =" + this.textBox1.Text + ", " +
                                    "FILENAME =" + this.textBox2.Text + 
                                    "SIZE = 100mb, " +
                                    "MAXSIZE = unlimited, " +
                                    "FILEGROWTH = 5mb" +
                               " ) " +
                               "LOG ON " +
                               " ( " +
                                     "NAME =" + this.textBox1.Text + ", " +
                                     "FILENAME =" + this.textBox2.Text + 
                                     "SIZE = 3mb, " +
                                     "MAXSIZE = 50mb, " +
                                     "FILEGROWTH = 5mb" +
                               " ) ";
            
           SqlConnection conSQL = new SqlConnection("Data Source = (local);" + "Integrated security = True;" + "database = master");
            SqlCommand commSQL = new SqlCommand("", conSQL);
            
            commSQL.CommandType = CommandType.Text;
            commSQL.CommandText = commQuery.ToString();
               
            
            conSQL.Open();
            commSQL.ExecuteNonQuery();
            conSQL.Close();

очень нравиться совершенство стиля формирования БД на сервере и защита от SQL иньекций :-D

ageron, 13 Ноября 2010

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

SQL / Говнокод #4607

−180

1

select nvl(count(*), 0) from ...

Вот такое увидел.
Защита от нежданчика.

Oleg_quadro, 13 Ноября 2010

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

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

+145

1
2
3
4

foreach($new as $key => $value)
{
	$config[$key] = $value;
}

stasoft, 06 Ноября 2010

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

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

+154

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

function IndexLoadRelative($nID = 0){
// проверки
$bCanAdd = true;
  if (empty($nID)){
   // id
   $this->_iloadNCheck($this->m_nID, 'id', $bCanAdd);
}else{
   $this->m_nID = $nID;
}

if (!$bCanAdd){
   return false;
}

$oNewsTag = $this->CreateObject('CNewsTag');
$arrRows = array();
$arrRows = array_chunk($arrRows, 5);
$arrRows = $arrRows[0];
$this->m_arrRecords = array();
$arrRows = $oNewsTag->LoadRelative($this->m_nID);
//~blah blah blah~

}

Ребята. Это порнотрэш.

Sum, 03 Ноября 2010

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

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

+145

1
2

class Partner extends SqlQuery {
...

Партнер - это тот, кто привел юзера. Т.е. по факту, другой юзер.

ReallyBugMeNot, 01 Ноября 2010

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

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

+166

1

echo $tpl->ParseTemplate2('client_pardon', $client_pardon,  $CFG['root']['template_basket']);

Самописный интернет-магазин, кусок кода "если обломилось создание заказа".

ReallyBugMeNot, 01 Ноября 2010

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

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