Solved

How to Write an EMAIL APP  with AOL as ISP

Posted on 2000-03-16
18
331 Views
Last Modified: 2008-03-06
I am writing a VB App. Part of the Funtionality I want is to send Email from it. I can do this with SMTP, and MAPI and other ISPs. But what do I have to do to make this work when AOL is the ISP?
Or has AOL Sealed this up so you can't.
Another Reason I ask is, someone is offering me a program that claims to do this.
0
Comment
Question by:DaveLeWave
  • 8
  • 6
  • 4
18 Comments
 
LVL 14

Accepted Solution

by:
mcrider earned 100 total points
ID: 2624777
You can write a package that will send Email through AOL, however, you will have to be logged on to AOL to do it...

To actually send mail, you need to send the keystrokes to open a new message, fill out the AOL form and click the send.


Cheers!®©
0
 

Author Comment

by:DaveLeWave
ID: 2624897
I know about trying it the suggested above.

1) It is a given that AOL is logged into and Running

2)  I am wondering more along the lines of:  is there some way of doing it through code with SMTP or MAPI or some other protocol that is unique to AOL.

3) If I did it as suggested above, does this work when AOL is minimized?
0
 
LVL 14

Expert Comment

by:mcrider
ID: 2625031
No AOL does not support external SMTP/MAPI.  Their mail interface is completely embedded in their TCP Service port 5190.

If AOL is mimimized, you will have to bring it back to normal.  You can this:


Add the following to a MODULE:

    Public Const SW_HIDE = 0
    Public Const SW_SHOWNORMAL = 1
    Public Const SW_NORMAL = 1
    Public Const SW_SHOWMINIMIZED = 2
    Public Const SW_SHOWMAXIMIZED = 3
    Public Const SW_MAXIMIZE = 3
    Public Const SW_SHOWNOACTIVATE = 4
    Public Const SW_SHOW = 5
    Public Const SW_MINIMIZE = 6
    Public Const SW_SHOWMINNOACTIVE = 7
    Public Const SW_SHOWNA = 8
    Public Const SW_RESTORE = 9
    Public Const SW_SHOWDEFAULT = 10
    Public Const SW_MAX = 10
    Public Const WS_MINIMIZE = &H20000000
    Public Const GWL_STYLE = (-16)
    Declare Function GetWindowLong Lib "user32" _
        Alias "GetWindowLongA" (ByVal hwnd As Long, _
        ByVal nIndex As Long) As Long
    Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
        (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
    Declare Function ShowWindow Lib "user32" (ByVal hwnd As Long, _
        ByVal nCmdShow As Long) As Long





Then in your program, do this:

   Dim lWinfo As Long
   Dim lhWnd As Long

   lhWnd = FindWindow(vbNullString, "America  Online")
   lWinfo = GetWindowLong(lhWnd, GWL_STYLE)
   If (lWinfo And WS_MINIMIZE) = WS_MINIMIZE Then ShowWindow lhWnd, SW_NORMAL



Cheers!®©
0
 
LVL 14

Expert Comment

by:wsh2
ID: 2625501
Psssst.. mcrider I can do it through AOL.. da mighty B (me) has busted da proprietary AOL filing cabinet format!!!.. <smile> and a <wink>.

DaveLeWare.. as I am still working on the program.. I am retiscent to send anything yet.. <sigh>. But, if you leave your EMail address, I will be more than happy to send you a Beta copy when it is done. By the way, I would very much like to know what your friend has done.. perhaps he and I could compare notes.. <smile>.
0
 
LVL 14

Expert Comment

by:mcrider
ID: 2625659
wsh2, Got my attention...  Are you writing directly to the filing cabinet and then having them sent during a "FlashSession"???

If it's something like that, you may run into problems... AOL has in the past, periodically done something to the filing cabinet to screw with apps like that... I had an app that did that and ended up corrupting my filing cabinet... I still have 2 "Mail waiting to be sent" folders and 2 "Incoming/Saved Mail" folders in my cabinet that I've never been able to get rid of...

Needless to say, I stopped using the beast.


Cheers!®©
0
 

Author Comment

by:DaveLeWave
ID: 2625737
Thanks for the input

Thanks Mcrider, the solution you provided was what I had comtemplated already, your response makes me think I will have to go that way.  I was hoping to avoid this method and find some other way.
If they are sending mail through the TCP service port, there must be some kind of format that the data package has that tells their server its mail, whos it from, where's it going etc.


Wsh2 I wouldn't mind a beta copy.
If you're willing to share the concepts of the module I would appreciate that as well. (I don't think you were offering source code, but I could write my own if needed).
My Email is DMeisland@accredhome.com.
Is this something I could incorporate into my project, or a demonstration of sending email externaly being done?

0
 
LVL 14

Expert Comment

by:wsh2
ID: 2625787
mcrider:
AOL changed the directory that they do their sends from.. thats all.. <smile>.
0
 
LVL 14

Expert Comment

by:mcrider
ID: 2625872
No... What I'm saying is my Filing Cabinet looks like this:

+MAIL
  |_______Incomming/Saved Mail
  |_______Mail Waiting To Be Sent
  |_______Incomming/Saved Mail
  |_______Mail Waiting To Be Sent
  |_______Mail You've Sent


See the duplicates... If I try to delete either duplicate, I get the message "You cannot delete permanent items".

This happened after I installed a crappy mailer that uses the File Cabinet.  AOL's answer... Remove AOL and reinstall... (and lose everything in my Filing Cabinet!!)

So... How ARE you doing it...??
0
 

Author Comment

by:DaveLeWave
ID: 2628502
WSH2:FYI
I Talked to the person who was offering the AOL Mail, and He since has backtracked. This is what he did.
1.)Use AOL only as the ISP
2.) You set up a client Email Program
  i.e. Outlook Express through SMTP or MAPI to connect to another EMAIL provider, i.e. Hotmail
0
Find Ransomware Secrets With All-Source Analysis

Ransomware has become a major concern for organizations; its prevalence has grown due to past successes achieved by threat actors. While each ransomware variant is different, we’ve seen some common tactics and trends used among the authors of the malware.

 
LVL 14

Expert Comment

by:mcrider
ID: 2628587
As I suspected...  Are you going to award the points or wait for wsh2?  If you wait too long, the EE autograder will delete this message since it doesn't have a proposed answer...


Cheers!®©
0
 

Author Comment

by:DaveLeWave
ID: 2629044
I'll will award the points,
but I still would like to hear from
wsh2
0
 

Author Comment

by:DaveLeWave
ID: 2629059
Confirmed what I thought I would have to do.

I fell the topic could use a lot more discussion.
0
 
LVL 14

Expert Comment

by:mcrider
ID: 2629125
Thanks for the points... I'm sure wsh2 will continue to participate in the thread...


Cheers!®©
0
 
LVL 14

Expert Comment

by:wsh2
ID: 2629360
Adding to mcrider's comment:

Assuming you are using AOL 5.0

Once you have gotten the "America Online" Window (classname AOL Frame25), enumchildren until you find AOL Toolbar.. and then enumchildren again until you find the second AOL Icon (which should be Write). Give it focus and send it a mousclick.. This will open a Write window.

Enumchildren through America Online again and find MDICLIENT.. then enumchildren through MDICLIENT until you find "Write Mail".. then enumchildren until you find the following.. the first Edit is Send To:.. the second Edit is Copy To:.. the third Edit Subject: and finally the RICHCNTL window is the body. Give focus and the appropriate sendkeys to each. The 16th Aol Icon in the enumchildren list is the Send Now button.. the 17th Send Later.. give whichever you choose focus.. and then a mouseclick.

Some fun, huh?.. LOL and a <wink>
0
 
LVL 14

Expert Comment

by:mcrider
ID: 2629563
You can also just use sendkeys...

SendKeys "^M" 'Brings up a compose mail window

and then send tabs and fill in the message...


;-)


Cheers!®©

0
 
LVL 14

Expert Comment

by:wsh2
ID: 2629797
Very nice.. mcrider.. <smile>
0
 
LVL 14

Expert Comment

by:mcrider
ID: 2629890
<G>
0
 

Author Comment

by:DaveLeWave
ID: 2630543
Yes, I knew of this way and dreaded it. The risk here is if a user accidently hits the keyboard. This will cause the whole process can get messed up. One thing is for sure, it can be done, a user will do it.
0

Featured Post

Highfive + Dolby Voice = No More Audio Complaints!

Poor audio quality is one of the top reasons people don’t use video conferencing. Get the crispest, clearest audio powered by Dolby Voice in every meeting. Highfive and Dolby Voice deliver the best video conferencing and audio experience for every meeting and every room.

Join & Write a Comment

You can of course define an array to hold data that is of a particular type like an array of Strings to hold customer names or an array of Doubles to hold customer sales, but what do you do if you want to coordinate that data? This article describes…
If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

746 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

13 Experts available now in Live!

Get 1:1 Help Now