WinBatch Tech Support Home

Database Search

If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.

TechHome

Postie

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

Send Email with dialog.


Keywords: Send Email with HTML dialog text field edit box lines

Question:

I am trying to create a dialog that can emulate an email type dialog. I need help getting pointed in the right direction.

Answer:

You can use a WIL Dialog and the Postie extender.
emailerFormat=`WWWDLGED,6.1`

emailerCaption=`WB E-Mailer`
emailerX=048
emailerY=055
emailerWidth=414
emailerHeight=304
emailerNumControls=011
emailerProcedure=`DEFAULT`
emailerFont=`DEFAULT`
emailerTextColor=`DEFAULT`
emailerBackground=`DEFAULT,DEFAULT`
emailerConfig=0

emailer001=`154,284,034,011,PUSHBUTTON,DEFAULT,"Send",1,1,32,DEFAULT,DEFAULT,DEFAULT`
emailer002=`214,284,033,011,PUSHBUTTON,DEFAULT,"Cancel",0,2,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer003=`046,012,350,022,DROPLISTBOX,mailhost,DEFAULT,DEFAULT,3,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer004=`009,012,052,011,STATICTEXT,DEFAULT,"Mail Server:",DEFAULT,4,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer005=`009,028,052,011,STATICTEXT,DEFAULT,"From:",DEFAULT,5,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer006=`046,028,350,011,EDITBOX,fromaddr,"",DEFAULT,6,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer007=`009,044,052,011,STATICTEXT,DEFAULT,"To:",DEFAULT,7,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer008=`046,044,350,011,EDITBOX,toaddr,"",DEFAULT,8,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer009=`009,060,052,011,STATICTEXT,DEFAULT,"Subject:",DEFAULT,9,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer010=`046,060,350,011,EDITBOX,subject,"",DEFAULT,10,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
emailer011=`009,081,387,198,MULTILINEBOX,text,"",DEFAULT,11,DEFAULT,DEFAULT,DEFAULT,DEFAULT`

ButtonPushed=Dialog("emailer")



AddExtender("WWPST34I.DLL")
userid=""
password=""
port=""
cclist=""
bcclist=""
attachments=""
flags=""

kInit(mailhost,fromaddr,userid,password,port)
kDest(toaddr,cclist,bcclist)
kSendText(subject,text,attachments,flags)



Article ID:   W14433
Filename:   Send Email with dialog.txt
File Created: 2017:07:28:13:58:36
Last Updated: 2003:06:09:09:08:59