1 (изменено: andreydial, 2013-06-03 14:25:14)

Тема: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Здравствуйте. Есть экселевский файл со списком мыл. Необходимо организовать рассылку по адресам сообщения. Помогите или хотя бы подтолкните в нужном направлении. Это вообще осуществимо AutoHotKey или нет.

2

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Исправьте заголовок темы:

AHK: Скрипт для массовой рассылки писем из xlxs файла

Это вообще осуществимо AutoHotKey или нет.

Думаю да:

AHK: 3 способа отправки почтовых сообчений из тела скрипта AHK_L

FileRead

Регулярные выражения (RegEx) - краткий справочник

По вопросам возмездной помощи пишите на E-Mail: serzh82saratov@mail.ru
Win10x64 v2004, AutoHotkey_L v1.1.33.02 (Unicode 32-bit). AhkSpy, Hotkey, ClockGui

3

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

serzh82saratov пишет:

Исправьте заголовок темы:

AHK: Скрипт для массовой рассылки писем из xlxs файла

Это вообще осуществимо AutoHotKey или нет.

Думаю да:

AHK: 3 способа отправки почтовых сообчений из тела скрипта AHK_L

FileRead

Регулярные выражения (RegEx) - краткий справочник

Тут про один адрес речь идет, а мне надо список адресов из екселя брать и одно и тоже письмо отсылать. Чтобы рассылка не выглядела как спам.

4

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Тут про один адрес речь идет

Тут идёт идёт речь про способ отсылки письма как таковой. Вам кто не даёт повторить эту операцию для другого письма?

а мне надо список адресов из екселя брать

Необходимые методы вам даны. Если вы хотите просто что-то утверждать, а неспрашивать что да как, то good luck.

По вопросам возмездной помощи пишите на E-Mail: serzh82saratov@mail.ru
Win10x64 v2004, AutoHotkey_L v1.1.33.02 (Unicode 32-bit). AhkSpy, Hotkey, ClockGui

5 (изменено: andreydial, 2013-06-03 16:06:05)

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Я ничего не утверждаю. Я просто не знаю как можно перебирать адреса в файле, за механизм отсылки огромное спасибо. Но ведь перебрать адреса то же задача. И вот ее решения я не видел для AHK. Скрипт в экселе видел, совмещение с вордовским файлом для тела письма тоже видел. А чистого решения на AHK не нашел.
Помогите с организацией перебора имен из файла екселя. Адресов там будет около тысячи. Для начала.

6

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Помогите пожалуста тыщщу адресов перебрать и письма им отослать.

7

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Сохраните документ в виде текстового файла с разделительной табуляцией. Затем воспользуйтесь командами (ссылки выше).

8

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

http://www.script-coding.com/AutoHotkey … dLine.html

9 (изменено: andreydial, 2013-06-04 01:58:35)

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Подскажите что делаю не так.


#n::
#NoEnv  ; Recommended for performance and compatibility with future AutoHotkey releases.
#Warn  ; Recommended for catching common errors.
SendMode Input  ; Recommended for new scripts due to its superior speed and reliability.
SetWorkingDir %A_ScriptDir%  ; Ensures a consistent starting directory.


Loop, read, C:\Docs\mail_list.txt
{
    sTo        := %A_LoopReadLine%
    sFrom      := "мое мыло@gmail.com"
    sSubject := "Message_Subject"
    sBody := "Message_Text"
    sAttach := "" ;"Path_Of_Attachment" ; can add multiple attachments, the delimiter is [color=red]|[/color]

    sServer   := "smtp.gmail.com" ; specify your SMTP server
    nPort     := 465 ; 25
    bTLS      := True ; False
    nSend     := 2   ; cdoSendUsingPort
    nAuth     := 1   ; cdoBasic
    sUsername := "мое мыло@gmail.com"
    sPassword := "пассворд"

    pmsg :=   ComObjCreate("CDO.Message")
    pcfg :=   pmsg.Configuration
    pfld :=   pcfg.Fields

    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := nSend
    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := 60
    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := sServer
    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := nPort
    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := bTLS
    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := nAuth
    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := sUsername
    pfld.Item(здесь должна быть ссылка но с ней сообщение  не создается) := sPassword
    pfld.Update()

pmsg.From := sFrom
pmsg.To := sTo
pmsg.Subject := sSubject
pmsg.TextBody := sBody
Loop, Parse, sAttach, |, %A_Space%%A_Tab%
  pmsg.AddAttachment := A_LoopField
pmsg.Send()
    
} 

при запуске выдает ошибку
The following variable name contains an illegal character: "мыло из файла@gmail.com"
ругается на строку

sTo        := %A_LoopReadLine%

как его успокоить, я думаю он на @ ругается
Убрал из строки % и заработало.

10

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Так с VBA лучше отправлять.

11 (изменено: andreydial, 2013-06-17 01:25:23)

Re: AHK: Скрипт для массовой рассылки писем из xlxs файла.

Вопрос. Из под ХР скрипт отлично работает. На семерке делаешь Run Script и тишина. Запускается из под админа. Что это может быть?
Я в конце уже и строчку прикрепил

MsgBox, 0,, Email's send Ok

В семерке мессага не выскакивает.