<%option explicit dim FriendsEmail,FriendsName,SenderName,EmailSubject,EmailMessage,SenderEmail,error,WholeEmail,dear,sincerely,ArtistName,Link ArtistName = "Smooth Africa II: Exploring the Soul" Link = "http://www.headsup.com/ecards/3077/" SenderName = Request.Form("SenderName") SenderEmail = Request.Form("SenderEmail") FriendsEmail = Request.Form("FriendsEmail") FriendsName = Request.Form("FriendsName") EmailSubject = Request.Form("EmailSubject") EmailMessage = Request.Form("EmailMessage") dear = Request.Form("dear") sincerely = Request.Form("sincerely") If Request.Form("returning") = 1 then If instr(SenderName,";") Then SenderName = replace(SenderName,";","") error = "Please only use valid alpha-numeric characters
" End If if SenderName = "" then sincerely = "" else sincerely = "Sincerely Yours, " & vbnewline & SenderName end if if FriendsName <> "" then dear = "Dear " & FriendsName & "," else dear = "Dear *your friends name will appear here*" end if if SenderEmail = "" then error = error & "Please enter a valid email address for yourself.
" end if if FriendsEmail = "" then error = error & "Please enter a valid email address of one of your friends.
" end if If FriendsEmail <> "" and SenderEmail <> "" then WholeEmail = dear & " -- " & EmailMessage & " -- " & sincerely WholeEmail = "Subject: " & EmailSubject & " -- Message: " & WholeEmail If err.number = 0 then dim oMail set oMail = server.CreateObject("CDONTS.NewMail") oMail.To = FriendsEmail & "(" & FriendsName & ")" oMail.From = SenderEmail & "(" & SenderName & ")" oMail.Subject = EmailSubject oMail.Body = dear & vbnewline & vbnewline & EmailMessage & vbnewline & vbnewline & sincerely oMail.Send set oMail = nothing Response.Redirect "/ecards/send_thanks.htm" end if end if else dear = "Dear *your friends name will appear here*" sincerely = "Sincerely Yours, " & SenderName EmailMessage = "I've just discovered this great new album " & ArtistName & ". I think you'll really like it. Check it out at " & Link & vbnewline & vbnewline & "PS: Simply click on the above link or launch a web browser and copy/paste the link into your browser's address bar." EmailSubject = "New Album from " & ArtistName end if %> E-Card: Smooth Africa II

Heads Up

Smooth Africa II: Exploring The Soul 

Smooth Africa II
Exploring The Soul

HUCD3077
UPC: 0-53361-3077-2-1
Release Date: July 22, 2003

FREE MP3 Sample:

Track Listing:

  1. Walk of Life - Jimmy Dludlu
  2. Abezizwe - Ladysmith Black Mambazo
  3. Bringing Joy - Alou April
  4. Mangase - Smaluza Max
  5. Adderley Street - Joe McBride
  6. Neria - Oliver Mtukudzi
  7. Punch - Andy Narell
  8. Botsotsi - Prince Kupi
  9. Hymn for Taiwa - Moses Khumalo
  10. Yebo! - Joe McBride
  11. Umuntu Wakmo - Gloria Bosman
  12. Cape Town Love - Spyro Gyra

Smooth Africa II

order nowsend this to a friend


RealPlayer
If you don't have an MP3 player, download the free RealJukebox player now.
RealPlayer
Make sure you've got RealPlayer to view & listen to our video & audio selections.

 

Send This E-Card To A Friend

Do you have a friend that would enjoy this release. Please take a moment to share the excitement. Simply complete the brief form below and we'll send them an email notification. Thanks.

<%="

" & error & "

"%>
Friend's Email:
Friend's Name:
Your Name:  (as you'd like it to appear)
Your Email:
Email Subject:
                               <%=dear%>

Message:

<%=sincerely%>                                     
Note: If you have any Pop-Up Blocker applications enabled, the ecard will not appear. Please disable and reload this page.