1. Pascal / Говнокод #4673

    +145

    1. 1
    2. 2
    if not Assigned(ArbPower) then
          DoException('Блятство');

    эмокод, но какой душевный!

    stokito, 18 Ноября 2010

    Комментарии (9)
  2. VisualBasic / Говнокод #4672

    −154

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    Public appWorld As Excel.Application
    Public wbWorld As Excel.Workbook
    Sub Setup() 
    On Error Resume Next 'ignore errors
    Set appWorld = GetObject("Excel.Application")
    If Err.Number <> 0 Then
    Set appWorld = CreateObject("Excel.Application") 'run it
    End If
    Err.Clear
    End Sub

    свиснул с бигресорс

    TEEN, 18 Ноября 2010

    Комментарии (0)
  3. C# / Говнокод #4671

    +114

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    public static DataTable GetMainMenu()
    {
        DataTable dt = null;
        if (DataManager.IsClientServer)
        {
            dt = new DataTable();
            using (OracleCommand qGetMainMenu = new OracleCommand())
            {
                qGetMainMenu.Connection = DataManager.OracleSession;
                qGetMainMenu.CommandText = String.Format("SELECT * FROM {0}.V_MENU", DataManager.DataSchema);
                using (OracleDataReader odr = qGetMainMenu.ExecuteReader())
                {
                    dt.Load(odr);
                    odr.Close();
                }
            }
        }
        else
        {
            using (Service.AbvServiceClient client = Utils.CreateServiceClient())
            {
                dt = client.GetMainFormMenu();
            }
        }
        return dt;
    }

    2-х или 3-х звенка? прямой вызов или Wcf-служба?
    з.ы. повсеместно во всем проекте

    coyote, 18 Ноября 2010

    Комментарии (12)
  4. PHP / Говнокод #4670

    +155

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    <?php
    if ( !defined("MAGIC_WORD") ) die( "Доступ к данной странице запрещен!" );
    /**
     * ==============================
     * Page Load
     * ============================== 
     */
    $file = phpInjection(sqlInjection(@$_GET['f']));
    switch ($file)
    {
        case "news":
            $module = "news.php";
            break;
        case "lk":
            $module = "profile.php";
            break;
        case "register":
            $module = "register.php";
            break;
        case "stat":
            $module = "stat.php";
            break;
        case "forget":
            $module = "forget.php";
            break;
        case "vote":
            $module = "vote.php";
            break;
        case "webmoney":
            $module = "webmoney.php";
            break;
        default:
            $module = "main.php";
    }
    if (file_exists(ROOT_DIR . "/engine/" . $module))
    {
        include ROOT_DIR . '/engine/' . $module;
    }
    else
    {
        $tpl->result["content"] = "<div class='error'>Ошибка 404. Страница не найдена</div>";
    }
    ?>

    rat4, 17 Ноября 2010

    Комментарии (26)
  5. C++ / Говнокод #4669

    +145

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    for(i=0;i<=15;i++) {
     o=Odd(N[i]);s=Simple(N[i]);//Odd-проверка на нечётность всех цифр, Simple-на простое число
     if((o&&s)||(N[i]==3||N[i]==5||N[i]==7)) 
    {
    }
     else cprintf("%d ",N[i]); //и вот тут замкнуло...но по другому никак)
     if(i>n+4) goto exit;//потерялись 4 элемента...
     }

    лаба..сдам на следующей неделе, в надежде что у препода произойдёт переполнение и поставит, всё-таки всё работает =)

    aelaa, 17 Ноября 2010

    Комментарии (7)
  6. PHP / Говнокод #4668

    +164

    1. 1
    2. 2
    3. 3
    4. 4
    public function __destruct () {
      $props =& get_object_vars($this);
      $props = array();
    }

    Двойное уничтожение (если прокатит )))).

    dwinner, 17 Ноября 2010

    Комментарии (25)
  7. SQL / Говнокод #4667

    −856

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    create   Function [dbo].[BuildString](	@a char(1),
    			       	@b char(1),
    			       	@c char(2),
    			       	@d char(2),
    			       	@e char(1),
    				@f char(1),
    			       	@g char(1),
    			       	@h char(2),
    			       	@i char(2),
    			       	@j char(1),
    				@k char(2),
    			       	@l char(1),
    				@m char(2),
    			       	@n char(1),
    				@o char(1),
    			       	@p char(1),
    			       	@q char(2),
    			       	@r char(2),
    				@s char(1),
    			       	@t char(1),
    				@u char(1),
    			       	@v char(1),
    			       	@w char(2),
    			       	@x char(2),
    			       	@y char(2),
    			       	@z char(1),
    				@a0 char(1),
    			       	@a1 char(1),
    			       	@a2 char(2),
    			       	@a3 char(2),
    				@a4 char(4))
    returns char(47)
    as
    begin
    
    declare @text char(47)
    
    set @text = @a+@b+@c+@d+@e+@f+@g+
    		@h+@i+@j+@k+@l+@m+@n+
    		@o+@p+@q+@r+@s+@t+@u +
    		@v+@w+@x+@y+@z+
    		@a0+@a1+@a2+@a3+@a4
    
    return @text

    Автор наверное что-то хотел этим сказать. Я так и не понял :)

    adler, 17 Ноября 2010

    Комментарии (6)
  8. PHP / Говнокод #4666

    +153

    1. 1
    2. 2
    3. 3
    <?php if (isset($primary_links)) : ?>
    <?php print theme('links', $primary_links, array('class' => 'nav1')) ?>
    <?php endif; ?>

    украинская система верстки

    fatdevil, 17 Ноября 2010

    Комментарии (33)
  9. Си / Говнокод #4665

    +132

    1. 1
    2. 2
    3. 3
    const long long_value = PyInt_AsLong(value);                                      
    const int int_value = (int)long_value;                                            
    if (PyErr_Occurred() || long_value != int_value) { /* Overflow */

    PyMongo...

    raorn, 17 Ноября 2010

    Комментарии (12)
  10. PHP / Говнокод #4664

    +145

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    function Redirect($url) {
      print "<html><head>\n";
      print "<meta http-equiv='Refresh' content='0; url=$url'>\n";
      print "</head></html>\n";
      exit();
    }

    Во как делают переадресацию нереальные пацаны!

    dwinner, 17 Ноября 2010

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