ReSQL.ru
     
powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / отправка файла(текста). возвращение к истокам
19 сообщений из 19, страница 1 из 1
отправка файла(текста). возвращение к истокам
    #37677968
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
 
это моя первая прога, сделал(частично нашёл и связал) полтора года назад. отправляет txt файл на почту созданием CDO.Message. так вот... у некоторого процента людей код тупо не работал. плевать, казалось бы, но за это время таких людей набралась приличная туча, которым моя программа не смогла пригодиться. и вот сейчас прогу ждёт очень важный клиент. и у него не работает прога(отправка). это меня очень печалит, а сроки поджимают. что может быть проще - текст на одном компе, нужно прочитать на другом. и такой тупик
предложите плз все простые способы отправки. желательно код, т.к. обрывки обычно стандартные, код необъёмный. запихаю все варианты в прогу, хоть один-то должен сработать. делюсь своим вариантом. рабочим, что, как я сегодня проверил, обыcкивая инет, тоже редкость. желательно отправку на почту, на крайняк можно изощрённые способы типа винсок или авторизации где-либо и сохранения там этого файла без отправки. заранее спс
 
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
Dim Msg As CDO.Message
Set Msg = New CDO.Message
On Error GoTo variant2
Msg.From = "111111@mail.ru" & " <" & "111111@mail.ru" & ">"
Msg.To = "222222@mail.ru"
Msg.Subject = "111"
Msg.TextBody = "111"
Msg.AddAttachment "C:\1\1.txt"

With Msg.Configuration.Fields
  .Item(cdoSendUsingMethod) = cdoSendUsingPort
  .Item(cdoSMTPServer) = "smtp.mail.ru"
  .Item(cdoSMTPServerPort) = 25
  .Item(cdoSMTPAuthenticate) = cdoBasic
  .Item(cdoSendUserName) = "111111"
  .Item(cdoSendPassword) = "parolb"
  .Update
End With
Msg.Send
Set Msg = Nothing

...
Рейтинг: 0 / 0
25.02.2012, 20:55
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37677985
Диклевич Александр
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Диклевич Александр
Участник
Попробуй в
Код: vbnet
1.
Msg.Configuration.Fields

добавить
Код: vbnet
1.
.Item(cdoSMTPUseSSL) = False

и
Код: vbnet
1.
.Item(cdoSMTPConnectionTimeout) = 60

.
PS. С другими способами отправки не сталкивался.
...
Рейтинг: 0 / 0
25.02.2012, 21:19
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37677989
Диклевич Александр
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Диклевич Александр
Участник
И еще, у тебя есть
Код: vbnet
1.
On Error

, который будет срабатывать, когда файл, который ты хочешь прикрепить, открыт в другой программе (т.е. занят). Ошибка выскочит здесь
Код: vbnet
1.
Msg.AddAttachment "C:\1\1.txt"

, следовательно, до
Код: vbnet
1.
Msg.Send

дело не дойдет.
...
Рейтинг: 0 / 0
25.02.2012, 21:24
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37677997
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
Диклевич Александр,

Диклевич Александр.Item(cdoSMTPUseSSL) = False вроде по умолчанию и так стоит...
Диклевич Александр.Item(cdoSMTPConnectionTimeout) = 60 угу, спс, добавлю на всякий случай, мб письмо тупо не успевает отправиться авторфайл, который ты хочешь прикрепить, открыт в другой программе (т.е. занят) хм... вроде, доступ к файлу не изменяется от занятости. удалить да, нельзя, а читать файл могут хоть сотня прог и пересылать, значит, тоже Диклевич Александр, следовательно, до Msg.Send дело не дойдет. мб... вся сложность в том, что у меня и у друзей всё норм, у пользователей проблемы, а они не будут тратить время на устронение проблемы. один взгляд на комп, в котором не отрабатывает код, изменил бы всё. поэтому ищу разные способы отправки, хоть один да сработает. если не качеством, там массой)
...
Рейтинг: 0 / 0
25.02.2012, 21:40
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678055
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
вот что надыбал
 
Для передачи файла используйте метод UploadFile, указав расположение исходного файла и каталога назначения в виде строки или URI (универсального кода ресурса). В этом примере файл Order.txt передается на веб-узел http://www.cohowinery.com/uploads.aspx.
VB
Код: vbnet
1.
2.
3.
My.Computer.Network.UploadFile(
  "C:\My Documents\Order.txt",
  "http://www.cohowinery.com/upload.aspx")

как мне такое соорудить? на какой сайт выставлять файл? не оч понятно
...
Рейтинг: 0 / 0
25.02.2012, 22:57
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678381
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
уговорил важного клиента протестить прогу на ошибки. вот, что выдаёт без "On Error"
Run-time error '-2147220973(80040213)': O?aimii?oo ia oaaeinu iiaee?eouny e na?aa?o.
помогите понять, в чём прикол, почему не рабоатет
...
Рейтинг: 0 / 0
26.02.2012, 12:33
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678393
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Transport failed to the connect to the server.

То бишь, если я правильно понимаю, на этих машинах не настроен SMTP-сервер для отправки почты.

А вообще, сам мог бы по номеру ошибки найти в гуглояндексе
...
Рейтинг: 0 / 0
26.02.2012, 12:43
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678395
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
Shocker.Pro,

спс. а что делать? как настроить? это уже не первый и не десятый случай
...
Рейтинг: 0 / 0
26.02.2012, 12:44
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678397
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
Так а откуда твоей программе знать, какой на любой из клиентских машин почтовый сервер? Может у него вообще отправка писем запрещена админами.
...
Рейтинг: 0 / 0
26.02.2012, 12:46
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678402
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
Shocker.ProТак а откуда твоей программе знать, какой на любой из клиентских машин почтовый сервер? Может у него вообще отправка писем запрещена админами. не очень понял... код отправки приведён в первой сообщении. там не юзаются спец почтовые клиенты, типа outlook express или как там его... код авторизируется на 1 почтовом ящике и отсылает письмо на другой. была мысля, что клиент забанен всем проектом mail.ru, но это маловероятно. объясни плз поподробнее, в чём именно ошибка)
...
Рейтинг: 0 / 0
26.02.2012, 12:50
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678476
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
у меня есть подозрение, что не я один обмениваюсь данными по инету. а если так, то и у вас такие же ошибки? и встречаются такие же проблемы? или я первый, кто вздумал перекинуть файлик через инет? мб предложить какой-то код пользователю, чтобы проверить, в чём ошибка(я пока что вообще не догоняю, почему так. клиенты из стран СНГ, но у них там, я думаю, всю так же, как у нормальных людей )
...
Рейтинг: 0 / 0
26.02.2012, 14:24
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678477
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
а) может быть забанен smtp.mail.ru
б) может быть забанена отправка писем минуя какую-то корпоративную программу

надо смотреть телнетом доступность smtp.mail.ru:25 на конкретном клиенте
...
Рейтинг: 0 / 0
26.02.2012, 14:24
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678485
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
Shocker.Pro,

у клиентов есть несколько майловских почт, вроде всё норм заходит. без проблем.
корпоративную прогу?.. хз, обычные пользователи, со своими компами, ради проверки даже переустонавливали винду на другую - не помогло.
какие строчки скомпилировать, чтобы точно понять, в чём проблема и устранить её? пока что есть связь с важным клиентом
...
Рейтинг: 0 / 0
26.02.2012, 14:40
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678492
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
BelowZeroу клиентов есть несколько майловских почт, вроде всё норм заходиткуда заходит? Ты понимаешь разницу между WEB-интерфейсом отправки почты и SMTP-протоколом?
...
Рейтинг: 0 / 0
26.02.2012, 14:53
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678493
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
BelowZeroу меня есть подозрение, что не я один обмениваюсь данными по инету. а если так, то и у вас такие же ошибки?мы обмениваемся данными не через почту
...
Рейтинг: 0 / 0
26.02.2012, 14:54
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678505
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
Shocker.ProBelowZeroу меня есть подозрение, что не я один обмениваюсь данными по инету. а если так, то и у вас такие же ошибки?мы обмениваемся данными не через почту а как? к альтернативным способам обменом инфы и призывает тема топика
...
Рейтинг: 0 / 0
26.02.2012, 15:03
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678518
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
BelowZeroк альтернативным способам обменом инфы и призывает тема топикаоднако, в первом посте:BelowZeroжелательно отправку на почтуа если предложить тебе организовать сервер для обмена, скажем FTP, ты дальше будешь требовать объяснить, как поднять сервер, и требовать пример кода на VB, даже не попытавшись разобраться в основах вопроса
...
Рейтинг: 0 / 0
26.02.2012, 15:23
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678548
Фотография BelowZero
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BelowZero
Участник
Shocker.Proа если предложить тебе организовать сервер для обмена, скажем FTP, ты дальше будешь требовать объяснить, как поднять сервер, и требовать пример кода на VB, даже не попытавшись разобраться в основах вопроса ... в принципе, да)) но всё-таки... у меня есть пара сайтов... не оч понятно, как там и чего. зато я быстро учусь) всего-то и нужно - отправить строчку(файл) p/s с важным клиентом всё уладилось. мог бы сказать, что сейчас используется в моей проге для передачи строки, но это будет по-нубски и противозаконно)
...
Рейтинг: 0 / 0
26.02.2012, 15:48
| Ответить | Цитировать | Написать  
отправка файла(текста). возвращение к истокам
    #37678964
Не_помню_свой_пароль_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Не_помню_свой_пароль_
Гость
Возможно, у клиента прокси сервер. тогда надо в настройках указывать проксю и ее порт (ну и на проксе, естественно, должен быть открыт 25 порт).
...
Рейтинг: 0 / 0
26.02.2012, 22:36
| Ответить | Цитировать | Написать  
19 сообщений из 19, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / отправка файла(текста). возвращение к истокам
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=60&fpage=85&tid=2158043]:
 0ms
get settings:
 11ms
get forum list:
 12ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 46ms
get topic data:
 10ms
get forum data:
 2ms
get page messages:
 51ms
get tp. blocked users:
 2ms
others: 15ms
total:  153ms
созд. / загр.: 153ms
x
x
Закрыть


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