Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Проблемы с вложениями 
:(
    Опции темы
Йекс
Дата 2.1.2007, 16:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 17.11.2006

Репутация: нет
Всего: нет



Господа, прошу помощи.
Суть проблемы: отправляю письмо с вложением с уведомлением о получении:
Код

Set outMessage = CreateObject("CDO.Message")  
With outMessage
      .Subject = "Тема"
      .Textbody = "Письмо"
      .To = "[email protected]"
      .AddAttachment "C:\Документы\Документ.xls"
      .mdnrequested = True
      .Send
End With

Всё замечательно уходит и приходит, только одно маленькое но: имя файла вложения получается как "дНЙСЛЕМР.xls". Всё остальное (тема, само письмо) нормально приходит русскими человеческими буквами, а имя файла коверкается. И так с любым русскоязычным файлом. Что делать, как быть? 
PM MAIL   Вверх
Akina
Дата 2.1.2007, 17:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



А кодировочка какая по умолчанию? а должна быть?


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Йекс
Дата 3.1.2007, 21:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 17.11.2006

Репутация: нет
Всего: нет



Цитата

А кодировочка какая по умолчанию? а должна быть? 

Был бы премного благодарен, если бы Вы подсказали, где эту кодировочку посмотреть, какая она должная быть и как её сменить...
PM MAIL   Вверх
bom
Дата 16.1.2007, 21:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 329
Регистрация: 22.2.2004
Где: Казахстан, Алматы

Репутация: 4
Всего: 6



Цитата(Йекс @  2.1.2007,  16:12 Найти цитируемый пост)
имя файла вложения получается как "дНЙСЛЕМР.xls"

Где получается? В теле письма? В окне вэб браузера? В почтовом клиенте?
Есть подозрение что это почтовый сервер рамблера некорректно перекодирует кириллицу в заголовках, пробовал другой сервер?
Я пробовал отправлять\получать через сервер своего прова - русские символы сохраняются неизменными в теле письма, в Win1251.



PM MAIL   Вверх
Йекс
Дата 21.1.2007, 14:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 17.11.2006

Репутация: нет
Всего: нет



Письмо отсылается и через рамблеровский сервер, и через свой.  На разные адреса (и которые на раблеровском сервере в том числе). Пробовал  получать его через аутлук,  через браузер(мозила, ИЕ). Везде получается файл вложения "дНЙСЛЕМР.xls". И в окне браузера, и при сохранении на диск.   Если то же письмо отправлять просто через аутлук, то оно отправляется везде корректно. 
PM MAIL   Вверх
bom
Дата 22.1.2007, 13:41 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 329
Регистрация: 22.2.2004
Где: Казахстан, Алматы

Репутация: 4
Всего: 6



Можно выложить тело письма здесь для посмотреть?
А какая версия cdosys.dll? У меня 6.2.4.0
PM MAIL   Вверх
Akina
Дата 22.1.2007, 20:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Да так и должно быть. И заголовки письма, и аттачи кодируются однозначно в КОИ. А вот тело письма ты кодируешь явно в СР1251. 

Ну надо же придерживаться единообразия хоть какого-нибудь.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
Йекс
Дата 22.1.2007, 21:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 14
Регистрация: 17.11.2006

Репутация: нет
Всего: нет



Версия cdosys.dll 6.2.2.0 
Цитата

Можно выложить тело письма здесь для посмотреть?

Цитата

Да так и должно быть. И заголовки письма, и аттачи кодируются однозначно в КОИ. А вот тело письма ты кодируешь явно в СР1251. 


Сильно не бейте, но я вообще ничего не кодирую. 
Допустим тупо открываю ексель, создаю новый документ, вставляю в ячейку а1 символ "э".  Сдеь же жму Альт+Ф11, вставляю новую форму, на форме делаю кнопку, этой кнопку назначаю процедуру: 
Код

Private Sub CommandButton1_Click()
Set outMessage = CreateObject("CDO.Message")  
With outMessage
      .Subject = "Тема"
      .Textbody = "Письмо"
      .To = "[email protected]"
      .AddAttachment "C:\Документы\Документ.xls"
      .mdnrequested = True
      .Send
End With
End Sub

Сохраняю данный документ под названием "C:\Документы\Документ.xls". Тыкаю в CommandButton1, письмо приходит с искорёженным вложением. 
ЗЫ: пробовал создавать всё то же самое, но при этом меняя в сервис-параметры-общие-параметры веб документа - кодировка - сохранить документ как: кириллица windows, KOI8-U, KOI8-R, ISO, DOS. Разницы не ощутил.
PM MAIL   Вверх
bom
Дата 23.1.2007, 02:23 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 329
Регистрация: 22.2.2004
Где: Казахстан, Алматы

Репутация: 4
Всего: 6



Попробуй обновить библиотеку,
Цитата(Йекс @  22.1.2007,  21:13 Найти цитируемый пост)
Цитата    
Можно выложить тело письма здесь для посмотреть?

Сохранить тело письма из аутглюка можно вроде через "Файл"->"Сохранить письмо как..." (сорри, на компе нет не MSОфиса, не аутглюка, не IE, поэтому точнее сказать не могу). Чтобы выложить здесь, воспользуйся ссылкой "ответить", а не быстрым ответом.
Или просто отошли письмо мне 
Код

Private Sub CommandButton1_Click()    
Set outMessage = CreateObject("CDO.Message")    
With outMessage    
      .Subject = "Тема"    
      .Textbody = "Письмо"
      .To = "[email protected]"
      .AddAttachment "C:\Документы\Документ.xls"    
      .mdnrequested = True    
      .Send    
End With    
End Sub



PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0532 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.