Forums Últimos mensajes - Powered by IBM
 

envio automático e-mail

10/05/2005 - 12:50 por Fermí | Informe spam
Hola,

Trabajo con exchange 5.5 y outlook 2000. Cada semana envio el mismo mensaje
a 5 personas y sólo cambio un par de datos. ¿Hay alguna manera de hacer esto
se automatice? Es decir, que sólo le modifique los datos y le de a enviar,
con todo lo demas ya hecho.¿hay algo por ahi?

Gracias por vuestra ayuda.
 

Leer las respuestas

#1 marcelo saied
11/05/2005 - 11:01 | Informe spam
Hello Fermí,
es posible hacer un task que sea regenerado todas las semanas y en el nomento
en que el status del task cambie de no actino a activo se automande un email
y al mismo tiempo de autoregenere el task
Publish The Custom Form
Start Outlook and open your Tasks folder.
On the Actions menu, click New Task.
On the Tools menu, point to Forms, and then click Design This Form.
On the Form menu, click View Code, and type the following code in the Script
Editor:
Sub Item_PropertyChange(ByVal Name)
Select Case Name
Case "Status"
if Item.Status = 2 then '2 = Completed
Set NewItem = Application.CreateItem(0)
NewItem.To = ""
NewItem.Recipients.ResolveAll
NewItem.Subject = "This is the message subject text"
NewItem.Body = "This is text that will appear in the body
of the message."
NewItem.Display
End IF
End Select
End Sub



In the Script Editor, on the File menu, click Close.
On the Tools menu, point to Forms, and then clickPublish Form.
In the Look in list, click Tasks. In the Display Name and Form Name boxes,
type Reminder, and then click Publish.
On the File menu, click Close. Do not save changes.
NOTE: In the code, substitute your own information inside the quotation marks
for NewItem.To, NewItem.Subject, and NewItem.Body. These lines set the To,
Subject, and body of your reminder message.


Create a Recurring Task Using the Custom Form
Open your Tasks Folder, where you published the custom form.
On the Actions menu, click New Reminder. This will open a new task based
on your custom form.
Type a subject for your reminder task. In Due Date, click to select a due
date from the calendar. Click to select the Reminder check box.
On the Actions menu, click Recurrence, and set how often you want the reminder
message sent.
Click Save and Close.
To Send Reminder E-mail
When you receive the reminder that the task is due, click Open Item. In the
Status box, click to select Completed.

-or-

Dismiss the reminder and in your Tasks list, click Completed.

Setting the task as completed will automatically generate a new task and
display an e-mail message containing your boilerplate text. Click Send to
send the message.
You can further automate the message. If you add the line NewItem.Send immediately
below the NewItem.Display line, the message is automatically sent when you
mark the task as completed.


o puedes usar un triger que en el momento en que un reminder se active haga
funcionar el siguiente codigo
Private Sub Application_Reminder(ByVal Item As Object)
Dim objMsg As MailItem
' create new outgoing message
Set objMsg = Application.CreateItem(olMailItem)
' your reminder notification address
objMsg.To = ""
objMsg.Subject = "Reminder: " & Item.Subject
' must handle all 4 types of items that can generate reminders
Select Case Item.Class
Case olAppointment '26
objMsg.Body = _
"Start: " & Item.Start & vbCrLf & _
"End: " & Item.End & vbCrLf & _
"Location: " & Item.Location & vbCrLf & _
"Details: " & vbCrLf & Item.Body
Case olContact '40
objMsg.Body = _
"Contact: " & Item.FullName & vbCrLf & _
"Phone: " & Item.BusinessTelephoneNumber & vbCrLf & _
"Contact Details: " & vbCrLf & Item.Body
Case olMail '43
objMsg.Body = _
"Due: " & Item.FlagDueBy & vbCrLf & _
"Details: " & vbCrLf & Item.Body
Case olTask '48
objMsg.Body = _
"Start: " & Item.StartDate & vbCrLf & _
"End: " & Item.DueDate & vbCrLf & _
"Details: " & vbCrLf & Item.Body
End Select
' send the message
objMsg.Send
Set objMsg = Nothing
End Sub

Hola,

Trabajo con exchange 5.5 y outlook 2000. Cada semana envio el mismo
mensaje a 5 personas y sólo cambio un par de datos. ¿Hay alguna manera
de hacer esto se automatice? Es decir, que sólo le modifique los datos
y le de a enviar, con todo lo demas ya hecho.¿hay algo por ahi?

Gracias por vuestra ayuda.

Preguntas similares