Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+75
<input type="text" value="1" id="Count" size="1">
<a href="<?=$arResult["ADD_URL"]?>" rel="nofollow" onclick="return addToCart(this, 'catalog_detail_image', 'detail', '<?=GetMessage("CATALOG_IN_BASKET")?>');" id="catalog_add2cart_link"><span><img src="/upload/cart.jpg"></span>
o1eg,
29 Апреля 2012
+141
<?php
class GetF {
var $symbol;
public function __construct(){
$this->symbol = 'Ф';
}
}
function GetE(){
return 'е';
}
function GetL(){
$L = array('л'=>'Abracadabra');
return str_replace(array_values($L), array_keys($L), 'Abracadabra');
}
function GetI($password){
return $password == 'Please give me I' ? 'и' : 'WTF?';
}
class GetX extends GetF{
var $symbol;
public function __construct(){
$this->symbol = 'кс';
}
}
$preF = new GetF();
$F = $preF->symbol;
$E = GetE();
$L = GetL();
$I = GetI('Please give me I');
$preX = new GetX();
$X = $preX->symbol;
echo $F.$E.$L.$I.$X; //БУ парапам пам пам РА парапам пам пам ТИ парапам пам НО парапам пам памMy name is....
Mrxan,
29 Апреля 2012
+110
private void button6_Click(object sender, EventArgs e)
{
string str;
FileStream fs = new FileStream("file.data", FileMode.Open,FileAccess.Read);
BinaryReader br = new BinaryReader(fs, Encoding.UTF8);
try
{
while (true)
{
str = br.ReadString();
listBox1.Items.Add(str);
}
}
catch { MessageBox.Show("Файл file.data успешно считан", "Успех!", MessageBoxButtons.OK, MessageBoxIcon.Asterisk); }
fs.Close();
br.Close();
}
while (true)-изюминка конечно =)
а так это из курсовой первокурсницы, так что простительно
Bagger288,
29 Апреля 2012
−120
Если НЕ Докум.ПроверенноБухгалтером Тогда
ЧихПых = Истина; // подмена контрагента на НЕПРОВЕРЕНО БУХОМ
Иначе
ЧихПых = Ложь;
КонецЕсли;Вот такой вот фокус от программистов для бухгалтеров.
koshak84,
28 Апреля 2012
+84
public static String converterMsToTimeString(Long msecond){
String result="";
if (msecond!=0){
long hours = msecond /(1000*60*60);
long minuts = (msecond % (1000*60*60))/(1000*60);
long seconds = ((msecond % (1000*60*60)) %(1000*60)) / 1000;
result = (hours < 10 ? "0" + String.valueOf(hours) : String.valueOf(hours)) + ":"
+ (minuts < 10 ? "0" + String.valueOf(minuts) : String.valueOf(minuts)) + ":"
+ (seconds < 10 ? "0" + String.valueOf(seconds) : String.valueOf(seconds));
}
result=""; // not many
return result;
}Вставлено как есть. Смысл комента ускользает...
alexcom,
28 Апреля 2012
+79
function exeSQL($inSQL,$withDebug = true,$iniDb = '') {
global $db;
$tmp_db = $db;
if ($iniDb != '') {
$tmp_db = $iniDb;
}
if (isset($_SESSION['HIDDEN']) and is_numeric($_SESSION['HIDDEN']['HIDDEN']) and $_GET['HIDDEN'] == 'YES') {
echo "
<br>---------------------------------------------------------------------
BEG_TIME: " . date('h:i:s A');
print "<pre>";
print_r($inSQL);
echo "<br>END_TIME: " . date('h:i:s A') . "<br>
------------------------------------------------------------------------";
}
$result = mysql_query($inSQL, $tmp_db);
$error = mysql_error($tmp_db);
if ($error) {
if (strpos($inSQL, 'USD-CODED_RECORD:V') !== false) {
$strSQL = util::decodeRecord($inSQL);
exeSQL($strSQL, $withDebug);
return ;
}
if ($withDebug) {
// if (!is_dir("d:/temp") and $_GET['debug2'] != 'Y') {
// echo file_get_contents($_SERVER['DOCUMENT_ROOT'] . '/index.html');
// die();
// }
echo $error;
print "<pre>";
print ($inSQL);
die();
}
}
// -- CHECK IF IT WAS INSERTION ---
// -- TRY TO RETURN DATASET
$arr = @mysql_fetch_array($result);
// -- NO RESULT AT ALL
if (is_array($arr)) {
// -- RETURN AS VARCHAR ----
if (count($arr) <= 2) return $arr[0];
// FORM RESULT ARRAY TO RETURN TO USER
$res = array();
while ($arr) {
$res[] = $arr;
$arr = mysql_fetch_array($result);
}
return $res;
} else {
return '';
$id = mysql_insert_id($tmp_db);
if ($id > 0) {
return $id;
}
}
return '';
}Работа с СУБД.
nethak,
28 Апреля 2012
−366
d:/mingw/lib/gcc/../../x86_64-w64-mingw32/include/io.h:175:16: error: 'long long long' is too long for GCC
lebutirate,
28 Апреля 2012
+90
* {
display: block;
padding: 0;
margin: 0;
}
напомнил www.govnokod.ru/10060
я понял, что перестарался с таким reset.css, когда мне броузер с готовностью отобразил и title, и скрипты.
я и не думал, что браузер обращает на них внимание.
Lure Of Chaos,
28 Апреля 2012
+107
function Ns(ds: char; var vs: byte): boolean;
begin
case ds of
'Q': vs:= 81;
'W': vs:= 87;
'E': vs:= 69;
'R': vs:= 82;
'T': vs:= 84;
'Y': vs:= 89;
'U': vs:= 85;
'I': vs:= 73;
'O': vs:= 79;
'P': vs:= 80;
'A': vs:= 65;
'S': vs:= 83;
'D': vs:= 68;
'F': vs:= 70;
'G': vs:= 71;
'H': vs:= 72;
'J': vs:= 74;
'K': vs:= 75;
'L': vs:= 76;
'Z': vs:= 90;
'X': vs:= 88;
'C': vs:= 67;
'V': vs:= 86;
'B': vs:= 66;
'N': vs:= 78;
'M': vs:= 77;
else vs:= 0;
end;
if vs = 0 then Result:= false else Result:= true;
end;
Определение кода виртуальных клавиш, вот что бывает, когда кто-то не знает матчасть, вся эта белиберда легко заменяется на :
function Ns(ds: char; var vs: byte): boolean;
begin
case ds of
'A'..'Z': vs:= byte(ds);
else vs:= 0;
end;
if vs = 0 then Result:= false else Result:= true;
end;
И не лень же было клаву мучить!
Alegun,
27 Апреля 2012
+72
const
zn1 = #60; { < }
zn2 = #62; { > }
function EnCrypt(ds: string): string;
var
k,l,m: string;
i,b,g: integer;
t: char;
function Lvs(ds: byte): string;
begin
case ds of
Byte(zn1): Result:= zn1+zn2;
Byte(zn2): Result:= zn2+zn1;
0: if Random(2)=0 then Result:= zn1+zn1
else Result:= zn2+zn2;
else
Result:= Chr(ds);end;
end;
begin
if length(ds)=0 then Exit;
Randomize; k:=''; m:=''; b:=1;
for i:=1 to RandomRange(5,16) do
k:= k+Chr(RandomRange(1,256));
for i:=1 to Length(ds) do begin
g:= Byte(ds[i])xor Byte(k[b]);
l:= Lvs(g); t:= k[b];
if i<= Length(k) then m:= m+t+l else m:=m+l;
Inc(b);
if b>Length(k) then b:= 1;
end;
l:= Chr(Length(k))+m;
for i:=1 to Length(l) do begin
b:= Byte(l[I]) xor i;k:= Lvs(b);
Result:= Result+k;
end;
end;
function DeCrypt(ds: string): string;
var
k,c,l,n: string;
i,b,m: integer;
d: boolean;
function Svl(ds: string; ts: integer): char;
var t: byte;
begin
t:=Byte(ds[1]);
if ds=zn1+zn2 then t:=Byte(zn1);
if ds=zn2+zn1 then t:=Byte(zn2);
if(ds=zn1+zn1) or (ds=zn2+zn2) then t:= 0;
Result:=Chr(Byte(t xor ts));
end;
begin
if length(ds)=0 then Exit;
b:=1; i:=1; n:='';
while i<=Length(ds) do begin c:= ds[i];
if (ds[i]=zn1)or(ds[i]=zn2)then begin
c:=ds[i]+ds[i+1]; Inc(i); end;
Inc(i);
n:= n+Svl(c,b);
Inc(b);
end; c:=''; k:=''; b:=1; i:=1;
d:=false;
m:=Byte(n[1]);
Delete(n,1,1);
while i<=Length(n)do begin
if b<=m*2 then begin if d then begin
l:=n[i];
if (n[i]=zn1) or (n[i]=zn2) then
begin
l:= n[i]+n[i+1]; Inc(i);
end;
c:=c+l;
Inc(b);
d:=false;
end else
begin
k:=k+n[i]; d:=true; Inc(b);
end;
end else begin
l:= n[i];
if (n[i]=zn1) or (n[i]=zn2) then
begin l:= n[i]+n[i+1]; Inc(i); end;
c:=c+l; end;
Inc(i); end;
if length(c)=0 then Exit;
i:=1;b:=1;
while i<=Length(c)do begin
l:=c[i];
if (c[i] = zn1) or (c[i] = zn2) then
begin
l:= c[i] + c[i+1]; Inc(i);
end;
Inc(i);
Result:= Result + Svl(l, Byte(k[b]));
Inc(b);
if b>Length(k)then b:=1;
end;
end;В очень далёком 99м году была совершена попытка шифровать и дешифровать пароли пользователей простым ХОР-замесом. Тогда такой способ казался идеальным и оригинальным :) Но посмотрите, если руки не оттуда откуда надо растут, как же можно извратиться, чистый говнокод! До сих пор им пользуюсь, немного. Интересно, ктонить догадается, зачем здесь константные знаки используются?
Alegun,
27 Апреля 2012
Follow us!