ReSQL.ru
     
powered by simpleCommunicator - 2.0.55     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как или каким способом можно перекодировать для URL адреса.
12 сообщений из 12, страница 1 из 1
Как или каким способом можно перекодировать для URL адреса.
    #36984092
32sasha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
32sasha
Участник
Как или каким способом можно перекодировать для URL адреса.
"Причины отсутствия сотрудников" в "%D0%9F%D1%80%D0%B8%D1%87%D0%B8%D0%BD%D1%8B%20%D0%BE%D1%82%D1%81%D1%83%D1%82%D1%81%D1%82%D0%B2%D0%B8%D1%8F%20%D1%81%D0%BE%D1%82%D1%80%D1%83%D0%B4%D0%BD%D0%B8%D0%BA%D0%BE%D0%B2" ?
...
Рейтинг: 0 / 0
29.11.2010, 17:16
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36984179
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Самый простой, но не самый быстрый способ:
Код: plaintext
1.
2.
Set scr = CreateObject("MSScriptControl.ScriptControl")
scr.Language = "javascript"
Debug.Print scr.Run("encodeURIComponent", "Причины отсутствия сотрудников")
...
Рейтинг: 0 / 0
29.11.2010, 17:36
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36984193
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Antonariy,
тогда уж сразу подскажите как из этой жути
"%D0%9F%D1%80%D0%B8%D1%87%D0%B8%D0%BD%D1%8B%20%D0%BE%D1%82%D1%81%D1%83%D1%82%D1%81%D1%82%D0%B2%D0%B8%D1%8F%20%D1%81%D0%BE%D1%82%D1%80%D1%83%D0%B4%D0%BD%D0%B8%D0%BA%D0%BE%D0%B2"
Перекодировать в
"Причины отсутствия сотрудников"
????? Спасибо
...
Рейтинг: 0 / 0
29.11.2010, 17:39
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36984207
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Antonariy, странно, что Вы этот способ назвали: не самый быстрый способ
Вроде цикла нет, за один проход, как Вы оцениваете быстроту????
...
Рейтинг: 0 / 0
29.11.2010, 17:43
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36984485
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Здесь нужно создать объект интерпретатора яваскрипта и подсунуть ему скрипт, который он должен разобрать и выполнить. Грубо говоря, за этими тремя строчками стоят километры кода в другой библиотеке.

А хотя вспомнил, что для этого api существует:
Код: plaintext
1.
2.
3.
4.
5.
DECLARE FUNCTION CreateUri LIB "URLMON.DLL" ALIAS "CreateUri" ( _
   BYVAL pwzURI AS Long, _
   BYVAL dwFlags AS Long, _
   BYVAL dwReserved AS Long, _
   BYVAL ppURI AS Long _
   ) AS Long
...
Рейтинг: 0 / 0
29.11.2010, 19:21
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36984501
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Antonariy Грубо говоря, за этими тремя строчками стоят километры кода в другой библиотеке.
Плевать в пошаговом режиме доли секунд, обратно как будет???
...
Рейтинг: 0 / 0
29.11.2010, 19:27
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36984509
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
А если нужно в цикле, то разница колоссальная.

обратно как будет
Либо decodeURIComponent, либо... обратную апи не помню.
...
Рейтинг: 0 / 0
29.11.2010, 19:32
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36984533
Ципихович Эндрю
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ципихович Эндрю
Участник
Antonariy, спасибо, всё точно:

Код: plaintext
1.
2.
3.
4.
Set scr = CreateObject("MSScriptControl.ScriptControl")
scr.Language = "javascript"
Debug.Print scr.Run("encodeURIComponent", "Сотрудник") 'преобразует текст "Сотрудник" в текст "%D0%A1%D1%82%D1%80%D1%83%D0%B4%D0%BD%D0%B8%D0%BA"
Debug.Print scr.Run("decodeURIComponent", "%D0%A1%D0%BE%D1%82%D1%80%D1%83%D0%B4%D0%BD%D0%B8%D0%BA") 'преобразует текст "%D0%A1%D1%82%D1%80%D1%83%D0%B4%D0%BD%D0%B8%D0%BA" в текст "Сотрудник"
...
Рейтинг: 0 / 0
29.11.2010, 19:44
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36985517
32sasha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
32sasha
Участник
Всем СПАСИБО!
...
Рейтинг: 0 / 0
30.11.2010, 11:33
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36987936
Фотография michael R
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
michael R
Участник
Antonariy

хороший ActiveX пригодится
а то в цикле преобразовывал всегда URL для WinHttp обьекта
...
Рейтинг: 0 / 0
01.12.2010, 10:17
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36989424
32sasha
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
32sasha
Участник
Здесь есть интересный способ
http://www.example-code.com/vb/url-encoding.asp
и здесь
http://www.freevbcode.com/ShowCode.asp?ID=1512
...
Рейтинг: 0 / 0
01.12.2010, 16:38
| Ответить | Цитировать | Написать  
Как или каким способом можно перекодировать для URL адреса.
    #36989756
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Antonariy
Участник
Ничего интересного. Первый способ подразумевает какую-то левую dll, суть этой функции из которой наверняка сводится ко второму способу.
...
Рейтинг: 0 / 0
01.12.2010, 18:13
| Ответить | Цитировать | Написать  
12 сообщений из 12, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как или каким способом можно перекодировать для URL адреса.
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?desktop=1&fid=60&tid=2159191]:
 0ms
get settings:
 9ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 40ms
get topic data:
 12ms
get forum data:
 2ms
get page messages:
 51ms
get tp. blocked users:
 2ms
others: 359ms
total:  497ms
созд. / загр.: 497ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]