473,326 Members | 2,732 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,326 software developers and data experts.

CDO and sbcglobal

For several years I used CDO to send emails via Comcast

I recently switched to sbcglobal and changed the user name and password

Now I get a server not available message everytime I try to send an email.

Is anyone using sbcglobal and CDO?

My code is

Dim iMsg As New CDO.Message
Dim iConf As New CDO.Configuration
Dim Flds As ADODB.fields

With iConf.fields

.Item(cdoSendUsingMethod) = cdoSendUsingPort

.Item(cdoSMTPServer) = "smtp.comcast.net"

.Item(cdoSMTPConnectionTimeout) = 10
.Item(cdoSMTPAuthenticate) = cdoBasic

.Item(cdoSendUserName) = "realname"
.Item(cdoSendPassword) = "realpwd2"

.Update

End With

With iMsg
Set .Configuration = iConf

.To = "<" & Me.Email & ">"
.From = "<" & Me.txtFrom & ">"
.Subject = Me.txtSubject
.TextBody = Me.txtMessage
.Send

End With

Me.DateSent = Now()
MsgBox "Messge sent"

End Sub
--
Feb 9 '07 #1
4 2015
On Fri, 09 Feb 2007 19:52:24 GMT, "Karl" <so*****@sbcglobal.bizwrote:

Try using -
.Item(cdoSendUsingMethod) = cdoSendUsingPickup

>For several years I used CDO to send emails via Comcast

I recently switched to sbcglobal and changed the user name and password

Now I get a server not available message everytime I try to send an email.

Is anyone using sbcglobal and CDO?

My code is

Dim iMsg As New CDO.Message
Dim iConf As New CDO.Configuration
Dim Flds As ADODB.fields

With iConf.fields

.Item(cdoSendUsingMethod) = cdoSendUsingPort

.Item(cdoSMTPServer) = "smtp.comcast.net"

.Item(cdoSMTPConnectionTimeout) = 10
.Item(cdoSMTPAuthenticate) = cdoBasic

.Item(cdoSendUserName) = "realname"
.Item(cdoSendPassword) = "realpwd2"

.Update

End With

With iMsg
Set .Configuration = iConf

.To = "<" & Me.Email & ">"
.From = "<" & Me.txtFrom & ">"
.Subject = Me.txtSubject
.TextBody = Me.txtMessage
.Send

End With

Me.DateSent = Now()
MsgBox "Messge sent"

End Sub
Wayne Gillespie
Gosford NSW Australia
Feb 10 '07 #2
Wayne

Thanks but now its asking me for the Pickup folder.

I'm using A2000 and Outlook Express 6.
"Wayne Gillespie" <be*****@NOhotmailSPAM.com.auwrote in message
news:ns********************************@4ax.com...
On Fri, 09 Feb 2007 19:52:24 GMT, "Karl" <so*****@sbcglobal.bizwrote:

Try using -
.Item(cdoSendUsingMethod) = cdoSendUsingPickup

>>For several years I used CDO to send emails via Comcast

I recently switched to sbcglobal and changed the user name and password

Now I get a server not available message everytime I try to send an email.

Is anyone using sbcglobal and CDO?

My code is

Dim iMsg As New CDO.Message
Dim iConf As New CDO.Configuration
Dim Flds As ADODB.fields

With iConf.fields

.Item(cdoSendUsingMethod) = cdoSendUsingPort

.Item(cdoSMTPServer) = "smtp.comcast.net"

.Item(cdoSMTPConnectionTimeout) = 10
.Item(cdoSMTPAuthenticate) = cdoBasic

.Item(cdoSendUserName) = "realname"
.Item(cdoSendPassword) = "realpwd2"

.Update

End With

With iMsg
Set .Configuration = iConf

.To = "<" & Me.Email & ">"
.From = "<" & Me.txtFrom & ">"
.Subject = Me.txtSubject
.TextBody = Me.txtMessage
.Send

End With

Me.DateSent = Now()
MsgBox "Messge sent"

End Sub

Wayne Gillespie
Gosford NSW Australia

Feb 13 '07 #3
"Karl" <so*****@sbcglobal.bizwrote in message
news:Yh*******************@newssvr21.news.prodigy. net...
For several years I used CDO to send emails via Comcast

I recently switched to sbcglobal and changed the user name and password

Now I get a server not available message everytime I try to send an email.
Likely because you didn't change this line...

..Item(cdoSMTPServer) = "smtp.comcast.net"
--
Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com
Feb 13 '07 #4
No

This is a copy after I changed the code back to comcast
"Rick Brandt" <ri*********@hotmail.comwrote in message
news:Hq*******************@newssvr13.news.prodigy. net...
"Karl" <so*****@sbcglobal.bizwrote in message
news:Yh*******************@newssvr21.news.prodigy. net...
>For several years I used CDO to send emails via Comcast

I recently switched to sbcglobal and changed the user name and password

Now I get a server not available message everytime I try to send an
email.

Likely because you didn't change this line...

.Item(cdoSMTPServer) = "smtp.comcast.net"
--
Rick Brandt, Microsoft Access MVP
Email (as appropriate) to...
RBrandt at Hunter dot com

Feb 13 '07 #5

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

10
by: OneSolution | last post by:
When my users type in a search parameter on my website, I want the search to execute. While it's executing, I want a temporary page to be loaded, with perhaps an advert, and when the search...
9
by: Bartosz Wegrzyn | last post by:
I need help with sessions. I createt set of web site for nav with authorization. first I go into main.php which looks like this: <?php //common functions include_once '../login/common.php';...
1
by: Scott Holmes | last post by:
I'm experiencing what seems to be strange behaviour. I don't know if it's Pmw, Tkinter on Python. I have a button, defined in a Pmw.buttonbox, that I would like to configure to "sunken" after it...
35
by: Thomas Matthews | last post by:
Hi, My son is writing a program to move a character. He is using the numbers on the keypad to indicate the direction of movement: 7 8 9 4 5 6 1 2 3 Each number has a direction except...
4
by: mchoya | last post by:
Hello all, I want to display a list of ints for example 100, 1000, 10000 as prices $1.00, $10.00, $100.00. Can I do this? I guess I have to use the iomanip lib. But the only manipulators I...
5
by: Tappy Tibbons | last post by:
I have a class I am serializing, and need the resultant XML to skip/omit classes that are not initialized, or their member variables have not been set. Is this possible? Say for the following...
6
by: Fan Ruo Xin | last post by:
Please don't tell me using DB2LOOK. I only found the following difference when I checked the SYSCAT.TABLES. tabname TYPE STATUS PROPERTY -------- ---- ------ --------------------------------...
8
by: Mike | last post by:
is there a tool that will convert cold fusion code to C#? Or anything out there to help in this process? thx
3
by: OMNI GROUP | last post by:
OMNI GROUP tgugger@sbcglobal.net 419-537-9447 WEB BASED SOFTWARE DEVELOPER/ CAREER POSITION/ FT WAYNE AREA
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
by: ryjfgjl | last post by:
ExcelToDatabase: batch import excel into database automatically...
0
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: Vimpel783 | last post by:
Hello! Guys, I found this code on the Internet, but I need to modify it a little. It works well, the problem is this: Data is sent from only one cell, in this case B5, but it is necessary that data...
0
by: jfyes | last post by:
As a hardware engineer, after seeing that CEIWEI recently released a new tool for Modbus RTU Over TCP/UDP filtering and monitoring, I actively went to its official website to take a look. It turned...
1
by: CloudSolutions | last post by:
Introduction: For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
1
by: Defcon1945 | last post by:
I'm trying to learn Python using Pycharm but import shutil doesn't work
0
by: af34tf | last post by:
Hi Guys, I have a domain whose name is BytesLimited.com, and I want to sell it. Does anyone know about platforms that allow me to list my domain in auction for free. Thank you

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.