Маркетинг в Красном Городе

Очень много слов скопилось. Поэтому решил не просто написать комментарии к Вашему посту, мистер Билли, а запостится самостоятельно. Судя по цитате Ульянова, вы сильно скучаете по тем временам, когда наша страна уверенными шагами шла к коммунизму. И над Вашим разумом, как Вы сам выразились, «по прежнему довлеет» идея светлого коммунистического рая и то что «партия – наш рулевой». Поэтому Вам трудно понять, что все, подобные Комиссии РСПП, заседания и посиделки делаются не во благо, а как раз таки наоборот. Именно на таких вот заседаниях и принимаются запретительные документы, принимаются решения о начале войн, о локальных конфликтах и т.п. мерзости. Потом это плавно переносится на более высокий уровень, что бы все утвердить законодательно. Вы рекомендовали обратится к первоисточнику, описанного Вами заседания, я обратился и заметил небольшой факт, который Вы упустили. А именно – почему на таком уважаемом заседании из всех операторов большой тройки был только «Мегафон»? Что у МТС и Билайна нет таких проблем? Или они давным давно договорились со Skype и получают часть своей прибыли? Или им деньги не нужны? Не знаю, но не понятно. Мое мнение, что «Мегафин» не смог договориться со Skype-пом и вынужден действовать самостоятельно.  Действия простые – построить свою, подобную Skype-пу, систему, а после ее внедрения Skype запретить. Если не всероссийском уровне, то хотя бы на уровне «Мегафон». Для того, что бы потом, после запрета не получить по носу, необходим закон, который в ближайшее время скорее всего и будет подготовлен. Для того, что запрещающий закон родился, господин Ермаков и делал акценты на основные, наиболее интересные для власть имущих вопросы – не уплата налогов иностранной фирмой и СОРМ. Достал красную тряпку и помахал ею. Естественно, что всех этих недостатков система, внедряемая «Мегафон»ом, будет лишена. Что касается Ваших выводов о том, что «будет снижения цен» - я бы не спешил. О каком снижении цен можно говорить, если господин Ермаков практически пообещал при развитии альтернативной технологии в «Мегафон» и при запрете Skype, он будет исправно платить налоги с вновь освоенных денег. О каком снижении тарифов при использовании VoIP может идти речь?! Мы можем говорить только о законе, который позволит грамотно и технично снимать деньги с населения.
Одним словом, разочаровали вы меня, господин Билли. Ой как разочаровали своими не далекими и поспешными выводами. На Вашем месте, я бы убрал пост и позорился. Если хотите, могу предложить пари – если будет принят действительно разумный, не запрещающий закон, если Skype не запретят в течении до конца 2009 года – то с меня пиво в любом кабаке.

Lamer.

Коллега увидел оформление мною командировочных расходов и очень сильно захотел получить такой вот замечательный код, так сказать hit (hits) сезона. Честно говоря я его давным давно вытащил откуда-то из Интернета и не помню какой добрый человек его написал и выложил, знал бы разместил бы ссылку на его сайт. Но коли бесплатно его в свое время получил, то бесплатно и выкладываю для скачивания (одним файлом можно его скачать тут - Скрип для перевода в рубли прописью) Идея довольно простая - есть число, необходимо представить его прописью и добавить слово рублей. С копейками мне работать не приходится, поэтому ставится всегда “00 коп.”, если кого-то не устраивает - дорабатывайте, на свой вкус.

Прикручивается он к Excel довольно просто и на то как это сделать есть масса описаний в Интернете, поэтому размещаю сам текст (еще раз спасибо неизвестному доброму человеку за его написание):

Attribute VB_Name = “Module1″
Function propis(SourceDigits As Currency) As String
Dim STRNG As String, CHAR, Result As String, Prom As String
Dim i, STRNG_len As Long
Dim SourceDigTail As Currency

SourceDigTail = (SourceDigits - Int(SourceDigits)) * 100
SourceDigits = Int(SourceDigits)

STRNG = SourceDigits
STRNG_len = Len(STRNG)
For i = 1 To 9 - STRNG_len Step 1
STRNG = “0″ & STRNG
Next i

For i = 9 To 9 - STRNG_len + 1 Step -1
CHAR = Mid(STRNG, i, 1)
If CHAR = “” Then GoTo end_c

If i = 2 Or i = 5 Or i = 8 Then
If CHAR = “1″ Then
CHAR = Mid(STRNG, i, 2)
Select Case CHAR
Case “10″
Prom = “десять ”
Case “11″
Prom = “одиннадцать ”
Case “12″
Prom = “двенадцать ”
Case “13″
Prom = “тринадцать ”
Case “14″
Prom = “четырнадцать ”
Case “15″
Prom = “пятнадцать ”
Case “16″
Prom = “шестнадцать ”
Case “17″
Prom = “семьнадцать ”
Case “18″
Prom = “восемьнадцать ”
Case “19″
Prom = “девятнадцать ”
End Select
Else  ‘ If char Not = 1
Select Case CHAR
Case “0″
Prom = “”
Case “2″
Prom = “двадцать ”
Case “3″
Prom = “тридцать ”
Case “4″
Prom = “сорок ”
Case “5″
Prom = “пятьдесят ”
Case “6″
Prom = “шестьдесят ”
Case “7″
Prom = “семьдесят ”
Case “8″
Prom = “восемьдесят ”
Case “9″
Prom = “девяносто ”
End Select
End If
End If
If i = 1 Or i = 4 Or i = 7 Then
Select Case CHAR
Case “0″
Prom = “”
Case “1″
Prom = “сто ”
Case “2″
Prom = “двести ”
Case “3″
Prom = “триста ”
Case “4″
Prom = “четыреста ”
Case “5″
Prom = “пятьсот ”
Case “6″
Prom = “шестьсот ”
Case “7″
Prom = “семьсот ”
Case “8″
Prom = “восемьсот ”
Case “9″
Prom = “девятьсот ”
End Select
End If

If i = 3 Or i = 6 Or i = 9 Then

If i = 9 And Mid(STRNG, i - 1, 1) = “1″ Then
Result = “рублей ” & Result
GoTo end_c
End If

If i = 3 And Mid(STRNG, i - 1, 1) = “1″ Then
Result = “миллионов ” & Result
GoTo end_c
End If

If i = 6 And Mid(STRNG, i - 1, 1) = “1″ Then
Result = “тысяч ” & Result
GoTo end_c
End If

Select Case CHAR
Case “0″
Prom = “”
Case “1″
If i = 6 Then
Prom = “одна ”
Else
Prom = “один ”
End If
Case “2″
If i = 6 Then
Prom = “две ”
Else
Prom = “два ”
End If
Case “3″
Prom = “три ”
Case “4″
Prom = “четыре ”
Case “5″
Prom = “пять ”
Case “6″
Prom = “шесть ”
Case “7″
Prom = “семь ”
Case “8″
Prom = “восемь ”
Case “9″
Prom = “девять ”
End Select
End If
Select Case i

Case 3
Select Case CHAR
Case “1″
Result = “миллион ” & Result
Case “2″, “3″, “4″
Result = “миллиона ” & Result
Case “5″, “6″, “7″, “8″, “9″
Result = “миллионов ” & Result
Case “0″
If STRNG_len > 6 Then
Result = “миллионов ” & Result
End If
End Select

Case 6
Select Case CHAR
Case “1″
Result = “тысячa ” & Result
Case “2″, “3″, “4″
Result = “тысячи ” & Result
Case “5″, “6″, “7″, “8″, “9″
Result = “тысяч ” & Result
Case “0″
If STRNG_len > 3 Then
Result = “тысяч ” & Result
End If
End Select

Case 9
Select Case CHAR
Case “1″
Result = “рубль ” & Result
Case “2″, “3″, “4″
Result = “рубля ” & Result
Case “0″, “5″, “6″, “7″, “8″, “9″
Result = “рублей ” & Result
End Select
End Select

Result = Prom & Result

end_c:
Next i

Result = Format(Mid(Result, 1, 1), “>”) & Mid(Result, 2)

propis = Result & Format(SourceDigTail, “00″) & ” коп.”

End Function

Вот и весь макрос. Если кто-то желает что-то написать на эту тему - пишите вот по этому адресу: mail@key-vip.com
А вот тут похожее обсуждение, того же макроса http://www.liveinternet.ru/users/lyuciena/post39732232/

Если будут силы, чуть позже выложу Excel файл, в котором это применяется при заполнении командировки и написании авансового отчета. А может вообще отдельный ТОП (TOP)  ик организую. “В помощь EXEL истам”

Всегда Ваш.

Получив в очередной раз порцию Спама, подумал - “А не использовать ли его для дела?”. Действительно, если мне он не нужен, может кому и сгодится? Тем более, что он (Спам) бывает интересным. Вот например:

“Sprint Business at the Show
Platinum Sponsor Booth #32
Exhibit Hall Hours: Tuesday, April 15, 12:00pm-2:00pm / 5:00pm-7:00pm
Wednesday, April 16, 10:00am-1:00pm

With Sprint, convergence is simple. We’ve combined the best functionality of both wireless and wired networks centered around a flexible IP-core to provide your workforce virtually anytime, virtually anywhere access to voice, video and data. Sprint delivers seamless connectivity that improves productivity, increases flexibility and helps you lower network operating costs, enabling users constant connectivity and enterprises the ability to quickly respond to changing business requirements. In addition we can manage it all, helping you give your employees access to your network how and when they need it.
Sprint Global MPLS VPNSM
Sprint Global MPLS VPN provides businesses with a seamless and secure solution in which to converge voice, video and data applications. Global MPLS VPN integrates real-time application support, access options for stationary and mobile devices, flexible routing protocol, and value-added services – all delivered via a global, 100% native IP network. In fact, Sprint is the first carrier to receive the Cisco IP VPN Multi-service Quality of Service Certification and the Cisco TelePresence Connection Certification which recognizes the inherent quality of Sprint’s tier one global IP network architecture to support convergence over a single IP/MPLS network.

Specific features of Sprint Global MPLS VPN include:

Dedicated (TDM), Ethernet, and Business DSL access options

° Access in over 137 countries worldwide
° Sprint DataLink for Wireless WAN for both primary and secondary/backup wireless access
°
° End-to-end performance SLAs for all dedicated access locations
°
° Class of service and traffic prioritization at no additional charge
° Flat rate and usage-based pricing options
°
° Internet access secured by network-based firewalls, intrusion detection, secure content management and filtering
° Network consulting
Sprint Wireless Integration
Sprint Wireless Integration is a network-based, all-IP offering that extends PBX functionality to mobile devices providing the enterprise and its employees complete mobility and accessibility. With Sprint Wireless Integration, users have a single phone number and voicemail for one-number reachability as well as PBX features such as Conferencing and Call Forwarding and simplified dialing with reduced costs for on-net calling. This solution offers lower network operation costs with free mobile calls using premise-based PBX, elimination of unnecessary trunks and immediate access to enterprise voicemail and PBX features and functionality.

Hosted IP Telephony
Sprint’s IP Voice Connect offers local and long-distance telephony services as well as voice traffic routed over a single connection to the Sprint IP network. Requiring minimal customer premise equipment, it provides seamless connections over a data wide area network (WAN) for “on-net” calling between locations alongside traditional “off-net” calls using the standard telephone network. To integrate your mobile workforce it includes features such as remote office functionality, enhanced voicemail including unified messaging and a Web portal for administrator use and end-user feature control.

Sprint Business Presentation
Keynote Presentation: “IMS and the Foundation for Converged Customer Services”
Ben Vos, Vice President, Core Technologies, Sprint Nextel, Wednesday, April 16, 8:30 am

Contact Us
Meet with Sprint Nextel representatives at our booth #32, contact us via the web at www.sprint.com/business, or call us at 1-866-653-1056 with questions or to learn more about our Fixed Mobile Convergence offerings.

Register here for FutureNet Conference “,
На этот прекрасный спамчик, можно провожать зарубежных товарисчей - пусть его и читают;). Shved - это можно сказать, для твоих форумчан. Ну и еще словечки для поисковика по вставляем нужные.

позвонили вот позвали. Не то чтобы мне это особенно нужно, но сказали могут приходить все кто захочет.
Ну что, уважаемый Винс энд компани, не хотите ли на Cisco party?