Email Button on a Web Page

[akmackenzie]

Re: Email Button on a Web Page

If CurrentForm.Controls.RadioButton = "1" then

DIM ps as P
DIM pm as P
pm.from = "[email protected]"
pm.from_alias = "andrewmackenzie"
pm.subject = "New Requisition Order"
pm.message = "Please see attached a new requisition order to be processed"
'optional header fields
pm.lRelated = .F.
' send message
IF email_smtp_open(ps, "my smtp outgoing address", "25", "andrewmackenzie", "my password")
email_smtp_send(pm, ps)
END IF
Email_smtp_close(ps)

end if



Or do you want the xbasic for the whole component aswell?

[NoeticCC]

Re: Email Button on a Web Page

The port is a number not a string

[akmackenzie]

Re: Email Button on a Web Page

Ye i know, i just tried it with quotes just out of boredom, forgot to take them out again.

So it should be

If CurrentForm.Controls.RadioButton = "1" then

DIM ps as P
DIM pm as P
pm.from = "[email protected]"
pm.from_alias = "andrewmackenzie"
pm.subject = "New Requisition Order"
pm.message = "Please see attached a new requisition order to be processed"
'optional header fields
pm.lRelated = .F.
' send message
IF email_smtp_open(ps, my smtp outgoing address, 25, "andrewmackenzie", "my password")
email_smtp_send(pm, ps)
END IF
Email_smtp_close(ps)

end if

[NoeticCC]

Re: Email Button on a Web Page

LOL.... hadn't noticed til now - you have no TO property set... try setting pm.to to your email address or a secondary one...

[akmackenzie]

Re: Email Button on a Web Page

Obvious mistake! But yet still variable not found. When typing this line:

IF email_smtp_open(ps, mysmtpaddress ,25 , "andrewmackenzie" , "mypassword")

it comes up with a template to use in this form...

(P psocket, C smtp-server [, N port [, C username [, C password [, C mode ]]])

what is the 'mode' section about?

[NoeticCC]

Re: Email Button on a Web Page

Obvious mistake! But yet still variable not found

Your SMTP address should be a string too... otherwise it tries to insert a variable called mysmtpaddress...

It worked for me when I replaced the details in the email_smtp_open() function with our own mail server details & my username & password... so there is nothing wrong with the code once you put pm.to = "avalidemailaddress"

Mode - as per help files, it is used to specify "SSL" if you want to use that...
http://support.alphasoftware.com/alp...MTP_OPEN().htm

[Steve Wood]

Re: Email Button on a Web Page

Would you please post your AfterValidate code exactly as it is, no substitutions except if you need to for the SMTP server name for privacy. And in that case still show exactly how you are providing a value for that parameter.

Every time you post your 'code', it looks a little different.

[akmackenzie]

Re: Email Button on a Web Page

No way, it worked! Thank you so much for your help :)

[akmackenzie]

Re: Email Button on a Web Page

Sorry Steve must have posted that just as you posted yours, but here is the final product anyway thanks

If CurrentForm.Controls.RadioButton = "1" then

DIM ps as P
DIM pm as P
pm.from = "[email protected]"
pm.from_alias = "andrewmackenzie"
pm.to = "[email protected]"
pm.subject = "New Requisition Order"
pm.message = "Please see attached a new requisition order to be processed"
'optional header fields
pm.lRelated = .F.
' send message
IF email_smtp_open(ps, "192.168.10.1" ,25 , "andrewmackenzie" , "mackenzie")
email_smtp_send(pm, ps)
END IF
Email_smtp_close(ps)

end if

[NoeticCC]

Re: Email Button on a Web Page

Hooray!!!

Next time you have a similar problem, try the interactive window, it's useful for instant feedback :)

Andrea

[akmackenzie]

Re: Email Button on a Web Page

Ha so i dont annoy you guys. Interactive window tho? where?

Should i go there for my next problem then, which is... where is the root folder for the reports to add as an attachment and will the arguments that are set for the report be automatically asked? ;)

[Steve Wood]

Re: Email Button on a Web Page

You can attach files from anywhere on your server or LAN provided you use the proper syntax - "\\servername\share\folder\filename.xxx" or "c:\mydocs\myfolder\filename.xxx". There is no "root folder", you need to provide the full path. (Relative path if your docs are inside the Document Root, but I doubt they are).

The server will not prompt for anything, you have to specify the exact location and filename.

[NoeticCC]

Re: Email Button on a Web Page

Ha so i dont annoy you guys. Interactive window tho? where?

http://support.alphasoftware.com/alp...ive_Window.htm

You can try out code without building a user interface first...

Should i go there for my next problem then, which is... where is the root folder for the reports to add as an attachment

In a web dialog's AfterValidate event, go to Insert - > Genies and select the report one... this takes care of both arguments and paths.... just remove the line currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + time("hms3") and replace it with the code for emailing the report instead....

[akmackenzie]

Re: Email Button on a Web Page

So what are the reports saved as? i cant seem to find the actual report in the folder the whole application is saved in. The closest i have came is

C:\documents and settings\andrew3\my documents\alpha five databases\complete design 2\Purchase Orders....

OR

Purchase Orders@c:\documents and settings\andrew3\my documents\alpha five databases\complete design 2.alb

[akmackenzie]

Re: Email Button on a Web Page

Oh right thanks il try that