www.ritlabs.com [тема: Отправить письмо]

Отправить письмо

Tue, 06 Sep 2005 11:41:05 +0300

Отправить письмо в форуме Настройка и конфигурирование.

====quote====
На любом файле ткнуть правой кнопкой и выбрать
Send To -> Mail Recipient.
=============
- это да, работает..
У меня Офис2003 SP1 русских полный, мышь 3.51.10 (но пробовал и на других мышах), винда XP Pro SP2 Eng.
На предыдущем офисе (вроде ОфисХР, но точно не помню - может и Офис97) работало, а тут - хоть тресни, не работает... и команда "отправить сообщение (как вложение)" неактивна... засада.. макрос что-ли на это писать - так видимо решение должно быть проще...
06.09.2005 11:41:05, Alexey Dotsenko.

Отправить письмо

Mon, 05 Sep 2005 13:29:17 +0300

Отправить письмо в форуме Настройка и конфигурирование.
Хмм... предварительная проверка Simple MAPI вроде такая:
На любом файле ткнуть правой кнопкой и выбрать
Send To -> Mail Recipient.
Здесь должно появиться окошко с выбором аккаунта.
Это работает?

У меня пока что Офис2003 англицкий полный.
Мыш 3.60.07
Виндовс XP SP2 Eng

05.09.2005 13:29:17, Иван Болховитинов.

Отправить письмо

Mon, 05 Sep 2005 13:26:31 +0300

Отправить письмо в форуме Настройка и конфигурирование.
Здраствуйте умные люди! Помогите!!! Пишу значит новое пись мо в проге The Bat! после этого я не могу его отправить немедленно, либо сохранить . Ввожу команду сохранить или отправить , а проге "паролельно" ни чего не предпринимает. Что случилось?
05.09.2005 13:26:31, Денис Юрьевич.

Отправить письмо

Mon, 05 Sep 2005 12:48:15 +0300

Отправить письмо в форуме Настройка и конфигурирование.
Зарегистрировал мышу как обработчик Simple MAPI? - не помогло...
05.09.2005 12:48:15, Alexey Dotsenko.

Отправить письмо

Fri, 02 Sep 2005 07:12:37 +0300

Отправить письмо в форуме Настройка и конфигурирование.

====quote====
У меня отсутствуют команды в меню Файл, подменю Отправить...
=============
Не знаю, у меня команда File - Send To... -> Mail Recipient (as Attachment) в наличии и работает.
Смотрите, чтож у вас Эксель такой что у него команды такой нет.
Кстати, мыша зарегистрировали как обработчик Simple MAPI? (смотрите в настройках мыша - там есть такая команда).
02.09.2005 07:12:37, Иван Болховитинов.

Отправить письмо

Fri, 02 Sep 2005 06:36:26 +0300

Отправить письмо в форуме Настройка и конфигурирование.
Господа, подскажите, плз, возможно ли сделать такую вещь, чтобы из MS Excel 2003 SP1 можно было отправлять открытый файл или его страницу или выделенную область страницы по почте (естесственно, The Bat!), не сохраняя сам файл на винте? У меня отсутствуют команды в меню Файл, подменю Отправить...
Заранее благодарен.
02.09.2005 06:36:26, Alexey Dotsenko.

Отправить письмо

Thu, 01 Sep 2005 08:34:13 +0300

Отправить письмо в форуме Настройка и конфигурирование.
Настроить заголовок нижеуказанного файла и положить его в папку SendTo (C:\Documents and Settings\UserName\SendTo\).

Файл ToBat.vbs:

====quote====

'=========================================================
acc_name="MyAccount" 'название аккаунта
fld_name="Outbox" 'название папки
subj = "Пересылаю файлы" 'заголовок сообщения
tpl_file="C:\APack\TheBat\_Test\att.tpl" 'имя шаблона
need_pack=1 'Установите: 0 - не надо паковать, 1 - упаковать РАРом
email = "" 'Установите: "" - спросить email, любое другое - внести email автоматом
rar_exe = "C:\APack\TotalCommander\Util\RAR\Rar.exe"
temp_folder = "c:\Temp"
'=========================================================

set WSHShell = WScript.CreateObject("WScript.Shell")
tb_exe = WSHShell.RegRead("HKCU\Software\RIT\The Bat!\EXE path")

Command = tb_exe & " /MAILU=" & acc_name & ";F=" & fld_name & ";S=""" & subj & """;"

if email = "" then
email = InputBox("Введите Email")
Command = Command & "TO=""" & email & """;"
else
Command = Command & "TO=""" & email & """;"
end if

set fso = WScript.CreateObject("Scripting.FileSystemObject")
set file = fso.OpenTextFile(temp_folder & "tb_files_to_send.txt", 2, true)
set Args = Wscript.Arguments

if need_pack=1 then
arc_file = temp_folder & "files.rar"
if fso.FileExists(arc_file) then
fso.DeleteFile(arc_file)
end if

pack_command = rar_exe & " a " & arc_file
for i=0 to args.count-1
pack_command = pack_command & " """ & args(i) & """"
next
file.WriteLine "files.rar"
for i=0 to args.count-1
file.WriteLine "- " & args(i)
next

WSHShell.Run pack_command, 1, true
command = command & "A=""" & temp_folder & "files.rar" & """;"

else
for i=0 to args.count-1
command = command & "A=""" & args(i) & """;"
file.WriteLine args(i)
next
end if

Command = command & "T=""" & tpl_file & """;"

WSHShell.Run command, 1, false

=============

Файл шаблона att.tpl:

====quote====

Hello, %IF:"%ABTONAME"="":"%TOFName":"%ABTONAME"

See files attached:
%PUT="c:\Temp\tb_files_to_send.txt"

--
Best regards,
%FromFName mailto:%FromAddr

This is automatically generated message from The Bat! v.3

%IF:"%ABTONAME"="":"%BCC=''":"%HDRTO='%ABTONAME <%TOADDR>'"

=============

Принимаю любые замечания, вопросы по данному решению.
01.09.2005 08:34:13, Иван Болховитинов.

Отправить письмо

Thu, 01 Sep 2005 01:30:50 +0300

Отправить письмо в форуме Настройка и конфигурирование.
Доброе время суток всем. Господа хорошие подскажите пожалуйста как по правой кнопке мышки по файлу "отправить -> Адресат" с минимальным количеством запросов.
01.09.2005 01:30:50, Jenya P.