ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   SendMail disable question? (https://www.excelbanter.com/excel-programming/375883-sendmail-disable-question.html)

Bret

SendMail disable question?
 
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.

Ron de Bruin

SendMail disable question?
 
Hi Bret

If you use Outlook Express you can turn it of but not in Outlook.

Look at my CDO page, maybe you can use that
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.




Bret

SendMail disable question?
 
Ron,
first thank you for your site and support. You've been a great resource to
me as an Excel VBA developer over the past years, much much appreciated.
the CDO works fine though I need to find out my SMTP server, thats my only
hold up. thanks again.

"Ron de Bruin" wrote:

Hi Bret

If you use Outlook Express you can turn it of but not in Outlook.

Look at my CDO page, maybe you can use that
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.





Ron de Bruin

SendMail disable question?
 
Hi Bret

Randy Birch have code for OE and Outlook

Check out
http://vbnet.mvps.org/


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Ron,
first thank you for your site and support. You've been a great resource to
me as an Excel VBA developer over the past years, much much appreciated.
the CDO works fine though I need to find out my SMTP server, thats my only
hold up. thanks again.

"Ron de Bruin" wrote:

Hi Bret

If you use Outlook Express you can turn it of but not in Outlook.

Look at my CDO page, maybe you can use that
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.







Sławcio.xww

SendMail disable question?
 
Can this feature be disabled from within Excel or from Outlook?

You can also use the Outlook Redemption - for more detail look at:
http://www.dimastr.com/redemption/
Regards. S!@w.



Bret

SendMail disable question?
 
thanks for Randy's vb.net source. For the life of me I cant narrow down on
this site disabling Outlook Security per my needs, sorry to bother Ron but
can you assist please. thanks again.



"Ron de Bruin" wrote:

Hi Bret

Randy Birch have code for OE and Outlook

Check out
http://vbnet.mvps.org/


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Ron,
first thank you for your site and support. You've been a great resource to
me as an Excel VBA developer over the past years, much much appreciated.
the CDO works fine though I need to find out my SMTP server, thats my only
hold up. thanks again.

"Ron de Bruin" wrote:

Hi Bret

If you use Outlook Express you can turn it of but not in Outlook.

Look at my CDO page, maybe you can use that
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.







Ron de Bruin

SendMail disable question?
 
I need to find out my SMTP server
You find that on Randy's site


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
thanks for Randy's vb.net source. For the life of me I cant narrow down on
this site disabling Outlook Security per my needs, sorry to bother Ron but
can you assist please. thanks again.



"Ron de Bruin" wrote:

Hi Bret

Randy Birch have code for OE and Outlook

Check out
http://vbnet.mvps.org/


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Ron,
first thank you for your site and support. You've been a great resource to
me as an Excel VBA developer over the past years, much much appreciated.
the CDO works fine though I need to find out my SMTP server, thats my only
hold up. thanks again.

"Ron de Bruin" wrote:

Hi Bret

If you use Outlook Express you can turn it of but not in Outlook.

Look at my CDO page, maybe you can use that
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.









Bret

SendMail disable question?
 
Actually great news, your CDO code worked great as all my test emails went
thru but were delivered this morning from yesterday. Any idea why such a
delay in delivery? Otherwise we're happy as is with this code since it
bypassed the Outlook Security. thank you again.


"Ron de Bruin" wrote:

I need to find out my SMTP server

You find that on Randy's site


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
thanks for Randy's vb.net source. For the life of me I cant narrow down on
this site disabling Outlook Security per my needs, sorry to bother Ron but
can you assist please. thanks again.



"Ron de Bruin" wrote:

Hi Bret

Randy Birch have code for OE and Outlook

Check out
http://vbnet.mvps.org/


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Ron,
first thank you for your site and support. You've been a great resource to
me as an Excel VBA developer over the past years, much much appreciated.
the CDO works fine though I need to find out my SMTP server, thats my only
hold up. thanks again.

"Ron de Bruin" wrote:

Hi Bret

If you use Outlook Express you can turn it of but not in Outlook.

Look at my CDO page, maybe you can use that
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.










Ron de Bruin

SendMail disable question?
 
Hi Bret

Maybe there where problem with the SMTP server?

See also
http://www.rondebruin.nl/mail/prevent.htm



--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Actually great news, your CDO code worked great as all my test emails went
thru but were delivered this morning from yesterday. Any idea why such a
delay in delivery? Otherwise we're happy as is with this code since it
bypassed the Outlook Security. thank you again.


"Ron de Bruin" wrote:

I need to find out my SMTP server

You find that on Randy's site


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
thanks for Randy's vb.net source. For the life of me I cant narrow down on
this site disabling Outlook Security per my needs, sorry to bother Ron but
can you assist please. thanks again.



"Ron de Bruin" wrote:

Hi Bret

Randy Birch have code for OE and Outlook

Check out
http://vbnet.mvps.org/


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Ron,
first thank you for your site and support. You've been a great resource to
me as an Excel VBA developer over the past years, much much appreciated.
the CDO works fine though I need to find out my SMTP server, thats my only
hold up. thanks again.

"Ron de Bruin" wrote:

Hi Bret

If you use Outlook Express you can turn it of but not in Outlook.

Look at my CDO page, maybe you can use that
http://www.rondebruin.nl/cdo.htm


--
Regards Ron de Bruin
http://www.rondebruin.nl



"Bret" wrote in message ...
Im using the SendMail code (shown below) in my VBA program to send Excel
workbooks. The code (provided by this board) works great except for the
fact that Outlook has the dialog box that says "A program is trying to
automatically send an email on your behalf? Do you want to allow this?"
Normally this isn't a problem, however my program is looping thru a
spreadsheet of about 500 names and email addresses so of course this is
cumbersome.
Can this feature be disabled from within Excel or from Outlook?

Sheets(Array("Sheet1", "Sheet2")).Copy
'ActiveWindow.SelectedSheets.Copy
Set wb = ActiveWorkbook
With wb
.SaveAs "C:\Documents and Settings\"
.SendMail "email address here", _
"comment here"
.ChangeFileAccess xlReadOnly
'Kill .FullName
.Close False
End With

much thanks.













All times are GMT +1. The time now is 10:41 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com