- 1
- 2
if not Assigned(ArbPower) then
DoException('Блятство');
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+145
if not Assigned(ArbPower) then
DoException('Блятство');
эмокод, но какой душевный!
−154
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
свиснул с бигресорс
+114
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-служба?
з.ы. повсеместно во всем проекте
+155
<?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>";
}
?>
+145
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 элемента...
}
лаба..сдам на следующей неделе, в надежде что у препода произойдёт переполнение и поставит, всё-таки всё работает =)
+164
public function __destruct () {
$props =& get_object_vars($this);
$props = array();
}
Двойное уничтожение (если прокатит )))).
−856
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
Автор наверное что-то хотел этим сказать. Я так и не понял :)
+153
<?php if (isset($primary_links)) : ?>
<?php print theme('links', $primary_links, array('class' => 'nav1')) ?>
<?php endif; ?>
украинская система верстки
+132
const long long_value = PyInt_AsLong(value);
const int int_value = (int)long_value;
if (PyErr_Occurred() || long_value != int_value) { /* Overflow */
PyMongo...
+145
function Redirect($url) {
print "<html><head>\n";
print "<meta http-equiv='Refresh' content='0; url=$url'>\n";
print "</head></html>\n";
exit();
}
Во как делают переадресацию нереальные пацаны!