Вход на сайт
Не по-русски
NEW 10.02.04 19:14
в ответ LEDI S 10.02.04 19:04
NEW 10.02.04 19:21
в ответ LEDI S 10.02.04 19:04
Тааак.... идёшь сюды http://www.artlebedev.ru/tools/decoder/ копируеш всё в поле для ввода жмёш на "расшифровать" и возможно тебе повезёт 
http://www.CTAPT.de
http://COOLSITES.CTAPT.de
http://www.CTAPT.de
http://COOLSITES.CTAPT.de
NEW 10.02.04 21:00 
Умница! Слушай, скажи честно, неужели еще кто- то на эту чушь ловится?
Но ведь до чего эти Амвейщики, Гербалайфщики и т.д. насобачились рекламу свою делать!
"Ой мальчики! Ой помогите! Ой замкнуло что-то в компьютере и циферки с буковками поменялись
Ой, помогите, ежели кто умный тут есть..."
А мальчики и рады стараться, грудь выпятили, проблему решили... почитали- проплевались, а одного вырвало...
Молодец девочка! Сама придумала- или это новая фишка у Амвея такая?
в ответ LEDI S 10.02.04 19:04
Умница! Слушай, скажи честно, неужели еще кто- то на эту чушь ловится?
Но ведь до чего эти Амвейщики, Гербалайфщики и т.д. насобачились рекламу свою делать!
"Ой мальчики! Ой помогите! Ой замкнуло что-то в компьютере и циферки с буковками поменялись
Ой, помогите, ежели кто умный тут есть..."А мальчики и рады стараться, грудь выпятили, проблему решили... почитали- проплевались, а одного вырвало...
Молодец девочка! Сама придумала- или это новая фишка у Амвея такая?
NEW 10.02.04 21:26
в ответ Дидердерди 10.02.04 21:00
Милый, речь шла не о фирме, а о документе.
Не счет фирмы я бы обратилась в другой форум.
Но я давно уже не делаю так.
Тлько лично разговариваю с людьми.
Поэтому и тут не собираюсь о деле говорить..
Мне помог молодой человек, за что ему и спасибо.
Тема закрыта!
Не счет фирмы я бы обратилась в другой форум.
Но я давно уже не делаю так.
Тлько лично разговариваю с людьми.
Поэтому и тут не собираюсь о деле говорить..
Мне помог молодой человек, за что ему и спасибо.
Тема закрыта!
NEW 10.02.04 22:14
в ответ LEDI S 10.02.04 21:26
Да ладно, чо ты!
Свои люди!
Это ж типа"лучше пусть дочь проститутка будет, чем Амвеем торгует"(с)Это же только дураки так говорят!
Ты вон, какая симпапуля, могла бы по другому денюжки зарабатывать
Стояла бы где-нито на углу, ногой столб подпирала, пузыри из жвачки надувала, "мужчина, предложите девушке сигарету..." А за одним бы Амвеем приторговывала... 
А ты вместо того, что бы договора заключать, лохов искать, компьютер купила... мучаешься теперь...
Свои люди!
Это ж типа"лучше пусть дочь проститутка будет, чем Амвеем торгует"(с)Это же только дураки так говорят!
Ты вон, какая симпапуля, могла бы по другому денюжки зарабатывать
Стояла бы где-нито на углу, ногой столб подпирала, пузыри из жвачки надувала, "мужчина, предложите девушке сигарету..." А за одним бы Амвеем приторговывала...
А ты вместо того, что бы договора заключать, лохов искать, компьютер купила... мучаешься теперь...
NEW 10.02.04 23:18
в ответ Дидердерди 10.02.04 22:14
можно конечно многое себе позволить, но хамство, тем более по отношение к девушке, поведение недостойное.
или тебя как лоха кинули и ты теперь пыжишься?
тоже мне крутой рэйнджер, с женщиной воевать
здесь могла бы быть моя автоподпись
или тебя как лоха кинули и ты теперь пыжишься?
тоже мне крутой рэйнджер, с женщиной воевать
здесь могла бы быть моя автоподпись
здесь могла бы быть моя автоподпись
NEW 10.02.04 23:28
в ответ Дидердерди 10.02.04 22:14
Парень, когда тебе пытаешься помочь, ты грубишь и говоришь "Вот так и задавай вопросы тут, это же геройство!!!" Ну так что же ты развопился? Герой... Что флудишь и наезжаешь? Мне абсолютно нет разницы, что там написано? Я это не читаю
Папуас папуасу друг, товарищ и корм.
Папуас папуасу друг, товарищ и корм.
NEW 10.02.04 23:40
в ответ игoрь 10.02.04 23:18
Ах, благородный Игорь..Я понимаю, что тобой движет- и вполне разделяю твое стремление ей понравиться- очков набрать...
Да только я не с женщиной воюю- а против явления, как такового!
Женщина, как раз, вполне приличная...
Поэтому все эти пускания пузырей и благородный гнев- не ко мне... я люблю женщин...
Но ты бы ей много больше понравился, если бы Авейчику купил у нее
Да только я не с женщиной воюю- а против явления, как такового!
Женщина, как раз, вполне приличная...
Поэтому все эти пускания пузырей и благородный гнев- не ко мне... я люблю женщин...
Но ты бы ей много больше понравился, если бы Авейчику купил у нее
NEW 11.02.04 06:14
в ответ LEDI S 10.02.04 18:58
А в принципе ты можешь сама всё сделать, зато какое удовлетворение будет 
Вставь текст огранниченный точками в макрос и всё. Единственная проблема, что и английский текст проконверируется, но его то уж намного меньше , а DM можно заменить с помощью функции Ersetzen
..........
Sub Translit()
Dim oSld As Slide
Dim oShp As Shape
Dim oTxtRng As TextRange
Dim oTmpRng As TextRange
Dim cSld, iSld, i, j, l As Integer
en$ = "qwertyuiop[]asdfghjkl;'zxcvbnm,.QWERTYUIOP{}ASDFGHJKL:ZXCVBNM<>"
ru$ = "йцукенгшщзхъфывапролджэячсмитьбюЙЦУКЕНГШЩЗХЪФЫВАПРОЛДЖЯЧСМИТЬБЮ"
cSld = Application.ActivePresentation.Slides.Count
For iSld = 1 To cSld
Set oSld = Application.ActivePresentation.Slides(iSld)
For Each oShp In oSld.Shapes
If oShp.TextFrame.HasText Then
Set oTxtRng = oShp.TextFrame.TextRange
i = oShp.TextFrame.TextRange.Length
For j = 1 To i
l = InStr(en$, oTxtRng.Characters(j))
If l > 0 Then
enLetter = Mid$(en$, l, 1)
ruLetter = Mid$(ru$, l, 1)
Set oTmpRng = oTxtRng.Replace(FindWhat:=enLetter, _
Replacewhat:=ruLetter, MatchCase:=True)
Do While Not oTmpRng Is Nothing
Set oTmpRng = oTxtRng.Replace(FindWhat:=enLetter, _
Replacewhat:=ruLetter, MatchCase:=True)
Loop
End If
Next j
End If
Next oShp
Next iSld
End Sub
..........
Папуас папуасу друг, товарищ и корм.
Вставь текст огранниченный точками в макрос и всё. Единственная проблема, что и английский текст проконверируется, но его то уж намного меньше , а DM можно заменить с помощью функции Ersetzen ..........
Sub Translit()
Dim oSld As Slide
Dim oShp As Shape
Dim oTxtRng As TextRange
Dim oTmpRng As TextRange
Dim cSld, iSld, i, j, l As Integer
en$ = "qwertyuiop[]asdfghjkl;'zxcvbnm,.QWERTYUIOP{}ASDFGHJKL:ZXCVBNM<>"
ru$ = "йцукенгшщзхъфывапролджэячсмитьбюЙЦУКЕНГШЩЗХЪФЫВАПРОЛДЖЯЧСМИТЬБЮ"
cSld = Application.ActivePresentation.Slides.Count
For iSld = 1 To cSld
Set oSld = Application.ActivePresentation.Slides(iSld)
For Each oShp In oSld.Shapes
If oShp.TextFrame.HasText Then
Set oTxtRng = oShp.TextFrame.TextRange
i = oShp.TextFrame.TextRange.Length
For j = 1 To i
l = InStr(en$, oTxtRng.Characters(j))
If l > 0 Then
enLetter = Mid$(en$, l, 1)
ruLetter = Mid$(ru$, l, 1)
Set oTmpRng = oTxtRng.Replace(FindWhat:=enLetter, _
Replacewhat:=ruLetter, MatchCase:=True)
Do While Not oTmpRng Is Nothing
Set oTmpRng = oTxtRng.Replace(FindWhat:=enLetter, _
Replacewhat:=ruLetter, MatchCase:=True)
Loop
End If
Next j
End If
Next oShp
Next iSld
End Sub
..........
Папуас папуасу друг, товарищ и корм.
NEW 11.02.04 15:10
в ответ barma_lej 11.02.04 06:14
Нет уж лучше я скину тебе, а ты сделаешь, я чесно говоря не поняла 
Да еще и начиталась тут высказывания некого "любителя женщин" и Амвея
Что тем более трудно сообразить.
Получается я вам не проблему как таковую предложила решить, а почитать, что там написано....дело в том, что там вообще обрывок....и потом зачем мне посылать в ТАКОМ ВИДЕ то, что я, якобы, хочу предложить людям. Глупо.
Если хотела бы, то пошла бы в Дискуссионный клуб, там я была уже год назад и поняла, что бесполезно разговаривать с людьми , котрорых это просто не интересует. Я не люблю и не собираюсь навязывать свое мнение другим. Каждый сам решает, что он хочет от этой жизни. Я выбрала это.
Спасибо тем, кто заступился.
Не перевелись еще приличные мужчины (пусть примут за комплемент те, кто это заслуживает)
Нас по-моему скоро перенесут в другой форум....человек завел тему в другое русло.
Да еще и начиталась тут высказывания некого "любителя женщин" и Амвея
Что тем более трудно сообразить.
Получается я вам не проблему как таковую предложила решить, а почитать, что там написано....дело в том, что там вообще обрывок....и потом зачем мне посылать в ТАКОМ ВИДЕ то, что я, якобы, хочу предложить людям. Глупо.
Если хотела бы, то пошла бы в Дискуссионный клуб, там я была уже год назад и поняла, что бесполезно разговаривать с людьми , котрорых это просто не интересует. Я не люблю и не собираюсь навязывать свое мнение другим. Каждый сам решает, что он хочет от этой жизни. Я выбрала это.
Спасибо тем, кто заступился.
Не перевелись еще приличные мужчины
(пусть примут за комплемент те, кто это заслуживает) Нас по-моему скоро перенесут в другой форум....человек завел тему в другое русло.
NEW 11.02.04 17:15
в ответ andrey604 11.02.04 16:57
Сначала, с помощью макроса (подзабыл, как писать, решил вспомнить ), потом DM и US с помощью Ersetzen, потом с помощью PuntoSwitcher выделял английские или немецкие слова и Schift+Break. Так он принудительно транслитерирует .
Папуас папуасу друг, товарищ и корм.
), потом DM и US с помощью Ersetzen, потом с помощью PuntoSwitcher выделял английские или немецкие слова и Schift+Break. Так он принудительно транслитерирует .Папуас папуасу друг, товарищ и корм.