<%@LANGUAGE="VBSCRIPT"%> <%option explicit%> <% dim email, subname, orderNumber dim strHost dim strErr dim bsuccess dim strBody, strSendername, strSenderemail strHost = "mail.omicrondeltaepsilon.org" If Request("Send") <> "" Then strSendername = Request("o_name") strSenderemail = Request("o_email") ' message body strBody = "ODE Website mail from: " & strSendername & vbcrlf strbody = strBody & "Chapter: " & Request("o_chapter") & vbcrlf strBody = strBody & "Email: " & strSenderemail & vbcrlf & vbCrlf strBody = strBody & "Subject: " & Request("o_subject") & vbcrlf & vbcrlf strBody = strBody & "Query: " & Request("p_query") & vbcrlf & vbcrlf strBody = strBody & vbcrlf & vbcrlf & "IMPORTANT NOTE: This is a dynamically generated email. Please check the address before replying." strErr = "" Const cdoBasic = 1 'Use basic (clear-text) authentication. Const cdoSendUsingPort = 2 Dim iMsg Dim iConf Dim Flds Dim sMsg Dim strTo Dim strCC Dim strFrom Dim strSubject On Error Resume Next set iMsg = CreateObject("CDO.Message") set iConf = CreateObject("CDO.Configuration") Set Flds = iConf.Fields With Flds .Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = cdoBasic .Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "Forms@OmicronDeltaEpsilon.org" .Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "abc123" .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPort .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = strHost .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 .Update End With strTo = "Information@OmicronDeltaEpsilon.org" strCC = strSenderemail strFrom = strSenderemail strSubject = Request("o_subject") 'Apply the settings to the message object With iMsg Set .Configuration = iConf .To = strTo .From = strFrom If strCC <> "" Then .CC = strCC End If .Subject = strSubject .TextBody = strBody 'Send message .Send End With if iMsg.SendMail then bsuccess = true else bSuccess = False On Error Resume Next ' catch errors strErr = iMsg.Response End If ' cleanup mail objects Set iMsg = Nothing Set iConf = Nothing Set Flds = Nothing end if %> Omicron Delta Epsilon - The International Economics Honor Society
National Office
 National Officers
 New Chapter Petition
 History of Ο Δ Ε
 Past Officers
 What is ACHS?
Faculty Advisors
 Contact Us
 About Us
The American Economist

Contact Omicron Delta Epsilon

<% If strErr <> "" Then response.write ("

 An error occurred: " & strErr & "") End If If bSuccess Then response.write ("

 Your message has been sent. Thank you.") End If %>
By Phone:
(251) 928-0001
By Fax:
(251) 928-0015
By Mail:

Farhang Niroomand, Executive Secretary/Treasurer,
Omicron Delta Epsilon,
P.O. Box 2096,
Fiarhope, AL 36533

By Email:
or use this form:





May 15, 2019Graduate Student Invited Paper Session

In January 2020, Omicron Delta Epsilon and the American Economic Association will jointly be hosting a Graduate Student Invited Paper Session at the ASSA meeting in San Diego. Work  chosen for the session will automatically be entered into the Irving Fisher Graduate Article competition.

To submit, apply online or by mail along with a brief abstract of your paper by May 15 , 2019.  Decisions on papers and discussants will be made by June 15, 2019. For more information click here.

April 30, 2019 - Fall 2019 Chapter project Grants

Funds are available, up to $1,000, to support special projects of active chapters.Priority will be given to proposals where the chapter actively seeks outside matching funding and where multiple chapters are involved. Matching funds may come from students, the institution, or outside sources. The maximum grant is $500 for chapters without matching funds.  For more information click here.

Omicron Delta Epsilon is proud to be a member of ACHS
Association of College Honor Societies