Перейти к публикации
  • Сейчас на странице   Всего пользователей: 0   (0 пользователей, 0 гостей)

Hed-kun

Программирование, т. 3

Рекомендованные сообщения

Господи нахуй ты это все написал. Заведи друзей

Нахуй друзья, если можно писать код на js? :hmm:

Поделиться сообщением


Ссылка на сообщение

Сижу без дела, на фрилансе не дают норм заказы. Хочу попробывать сделать клевый сайт для какого-нибудь запроса 100к+ в месяц типо порно флеш игры или фильмы онлайн. Есть смысл заниматься этим?Смогу ли я отхватить кусок из этого потока пользователей?

Поделиться сообщением


Ссылка на сообщение

дорвеи клепай

Т.е. если постараться из этого может что-то выгореть?

Поделиться сообщением


Ссылка на сообщение

интернет магазин на жаве сделай и пиздуй устраиваться

Поделиться сообщением


Ссылка на сообщение

Сижу без дела, на фрилансе не дают норм заказы. Хочу попробывать сделать клевый сайт для какого-нибудь запроса 100к+ в месяц типо порно флеш игры или фильмы онлайн. Есть смысл заниматься этим?Смогу ли я отхватить кусок из этого потока пользователей?

если тебе самому лично не интересно будет этим заниматься, то нихуя у тебя не получится

сначала определись с тем, что бы тебе было интересно


http://ru.iccup.com/dota/details/1295953.html

 

ИДИТЕ НАХУЙ С ТАКМИ ГОНДАРАМИ

СВЕН ТП

СВЕН ПУШИТ

СВЕН ХЕКС

СВЕН ДАБЛКИЛЛ

СВЕН 7ОО КРИПОВ

Поделиться сообщением


Ссылка на сообщение

Sub bb()

'??????????? ????? - ????? ??????, ? ?????? ? ? ????? ??????!'

Const EXCL = "aaa bbb ccc "

 

Dim s$(0 To 101), i&, n&

n = ActiveDocument.Words.Count - 1

For i = 1 To 100

Do

s(i) = Trim(ActiveDocument.Words(1 + Rnd * n))

Loop Until Len(s(i)) > 1 And InStr(1, EXCL, " " & s(i) & " ", vbTextCompare) = 0

Next

Selection.TypeText Join(s, Chr(13))

End Sub

 

Закончилось место в строке номер 3roll.gif помогите сделать еще одну такую же. А лучше сразу 7, на будущее

Поделиться сообщением


Ссылка на сообщение

Sub bb()

'??????????? ????? - ????? ??????, ? ?????? ? ? ????? ??????!'

Const EXCL = "aaa bbb ccc "

 

Dim s$(0 To 101), i&, n&

n = ActiveDocument.Words.Count - 1

For i = 1 To 100

Do

s(i) = Trim(ActiveDocument.Words(1 + Rnd * n))

Loop Until Len(s(i)) > 1 And InStr(1, EXCL, " " & s(i) & " ", vbTextCompare) = 0

Next

Selection.TypeText Join(s, Chr(13))

End Sub

 

Закончилось место в строке номер 3roll.gif помогите сделать еще одну такую же. А лучше сразу 7, на будущее

чобля?


Публикация отключена

Поделиться сообщением


Ссылка на сообщение
(изменено)

сразу видно отбитого шишрапшика, ты даже не лучше димана123456789 с жавой головного мозга

В питоне и жаваскрипте тоже есть ООП, но оно там не играет главной роли, а знаешь почему? Потому что ооп не играет главной роли в принципе, да и ООП это не что-то конкретное

Вот есть у меня класс Компания, у него есть свойста - добавить работника, выдать список всех работников, чем это не Объект? Чем не ООП?

 

Конечно сейчас налетят, те кто писал только на ООП языках (шишарп, жава) - рабиш, диман, зэдедскин. Как же так? Статичный метод. ОН ЖЕ НЕ ТЕСТИРУЕМЫЙ. ГДЕ ТЫ ВИДЕЛ ОБЪЕКТЫ СО СТАТИЧНЫМИ МЕТОДАМИ В ПРИРОДЕ? Да полно где видел. Рубишь к примеру статично срет на пд и жрет сало, и ему норм. Чем он не объект?

 

Так скажите мне, друзья мои, прошаренные. Как мне получать список всех компаний, если я ебал в рот функции? Или мне надо лепить класс типа CompanyManage? Так нахуя плодить сущности где они не нужны?

ты охуел на шишарп выебываться гниль?

да-да

:trollface:

 

 

ебаные наркоманы

прав


Изменено пользователем KotZhilkina

Публикация отключена

Поделиться сообщением


Ссылка на сообщение

Господи нахуй ты это все написал. Заведи друзей

Нахуй друзья, если можно писать код на js? :hmm:

именно

:buba:

ни мало ни много, а много и мало

Поделиться сообщением


Ссылка на сообщение

Sub bb()

'??????????? ????? - ????? ??????, ? ?????? ? ? ????? ??????!'

Const EXCL = "aaa bbb ccc "

 

Dim s$(0 To 101), i&, n&

n = ActiveDocument.Words.Count - 1

For i = 1 To 100

Do

s(i) = Trim(ActiveDocument.Words(1 + Rnd * n))

Loop Until Len(s(i)) > 1 And InStr(1, EXCL, " " & s(i) & " ", vbTextCompare) = 0

Next

Selection.TypeText Join(s, Chr(13))

End Sub

 

Закончилось место в строке номер 3roll.gif помогите сделать еще одну такую же. А лучше сразу 7, на будущее

чобля?

Ну блин в третьей строке стало настолько много переменных ааа ббб ссс что они туда больше не влезают, мне нужна еще одна такая же,с такими же функциями, как ее сделать?

Поделиться сообщением


Ссылка на сообщение

третья строка это которая с определением константы EXCL? - ну вынеси константу за пределы подпрограммы и сделай публичной:

 

public const EXCL = "aaa bbb ccc"

 

sub bb()

 

но ты бы лучше объяснил, что с текстом сделать то хочешь


Публикация отключена

Поделиться сообщением


Ссылка на сообщение

как в строковую константу может что-то не помещаться?

ты на 2гб туда инфы забил что ли?


Торжество разума в том, чтобы уживаться с теми, у кого этого разума нет. Вольтер.
Чтобы хорошо высыпаться, нужно спать 8 часов в день. И еще столько же ночью.

Поделиться сообщением


Ссылка на сообщение

как в строковую константу может что-то не помещаться?

ты на 2гб туда инфы забил что ли?

в экран не влезло, он запаниковал и быстро закрыл редактор.

Поделиться сообщением


Ссылка на сообщение

в vba стек вообще легко переполняется


Публикация отключена

Поделиться сообщением


Ссылка на сообщение
Гость 2poy_nyasha

Господи нахуй ты это все написал. Заведи друзей

Нахуй друзья, если можно писать код на js? :hmm:

да не говори ка

 

в vba стек вообще легко переполняется

поэтому он не нужен

 

десу~~~~

Поделиться сообщением


Ссылка на сообщение

в vba стек вообще легко переполняется

поэтому он не нужен

 

десу~~~~

так и куча не лучше стека


Публикация отключена

Поделиться сообщением


Ссылка на сообщение

речь шла про vba :subj:

Поделиться сообщением


Ссылка на сообщение

эта vba хуйню делает


Публикация отключена

Поделиться сообщением


Ссылка на сообщение
Гость
Эта тема закрыта для публикации сообщений.

×
×
  • Создать...