|
|
|
|
Ошибка в скрипте отправки почты с gmail |
☑ |
0
rotting
18.07.11
✎
00:25
|
Есть такой скрипт
|
|
1
rotting
18.07.11
✎
00:28
|
Const cdoSendUsingPickup = 1
Const cdoSendUsingPort = 2
Const cdoAnonymous = 0
Const cdoBasic = 1
Const cdoNTLM = 2
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Новый документ для печати"
objMessage.From = """1С"" "
objMessage.To = "ххххххх"
objMessage.TextBody = "Откройте вложенный в письмо файл и распечайте у себя на принтере"
Set objArgs = WScript.Arguments
fname = objArgs(0)
Set fso = CreateObject("Scripting.FileSystemObject")
objMessage.AddAttachment "" & fname & ""
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "хххххх"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "хххххх"
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = False
objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
objMessage.Configuration.Fields.Update
objMessage.Send
Раньше работал нормально, но 4 дня назад начал глючить, пишет ошибку
at least one of the From or Sender fields is required, and neither was found
кто может что-то подсказать? Буду очень признателен.
|
|
2
rotting
18.07.11
✎
00:29
|
и адрес отправителя и получателя одинаков, может в этом проблема...
|
|
3
rotting
18.07.11
✎
10:10
|
ап.
|
|
4
Defender aka LINN
18.07.11
✎
10:12
|
Ну попробуй Sender указать, он же его упоминает.
|
|
5
rotting
18.07.11
✎
10:31
|
(4) А как его указать, пишу вот так:
objMessage.Sender = """1С"" <ххххххххххххх>"
где хххххххххххххх - адрес своей почты, так пишет что не может к серверу подключится(((
|
|
6
Defender aka LINN
18.07.11
✎
10:33
|
(5) Дык, это... From = "1С", Sender="адрес@почты", вестимо.
|
|
7
rotting
18.07.11
✎
11:25
|
(6) Сначала так и попробовал, тоже самое пишет
|
|
Основная теорема систематики: Новые системы плодят новые проблемы.