- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
try
{
....
com.ExecuteNonQuery();
}
catch (Exception ex) { }
finally
{
con.Close();
}-
C# / Говнокод #2999
+126
ASP.NET
Вот так вот обрабатываем ошибки, за которые получаем ПИЗДЫ.
Интересно а откуда ж нам об них узнатьтаа :)))
otvet_popravkodon,
13 Апреля 2010
Комментарии (10) -
C# / Говнокод #2998
+116.4
- 1
- 2
- 3
- 4
- 5
string text = MyReader[2].ToString(); tt = new TableRow(); string css_clss = (text == "ИТОГО") ? "gr1" : "gr2"; int lvl = Convert.ToInt32(MyReader[1].ToString()); tt.CssClass = css_clss;ASP.NET
//Это просто в ТОП 1. Выхватывать уровень группировки SQL по слову ИТОГО, учитывая что слово Итого может изменится и процедура возвращает уровень. lvl = 5 это ИТОГОВЫЙ уровень otvet_popravkodon,
13 Апреля 2010
Комментарии (3) -
C# / Говнокод #2997
+121.8
- 1
int lvl = Convert.ToInt32(reader[0].ToString());ASP.NET
Из текста это получается лучше сделать
reader = SqlDataReader otvet_popravkodon,
13 Апреля 2010
Комментарии (10) -
C# / Говнокод #2996
+117.4
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
string GetTextDiv2(string text) { int mid = text.Length / 2; int r = text.IndexOf(" ", mid); if (r < 0) r = 5000; int l = text.IndexOf(" ", 0, mid); if (l < 0) l = 5000; if (r - mid > mid - l) // to left is closer mid = l; else mid = r; if (mid == 5000) return " " + text; return " " + text.Substring(0, mid) + " <br/> " + text.Substring(mid, text.Length - mid); }ASP.NET
// это красота просто :) делим текст пополам там где пробел, а дальше добавляем между частями перенос на новую строку :) otvet_popravkodon,
13 Апреля 2010
Комментарии (5) -
PHP / Говнокод #2995
+170.2
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
// для увеличения быстродействия - если проверка успешна - выходим из цикла, // не проверяя остальные условия. do { if (is_numeric($variable)) { // do smth break; } if (is_null($variable)) { // do smth break; } // еще несколько ифоф $variable = '\'ERROR_TYPE\''; } while(false);прикольно конечно) но чел походу не знал про switch-case
litrumb,
13 Апреля 2010
Комментарии (371) -
C# / Говнокод #2994
+971.8
- 1
- 2
- 3
- 4
- 5
- 6
- 7
oi.Status = o.Active && o.ByCondition!=Condition.None && o.Time==DateTime.MinValue ? OrderStatusType.Condition : o.Active ? OrderStatusType.Active : o.Cancelled ? OrderStatusType.Cancelled : o.Matched ? OrderStatusType.Matched : OrderStatusType.Unknown;Суровый такой, очень суровый код. Спартанец-неформал.
terR0Q,
13 Апреля 2010
Комментарии (9) -
PHP / Говнокод #2993
+174.2
- 1
require_once(substr(__FILE__, 0, strlen(__FILE__) - strlen("/start.php"))."/bx_root.php");Подключаем файл относительно текущей директории скрипта (start.php)
© 1С-Битрикс, версия 8.x
beono,
13 Апреля 2010
Комментарии (24) -
PHP / Говнокод #2992
+200.8
- 1
$d=str_replace('-', '.', date("Y-m-d"));Дата через точку )))
pasha,
12 Апреля 2010
Комментарии (18) -
PHP / Говнокод #2991
+157.8
- 1
- 2
- 3
- 4
- 5
- 6
function dayTimestamp($t=null) { if (!$t) $t = time(); $t = explode('-',date('Y-m-d',$t)); $t = mktime(0,0,0,$t[1],$t[2],$t[0]); return $t; }
TWINc,
12 Апреля 2010
Комментарии (15) -
VisualBasic / Говнокод #2990
−125.2
- 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
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
Sub Макрос2() Dim pos0, pos1, pos2, pos3, pos4, pos5, pos6, pos7, pos8, pos9, digitPos As Integer For Counter = 2 To 999999 digitPos = 1000 Set curCell = Worksheets("Лист1").Cells(Counter, 5) Set primCell = Worksheets("Лист1").Cells(Counter, 6) pos0 = InStr(1, primCell.Value, "0") pos1 = InStr(1, primCell.Value, "1") pos2 = InStr(1, primCell.Value, "2") pos3 = InStr(1, primCell.Value, "3") pos4 = InStr(1, primCell.Value, "4") pos5 = InStr(1, primCell.Value, "5") pos6 = InStr(1, primCell.Value, "6") pos7 = InStr(1, primCell.Value, "7") pos8 = InStr(1, primCell.Value, "8") pos9 = InStr(1, primCell.Value, "9") If pos0 > 0 And pos0 < digitPos Then digitPos = pos0 End If If pos1 > 0 And pos1 < digitPos Then digitPos = pos1 End If If pos2 > 0 And pos2 < digitPos Then digitPos = pos2 End If If pos3 > 0 And pos3 < digitPos Then digitPos = pos3 End If If pos4 > 0 And pos4 < digitPos Then digitPos = pos4 End If If pos5 > 0 And pos5 < digitPos Then digitPos = pos5 End If If pos6 > 0 And pos6 < digitPos Then digitPos = pos6 End If If pos7 > 0 And pos7 < digitPos Then digitPos = pos7 End If If pos8 > 0 And pos8 < digitPos Then digitPos = pos8 End If If pos9 > 0 And pos9 < digitPos Then digitPos = pos9 End If 'MsgBox Left(primCell.Value, digitPos - 1) curCell.Value = Trim(Left(primCell.Value, digitPos - 1)) Next Counter End SubЯ идиот и не умею программировать в excel!!
Мне надо было отрезать текст до первой цифры в одной ячейке и засунуть его в другую.
Наверное, надо было почитать про массивы в VB
striker,
12 Апреля 2010
Комментарии (9)
Follow us!