|
Работа с буфером
|
|
| Oleg | Дата: Понедельник, 30 Ноября 2009, 20:11 | Сообщение # 31 |
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| Приходит заказ на мыло(адрес+№артикл),потом заполняем бланк клеим на посылку с товаром и бежим на почту отправлять.
|
| |
| |
| mishem | Дата: Вторник, 01 Декабря 2009, 02:51 | Сообщение # 32 |
Ветеран форума
Группа: Проверенные
Сообщений: 552
Репутация: 85
Награды: 12
Статус: Offline
| DEMBEL, я извиняюсь, в ммб ж ни бум бум)) Но там же есть наверно поля ввода текста как в nb похоже ему просто нужно из текстового файла скопировать и вставить в строку ввода текст, потом распечатать. Сдесь либо как он хочет одним кликом как я понимаю, можно. Ли бо по очереди вставлять адрес, имя и т.д. Скорей всего наверно одним кликом, не хочет себя переутруждать? ))) Наверно нужно определить куда он получает мыло, потом оттуда скопировать текст, и вставить в программу. И что б все было в своем поле.
Не хочешь читать хелп?  
Если хелп и форум не помогли, тогда все ответы здесь
|
| |
| |
| DEMBEL | Дата: Вторник, 01 Декабря 2009, 14:02 | Сообщение # 33 |
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| Quote (Oleg) Приходит заказ на мыло(адрес+№артикл),потом заполняем бланк клеим на посылку с товаром и бежим на почту отправлять.
ну вроде понятно, ладно. как напечатать из проекта ммб надеюсь разобрался? если мыло приходит постоянно в одинаковом формате, то можно в принципе все мыло сразу вставлять, разобрав его на части. Я чтото забыл, сейчас у вас какие вопросы еще остались?
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
| Oleg | Дата: Вторник, 01 Декабря 2009, 19:49 | Сообщение # 34 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| mishem,я поочереди и копировал каждую стоку-это плохой вариант(быстрее руками заполнить), сейчас незнаю, доделаю попробую.
DEMBEL хотел 3 строку(индекс город)разделить на 2 части, цифры$ получил отдельно, а вот буквы$ отдельно незнаю как сделать.
|
| |
| |
| DEMBEL | Дата: Вторник, 01 Декабря 2009, 19:56 | Сообщение # 35 |
|
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| Code Clipboard("GET","string$")
fs$=CHR(13)+CHR(10)
ts$='|'
string$=StrChange(string$,fs$,ts$)
Item1$ = GetArrayItem(string$,|,1)
Item2$ = GetArrayItem(string$,|,2)
Item3$ = GetArrayItem(string$,|,3)
LoadText("Text1","Item1$")
LoadText("Text2","Item2$")
LoadText("Text3","Item3$")
LoadText("EditBox1","string$" )
вы работаете с этим кодом? я просто все не могу врубиться куда вам надо эти строки распихать, в EditBox'ы чтоли? может покажете демо-проект с которым работаете, тогда вопросы отпадут. насчет разделения последних строчек - щас подумаю че сделать...
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
| Alex3A | Дата: Вторник, 01 Декабря 2009, 20:01 | Сообщение # 36 |
Друг клуба ММВ
Группа: Проверенные
Сообщений: 2646
Репутация: 39
Награды: 11
Статус: Offline
| Да ваще копировать это плохой вариант, если подойти к задаче с умом, надо разработать
стандартный бланк заказа и просто посылать письмо на печать, распечатанное письмо или часть его клеится на посылку. Если заказы клиентов повторяются, имеет смысл держать
базу клиентов.
Ты правда не сказал, каким образом приходят письма, если с сайта то вообще можно сделать полную автоматизацию, если клиент сам вручную его клепает, то надо заставить его заполнять подготовленный бланк заказа.
|
| |
| |
| Oleg | Дата: Вторник, 01 Декабря 2009, 20:19 | Сообщение # 37 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| Alex3A да это тоже вариант неплохой, но не по моей силе, покупатели все разные, а на пакет надо стандартный почтовый бланк клеить, чуть позже покажу проект
|
| |
| |
| Alex3A | Дата: Вторник, 01 Декабря 2009, 20:52 | Сообщение # 38 |
|
Друг клуба ММВ
Группа: Проверенные
Сообщений: 2646
Репутация: 39
Награды: 11
Статус: Offline
| Откуда они берут информацию о товарах?
|
| |
| |
| Oleg | Дата: Вторник, 01 Декабря 2009, 21:12 | Сообщение # 39 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| Вот мой вариант  http://depositfiles.com/files/lkw518z3o
Сообщение отредактировал Oleg - Вторник, 01 Декабря 2009, 21:26 |
| |
| |
| DEMBEL | Дата: Вторник, 01 Декабря 2009, 23:27 | Сообщение # 40 |
|
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| Quote (Oleg) Вот мой вариант
да поздно, уже скачали, повеселились...Добавлено (01 Декабрь 2009, 23:27)
---------------------------------------------
ща разберемся... положите точную копию содержимого буфера обмена чтобы можно было проверять (с именем, фамилией и прочими... тут важен формат, наличие пробелов, переводов строк)
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
| Oleg | Дата: Вторник, 01 Декабря 2009, 23:45 | Сообщение # 41 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| DEMBEL есть идея как буквы получить из строчки?
|
| |
| |
| YURIY | Дата: Вторник, 01 Декабря 2009, 23:53 | Сообщение # 42 |
Злостный админ
Группа: Администраторы
Сообщений: 3018
Репутация: 71
Награды: 28
Статус: Offline
| Oleg, посмотрите в справке строковые функции. Справку цитировать не нужно, сами прочитаете, надеюсь?
Вечная память Андрею Сергееву!
|
| |
| |
| Oleg | Дата: Вторник, 01 Декабря 2009, 23:56 | Сообщение # 43 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| Вот копия,
Имя Фамилия
Улица №д
Индекс Город
я незнаю,но в #8 тоже точная копия но почемуто с пробелами копируется в конце строк
|
| |
| |
| DEMBEL | Дата: Среда, 02 Декабря 2009, 00:11 | Сообщение # 44 |
|
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| да я хотел посмотреть на копию с реальными именами и фамилиями, алресом. Или что, вставляете в имя слово Имя? ну ладно, я вам уже указал в чем была проблема - заменить на палку еще и символы пробела, но ладно уж сам поправлю... Добавлено (02 Декабрь 2009, 00:11)
---------------------------------------------
вот исправленный код в кнопку. Лишнее я закомментировал. Работает при четком соответствии формата содержимого. Если что, можно адаптировать и для другого формата, вы только разберитесь что к чему, и строковые функции почитайте получше.
Code Clipboard("GET","string$")
fs$=CHR(32)
ts$='|'
string$=StrChange(string$,fs$,ts$)
fs$=CHR(13)+CHR(10)
ts$=''
string$=StrChange(string$ ,fs$,ts$ )
string$=string$+'|'
Item1$ = GetArrayItem(string$,|,1)
Item2$ = GetArrayItem(string$,|,2)
Item3$ = GetArrayItem(string$,|,3)+', '+GetArrayItem(string$,|,4)
**Item4$ = GetArrayItem(string$,|,4)
Item5$ = GetArrayItem(string$,|,5)
Item6$ = GetArrayItem(string$,|,6)
LoadText("EditBox4","Item2$")
LoadText("EditBox5","Item1$")
LoadText("EditBox6","Item3$")
LoadText("EditBox7", "Item5$")
LoadText("EditBox8","Item6$")
**LoadText("Text6","Item3$")
**LoadText("Text","string$")
**Index$=Item3$
**Index=VAL(Index$)
* *Index=Index
**Index$=CHAR(Index)
**LoadText("EditBox7","Index$")
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
| Oleg | Дата: Среда, 02 Декабря 2009, 00:11 | Сообщение # 45 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| YURIY,прочитал ,но чёто ..
а какая строковая функция может мне помоч?
|
| |
| |
| DEMBEL | Дата: Среда, 02 Декабря 2009, 00:15 | Сообщение # 46 |
|
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| Quote (Oleg) а какая строковая функция может мне помоч?
StrGet - скопирует в переменную указанное число символов, начиная с указанной позиции.
StrCopy - скопирует указанный символ (надо указать порядковый номер символа).
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
| Oleg | Дата: Среда, 02 Декабря 2009, 00:19 | Сообщение # 47 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| DEMBEL, работает отлично, СПАСИБО.На первый взгляд не понял, щас буду смотреть.
|
| |
| |
| DEMBEL | Дата: Среда, 02 Декабря 2009, 00:23 | Сообщение # 48 |
|
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| Quote (Oleg) На первый взгляд не понял, щас буду смотреть.
а че там смотреть, я вместо замены переводов строк - заменил палками сперва все пробелы, а уже потом убрал переводы строк заменив их пустыми значениями:
ts$=''
и получилось что между всеми пробелами стоят палки и нету переводов строк. мог бы и сам дотумкать. теперь убери лишнее из кода и организуй складывание элементов массива по переменным в одном цикле, так будет красивше.
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
| Oleg | Дата: Среда, 02 Декабря 2009, 00:45 | Сообщение # 49 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| Quote (DEMBEL) получилось что между всеми пробелами стоят палки и нету переводов строк
Наверно это смое оптимальное решение, класс. А я тут сочиняю ...
Щас буду пробывать с циклом делать.
|
| |
| |
| DEMBEL | Дата: Среда, 02 Декабря 2009, 00:58 | Сообщение # 50 |
|
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| Quote (Oleg) Щас буду пробывать с циклом делать.
обрати внимание что переменные
Item1$ EditBox5 GetArrayItem(string$,|,6)
имеют цифру. Переименуй обьекты EditBox таким образом, чтобы цифры соответствовали друг другу, тогда: Code Clipboard("GET","string$")
fs$=CHR(32)
ts$='|'
string$=StrChange(string$,fs$,ts$)
fs$=CHR(13)+CHR(10)
ts$=''
string$=StrChange(string$ ,fs$,ts$)
string$=string$+'|'
** ЦИКЛ
For i=1 To 6
Item$[i] = GetArrayItem(string$,|,i)
EditBox$='EditBox'+CHAR(i)
LoadText("EditBox$","Item$[i]")
Next i Элемент массива с номером i=1 будет класться в массив Item$[i] под номером 1 и записываться в обьект EditBoxi с цифрой 1, и так далее по кругу пока не переберется все 6 элементов. Это занимает 5 строчек кода.
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
| Oleg | Дата: Четверг, 03 Декабря 2009, 22:35 | Сообщение # 51 |
|
Любопытный
Группа: Пользователи
Сообщений: 39
Репутация: 0
Награды: 0
Статус: Offline
| Да с циклом код красивше, но решил не использовать, а разделить на 3 бокса, потамучто с таким адресом:
Ожье де Бац де Кастельмор
1я Большая садовая №3а
23231 Лос Анжелес
не работает, немного переделал и проблема решилась, всем спасибо.
|
| |
| |
| DEMBEL | Дата: Четверг, 03 Декабря 2009, 22:39 | Сообщение # 52 |
|
Наш дизайнер
Группа: Модераторы
Сообщений: 2266
Репутация: 135
Награды: 32
Статус: Offline
| Quote (Oleg) потамучто с таким адресом:
я тебе с самого начала талдычил - дай реальное содержимое буфера, а лучше несколько для проверки.Quote (Oleg) немного переделал и проблема решилась, всем спасибо.
Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
|
| |
| |
Все права защищены
