- 1
if (($logons_result > 0) && ($logons_result < 2)) {
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+143
if (($logons_result > 0) && ($logons_result < 2)) {
шаманство
+144
public int[] GetIntVideoAll(int videoCount)
{
List<int> listOfIntsVideo = new List<int>();
for (int i = 0; i < videoCount; i++)
{
listOfIntsVideo.Add(i);
}
return listOfIntsVideo.ToArray();
}
foreach (int item in mediaServ.GetIntVideoAll(videoCount))
{ ........}
Вот так вот. Такие жемчужины встречаются с частотой примерно раз в 10 минут в коде одного проекта который я переписываю.
+156
abstract class FR_Request_Common
{
use FR_Library_Class_ParamHandler
}
Я просто оставлю это тут
+101
var
Excel: OleVariant;
Rows, Cols: integer;
WorkSheet: OleVariant;
DebugList: TStringList;
I, j, CSeek: integer;
R, ArrV: OleVariant;
ObjData: TDataContainer;
D: integer;
begin
{$IFDEF DEBUG}
DebugList := TStringList.Create;
{$ENDIF}
try
Excel := CreateOleObject('Excel.Application');
Excel.Visible := false;
Excel.Workbooks.Open[DocPath, 0, True];
WorkSheet := Excel.ActiveWorkbook.ActiveSheet;
R := Excel.Intersect(WorkSheet.UsedRange,
WorkSheet.UsedRange.Offset[14, 0]);
ArrV := R.Value;
Rows := VarArrayHighBound(ArrV, 1);
Cols := VarArrayHighBound(ArrV, 2);
{$IFDEF DEBUG}
DebugList.Add(Format('Количество ячеек в таблице = %d', [(Rows) * Cols]));
DebugList.Add(Format('Rows = %d, Cols = %d', [Rows, Cols]));
{$ENDIF}
CSeek := 0;
D := 1;
for I := 1 to Rows do
begin
if (CompareStr(Trim(VarToStr(ArrV[I, 1])), Trim('Итого')) = 0) then
Break;
if (CompareStr(Trim(VarToStr(ArrV[I, 1])),
Trim('отдел')) = 0) or
(CompareStr(Trim(VarToStr(ArrV[I, 1])), Trim('10.05')) = 0) or
(CompareStr(Trim(VarToStr(ArrV[I, 1])), Trim('10.06')) = 0) or
(CompareStr(Trim(VarToStr(ArrV[I, 1])), Trim('10.09')) = 0) then
begin
CSeek := I + 2;
Continue;
end;
if CSeek > I then
Continue;
for j := 1 to Cols do
begin
case j of
1:
begin
if VarToStr(ArrV[I, j]) <> '' then
begin
ObjData := TDataContainer.Create;
ObjData.Name := ArrV[I, j];
end;
end;
3:
begin
if VarToStr(ArrV[I, j]) <> '' then
ObjData.InventoryNumber := GetInventoryNumber(ArrV[I, j]);
end;
10:
begin
if (D mod 2 <> 0) then
begin
if VarToStr(ArrV[I, j]) <> '' then
ObjData.DataCount := ArrV[I, j];
end
else
ObjData.Cost := ArrV[I, j];
if (ObjData <> nil) and (ObjData.DataCount > 0) then
begin
FData.Add(ObjData);
DebugList.Add(ObjData.AsString);
end;
end;
end;
Inc(D);
end;
end;
{$IFDEF DEBUG}
DebugList.Add('Objects created: ' + IntToStr(FData.Count));
D:=1;
for ObjData in FData.Items.Values do
D := D + ObjData.DataCount;
DebugList.Add('Total objects count: ' + IntToStr(D));
DebugList.SaveToFile('C:\ExcelDebug.txt');
{$ENDIF}
finally
{$IFDEF DEBUG}
DebugList.Free;
{$ENDIF}
Excel.Quit;
end;
end;
При разборе выхлопа из 1С в Excel - excel и формат выгрузки сделали всё, чтобы я люто наговнокодил-(
+166
public function isRequisitesCorrect()
{
switch (true) {
case $this->isRequisitesSigned() :
return true;
default:
return false;
}
}
+160
eval('function func($what) {global $arr, $USER, $SCRIPT; '.$func.'}');
−91
def update
error = false
if params[:geografic].present? && ((params[:geografic] & IsoCountryCodes.all.map{|c|c.alpha2.downcase}) == params[:geografic])
current_user.profile.geografic = params[:geografic]
else
error = true
flash[:alert] ||= ''
flash[:alert] << "Need select countries. "
end
begin
current_user.profile.sectors_of_interests = Sector.find(params[:sectors_of_interests])
rescue
error = true
flash[:alert] ||= ''
flash[:alert] << 'Can not find sectors. '
end
if params[:profession_id].present? && profession = Profession.find(params[:profession_id])
current_user.profile.update_attribute(:profession_id, params[:profession_id])
else
error = true
flash[:alert] ||= ''
flash[:alert] << 'Can not find profession. '
end
if ['cn', 'gb'].include?(params[:language_iso])
current_user.profile.update_attribute(:country_iso, params[:language_iso])
else
error = true
flash[:alert] ||= ''
flash[:alert] << "Need select language. "
end
if params[:telephone].present?
current_user.profile.update_attribute(:phone, params[:telephone])
else
error = true
flash[:alert] ||= ''
flash[:alert] << "Need input phone number. "
end
require_additional_info = (current_user.geografic.blank? || current_user.sectors_of_interests.blank? || current_user.profession.blank? || current_user.phone.blank?)
if require_additional_info || error
redirect_to user_path(current_user) and return
else
redirect_to root_path
end
end
Первый раз я видел такое два года назад, думал, что за это время что-то поменялось в людях, неа. А вы говорите индусы
+162
<td valign="top" class="pt" <?echo "style='width:20%;max-width: 237px;'";?>>
В шаблоне сайта Битрикса.
+158
<?
include 'const.php';
PrintUP("404");
Echo "<img src='https://lh4.googleusercontent.com/-WnF8tpKQA20/AAAAAAAAAAI/AAAAAAAAEEE/IDe9WUshb8c/s120-c/photo.jpg'>Страница не найдена. =(";
PrintDOWN();
?>
Не спрашивайте, что делают функции PrintUP() и PrintDOWN(). Первая - 600 строк пхп кода со вставками вида echo ' function() { js-код } ' ; , вторая - 140 строк с очень странными манипуляциями с файлами "базы данных".
+77
String value = paramValue; //make new instance