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

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

−102

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

flagnum=Isnumeric(pSum$) 'сумма к погашению
If flagnum=False Then
	If Instr(pSum$,",")=0 Then
		flagnum1$=Strleft(pSum$,".")
		flagnum2$=Strrightback(pSum$,".")
		pSum$=flagnum1$&","&flagnum2$
	Else
		flagnum1$=Strleft(pSum$,",")
		flagnum2$=Strrightback(pSum$,",")
		pSum$=flagnum1$&"."&flagnum2$
	End If
End If

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

Dimly, 25 Ноября 2010

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

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

+145

1
2

<!--<form method=post action=bablo.php><input type=hidden name=action value='switchstyle'><td width=70 style='border-bottom-width:0px;'><input type=submit value=' режим: ночь ' style='border-width:0px;'></td><input type=hidden name=cur_style value='night'></form>--><td>account: mary-e</td></tr>
	<!--<tr><td class=workcell colspan=9></td></tr>-->

Kolotibablo угарает в который раз.
Нахера нам невидимая кнопка?

vedmak3013, 24 Ноября 2010

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

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

+76

1
2
3
4
5
6
7
8
9

// Setted bit
	private static final int TRUE_BIT = 1;

...
	public static final int LAST_PARAGRAPH = 0x01;
	public static final int FIRST_PARAGRAPH = 0x02;
...
	
	if (TRUE_BIT == (paragraphFlag & ParagraphProperties.FIRST_PARAGRAPH) >>> 1) {

mlg7, 24 Ноября 2010

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

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

+172

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

<?php
	
	( ( (float)phpversion() < 5.3 ) ) ? die ( 'fail amigo.' ) : '';
	
	$site = file_get_contents( "http://www.google.com.br/search?hl=pt-BR&q=VBXMCBVFKJSHDKHDKF" );

	$getLocationViaGoogle = function ( $html ){
		$regex = "#<\w+\s\w+=\"tbos\">([^<]{3,})<\/\w+>#i";
		preg_match_all( $regex, $html, $matches );
		return $matches[1][0];
	};
	
	print $getLocationViaGoogle( $site );
	
?>

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

Yurik, 24 Ноября 2010

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

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

−140

1
2
3

Если (ШаблонПроводки.Наименование = "Распределять пропорционально расчетной базе") Тогда
	МожноПроводить = 0;
	Сообщить(НазваниеДока+"неверно указан шаблон проводки", "!");

Это так профессионально, сравнивать строки...

1_and_0, 24 Ноября 2010

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

JavaScript / Говнокод #4738

+145

1
2
3
4

function eval()
{
    this.obj = eval(obj);
}

выкопал из сорцов игрушки...

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

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

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

+143

01
02
03
04
05
06
07
08
09
10
11

RewriteRule info/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4&d5=$5&d6=$6&d7=$7&d8=$8&d9=$9&d10=$10&d11=$11 [L]
RewriteRule info/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4&d5=$5&d6=$6&d7=$7&d8=$8&d9=$9&d10=$10 [L]
RewriteRule info/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4&d5=$5&d6=$6&d7=$7&d8=$8&d9=$9 [L]
RewriteRule info/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4&d5=$5&d6=$6&d7=$7&d8=$8 [L]
RewriteRule info/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4&d5=$5&d6=$6&d7=$7 [L]
RewriteRule info/([^/]+)/([^/]+)/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4&d5=$5&d6=$6 [L]
RewriteRule info/([^/]+)/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4&d5=$5 [L]
RewriteRule info/([^/]+)/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3&d4=$4 [L]
RewriteRule info/([^/]+)/([^/]+)/(.*) /content.php?d1=$1&d2=$2&d3=$3 [L]
RewriteRule info/([^/]+)/(.*) /content.php?d1=$1&d2=$2 [L]
RewriteRule info/(.*) /content.php?d1=$1 [L]

facepalm.php

wiz, 24 Ноября 2010

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

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

+173

1
2
3

$query = "SELECT `id`, IF(`nalichie` = 0, '0.png', '1.png') AS `nalichieimg`, `cena` FROM `buttons`";
//не достойные внимания строки опущены.
echo '<img src="'.$row['nalichieimg'].'">';

Я понимаю, что для оптимизации некоторые задачи лучше бывает перенести на сторону БД. Но не на столько же!!! o_0

Uchkuma, 24 Ноября 2010

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

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

−857

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

-- Возвращает название месяца по русский
   FUNCTION fmonstr (pmon IN VARCHAR2)
      RETURN CHAR
   IS
      TYPE tmon IS TABLE OF VARCHAR2 (60)
         INDEX BY BINARY_INTEGER;

      amon   tmon;
   BEGIN
      amon (1) := 'ЯНВАРЬ';
      amon (2) := 'ФЕВРАЛЬ';
      amon (3) := 'МАРТ';
      amon (4) := 'АПРЕЛЬ';
      amon (5) := 'МАЙ';
      amon (6) := 'ИЮНЬ';
      amon (7) := 'ИЮЛЬ';
      amon (8) := 'АВГУСТ';
      amon (9) := 'СЕНТЯБРЬ';
      amon (10) := 'ОКТЯБРЬ';
      amon (11) := 'НОЯБРЬ';
      amon (12) := 'ДЕКАБРЬ';
      RETURN amon (TO_NUMBER (pmon));
      NULL;
   END;                                                        --  End fMonStr

о наличие nls_date_language=russian и to_char() видимо не догадывались

itaho, 24 Ноября 2010

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

Python / Говнокод #4734

−166

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

import cgi
import MySQLdb
 
MyDB=MySQLdb.connect(host='localhost', user='root', passwd='', db='serv')
cursor=MyDB.cursor()
cursor.execute("""SELECT * FROM IndexPage WHERE id=2""")
zg1=cursor.fetchall()
zp=cgi.FieldStorage()
p=zp.has_key('pages')
lixt='lrof'
title='{TITLE}'
Block1='{BLOCK_1}'
 
if p==1:
    print 'Content-Type: text/html\n'
    sh=open(r'themplates/sh2')
    res=sh.read()
    ...

Пхпшники пересаживаются на Питон

qbasic, 24 Ноября 2010

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

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