<%@ Language=VBScript %> <% IF request.form("FormName")="request" THEN dim objMail dim iConf dim flds dim shtml Const cdoSendUsingPort = 2 Const strSmartHost = "ns2.seewolf.com" set objMail = CreateObject("CDO.Message") set iConf = objMail.Configuration 'set iConf = CreateObject("CDO.Configuration") Set Flds = iConf.Fields With Flds .Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdoSendUsingPort .Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = strSmartHost .Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout")= 10 .update end with With objMail objMail.From = "Website@americanarchaeology.org" objMail.To = "tacinfo@nm.net" objMail.BCC = "sryan@seewolf.com" objMail.Subject = "Request for Application" SHTML="" SHTML = SHTML & "" SHTML = SHTML & "" SHTML= SHTML & "Request for Information

" SHTML = SHTML & "Name: " & Request.form("Name") & "
" SHTML = SHTML & "Address: " & Request.form("Address") & "
" SHTML = SHTML & "City: " & Request.form("City") & "
" SHTML = SHTML & "State: " & Request.form("State") & "

" SHTML = SHTML & "Zip: " & Request.form("Zip") & "
" SHTML = SHTML & "Email: " & Request.form("From") & "
" SHTML = SHTML & "Please send me an application: " & Request.form("application") & "
" SHTML = SHTML & "Mailing List: " & Request.form("MailingList") & "
" SHTML = SHTML & "" SHTML = SHTML & "" objMail.htmlBody=SHTML objMail.Send end with SET objMail=nothing SEt iconf = nothing set flds = nothing On Error Resume Next Response.redirect "/thankyou1.htm" Else END IF %> Send Information
 
| about us | membership | where we work |

home
American archaeology magazine
join or renew
donate now
where we work
new acquisitions
tours
events
Member Login
links
send more information
 

 

Request for Information
 
Name:   
Address:
City: 
State: 
Zip Code:
Email: 
 
I would like to join The Archaeological Conservancy and help protect America's cultural heritage: 
Please send me a membership application. 
(Conservancy membership starts at $25 and includes an annual subscription to American Archaeology. Members also receive brochures describing the Conservancy's archaeological tours.) 
I would like information on your archaeological tours:
Place me on your mailing list to receive brochures about your current and future tours.
Do not place me on your mailing list. Just send me information about the tours featured on your website.

Click here when your information input has been completed.

Click here to clear the form and start over.

The Archaeological Conservancy 
5301 Central Avenue NE, Suite 902 
Albuquerque, NM  87108-1517 
(505) 266-1540 
email: tacinfo@nm.net 

 

                                                     | home | contact us | more information |