% ' change to address of your own SMTP server strHost = "patagoniaspanish.com" If Request("Send") <> "" Then Set Mail = Server.CreateObject("Persits.MailSender") ' enter valid SMTP host Mail.Host = strHost Mail.From = Request("E-Mail") ' From address Mail.FromName = Request("FromName") ' optional Mail.AddAddress "info@patagoniaspanish.com" ' message subject Mail.Subject = Request("Subject") ' message body Mail.Body = Request("Body2") & chr(10) & chr(10) & "Surname: " & Request ("FromName") & chr(10) & "First Name: " & Request ("Firstname") & chr(10) & "Nationality: " & Request ("Nationality") & chr(10) & "Sex: " & Request ("Sex") & chr(10) & "Date of Birth: " & Request ("Birth") & chr(10) & "Address: " & Request ("Address") & chr(10) & "Zip Code: " & Request ("Zipcode") & chr(10) & "City: " & Request ("City") & chr(10) & "Country: " & Request ("Country") & chr(10) & "Phone: " & Request ("Phone") & chr(10) & "FAX: " & Request ("Fax") & chr(10) & "E-Mail: " & Request ("E-Mail") & chr(10) & "Confirmation of E-Mail: " & Request ("E-Mail2") & chr(10) & "Profession: " & Request ("Profession") & chr(10) & "Spanish level: " & Request ("Spanish") & chr(10) & "Company/University: " & Request ("Company") & chr(10) & "Years you have been studying Spanish: " & Request ("Spanish2") & chr(10) & chr(10) & "MEDICAL SPANISH PROGRAM" & chr(10) & "Start date of classes for Medical Spanish program: " & Request ("scd5") & "-" & Request ("scm5") & "-" & Request ("scy5") & chr(10) & "Number of private classes per day: " & Request ("Program") & chr(10) & "Number of weeks of your program: " & Request ("Book22") & chr(10) & "Describe your past relevant experience and study on this field (Medicine): " & Request ("experience") & chr(10) & chr(10) & "ACCOMMODATION: " & chr(10) & "Type of accommodation: " & Request ("Accomm") & "I want to book the accommodation option for: " & Request ("more") & " weeks" & chr(10) & "Arrival Date in Buenos Aires: " & Request ("sad") & "-" & Request ("sam") & "-" & Request ("say") & chr(10) & "Departure Date from Buenos Aires: " & Request ("scd") & "-" & Request ("scm") & "-" & Request ("scy") & chr(10) & "Airport transfer(yes/no): " & Request ("Airport2") & " --" & "Airport details: " & Request ("Airport") & chr(10) & "Tango: " & Request ("Tango") & chr(10) & chr(10) & "ADDITIONAL INFORMATION : " & chr(10) & Request ("Health") & chr(10) & "Comments: " & Request ("co") & chr(10) & "How did you hear about us: " & Request ("How") & chr(10) strErr = "" bSuccess = False On Error Resume Next ' catch errors Mail.Send ' send message If Err <> 0 Then ' error occurred strErr = Err.Description else bSuccess = True End If End If %>
|
Learn Spanish in Buenos Aires |
|
![]() |
![]() |
|
|
|
|||||||||||||||||||||||||||||||||||||
|
|
|
a |
|
|
|
|
A.I.E.
- ARGENTINA IDIOMA ESPAÑOL - Central Address: Otto Meiling 357-
Zip Code (8400) - Bariloche - Río Negro - Argentina
|
|
|
Tel./Fax:
++54 2944 525178 - E-Mail:
info@patagoniaspanish.com
|
|
| a |
..............................................................................................................................................................................................................
|