- 1
- 2
- 3
- 4
- 5
CREATE Procedure [dbo].[usp_InsertFleets]
@SSQL text
As
EXEC(@SSQL)
GO
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−859
CREATE Procedure [dbo].[usp_InsertFleets]
@SSQL text
As
EXEC(@SSQL)
GO
Минутка индусского кода
+145
// php5.1 to php4 functional, thanks for nic.ru fucked hosting
function html_decode($str){
if(function_exists("htmlspecialchars_decode")){
return stripslashes(htmlspecialchars_decode($str, ENT_QUOTES));
}else{
return stripslashes(str_replace(array("&", """, "'", "<", ">"), array("&", "\"", "'", "<", ">"), $str));
}
}
+101
procedure TSomeForm.DBGridEhDrawColumnCell(SomeParams);
begin
ShowRecordCount(GridDataSet);
end;
...
procedure ShowRecordCount(const FibDataSet: TpFibDataSet);
begin
FormMain.StatusBar1.Panels[2].Text := 'записей='+ IntToStr(FibDataSet.VisibleRecordCount);
FormMain.StatusBar1.Refresh;
end;
По ходу решения задачи решил-таки глянуть, почему так дико тормозит главная, вся цветная грида формы, ожидая там дикие отрисовки, а там...
+158
QTextEdit *qte = new QTextEdit();
qte->setHtml(doc->toHtml());
qte->selectAll();
qte->textCursor().mergeBlockFormat(format);
qte->setTextColor(this->getTextForecolor());
doc->setHtml(qte->toHtml());
delete qte;
Задание цвета текста QTextDocument (doc) через анал.
+126
private int VedOrderBy(int N_VED)
{
switch (N_VED)
{
case 2:
return 3;
break;
case 3:
return 5;
break;
case 4:
return 1;
break;
case 5:
return 0;
break;
case 6:
return 4;
break;
case 7:
return 6;
break;
case 8:
return 2;
break;
}
return 10;
}
+159
Сколько говна уже придумано было...:
$lasthour = date("Y-m-d H:i:s", mktime(date("H")-1, date("i"), date("s"), date("m"), date("d"), date("Y")));
$query = "
UPDATE user_sid
SET online = 0
WHERE date_action < '{$lasthour}'
";
$sql->query($query);
Вместо простого и понятного:
$query = "
UPDATE user_sid
SET online = 0
WHERE date_action < DATE_FORMAT( NOW( ) - INTERVAL 1 HOUR , '%Y-%m-%d %H:%i:%s' )
";
$sql->query($query);
Печаль... :'(
+171
if(isset($_GET['menu']))
{
if(isset($_GET['id']))
{
if (!preg_match("|^[\d]+$|", $_GET['id'])) {header("Location: 405.php");}
$id = $_GET['id'];
if($id = 1){include("blocks/info.php"); exit();}
elseif($id = 2){include("blocks/resyrs.php"); exit();}
elseif($id = 3){include("blocks/nayka.php"); exit();}
elseif($id = 4){include("blocks/teachers.php"); exit();}
elseif($id = 5){include("blocks/ycheba.php"); exit();}
elseif($id = 6){include("blocks/deti.php"); exit();}
elseif($id = 7){include("blocks/pobedy.php"); exit();}
elseif($id = 8){include("blocks/online.php"); exit();}
elseif($id = 9){include("blocks/gostevay.php"); exit();}
elseif($id = 10){include("blocks/blog.php"); exit();}
elseif($id = "") {header("Location: 404.php");}
else {header("Location: 404.php");}
}
else {header("Location: 404.php");}
}
Так... на закуску.
+122
public enum SqlCallType {
Text = 1,
StoredProcedure = 2
}
private SqlCallType ConvertToSqlCallType(int sqlCallType) {
SqlCallType type = (SqlCallType)0;
if (sqlCallType == (int)SqlCallType.Text) {
type = SqlCallType.Text;
}
else if (sqlCallType == (int)SqlCallType.StoredProcedure) {
type = SqlCallType.StoredProcedure;
}
return type;
приведение enum-->int по индусски для enum'а с двумя значениями....
−102
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" на выходе строка ".", которая пытается безусловно быть преображена в число.
+145
<!--<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 угарает в который раз.
Нахера нам невидимая кнопка?