<% Response.Buffer = True Dim strBody Dim objCDOMail Dim strMyEmailAddress Dim strReturnEmailAddress strMyEmailAddress = "lethangie@hotmail.com" strReturnEmailAddress = Request.Form("email") strBody = "

Comments from www.lethangiecampsite.co.uk

" strBody = strBody & "
Name: " & Request.Form("name") strBody = strBody & "

Address: " & Request.Form("address") strBody = strBody & "

Phone Number: " & Request.Form("phone") strBody = strBody & "

E-mail: " & strReturnEmailAddress strBody = strBody & "

Comments: " & Request.Form("comment") If Len(strReturnEmailAddress) < 5 OR NOT Instr(1, strReturnEmailAddress, " ") = 0 OR InStr(1, strReturnEmailAddress, "@", 1) < 2 OR InStrRev(strReturnEmailAddress, ".") < InStr(1, strReturnEmailAddress, "@", 1) Then strReturnEmailAddress = strMyEmailAddress End If Set objCDOMail = Server.CreateObject("CDONTS.NewMail") objCDOMail.From = Request.Form("name") & " <" & strReturnEmailAddress & ">" objCDOMail.To = strMyEmailAddress objCDOMail.Bcc = "dave@nimblepages.co.uk" objCDOMail.Subject = "Comments from www.lethangiecampsite.co.uk" objCDOMail.BodyFormat = 0 objCDOMail.MailFormat = 0 objCDOMail.Body = strBody objCDOMail.Importance = 2 objCDOMail.Send Set objCDOMail = Nothing %>

T in the Park Testimonials

Take me home

T in the Park

Book a Pitch for T in the Park

Camping for T in the Park pictures

 

 

 

 

 

Comments from previous party goers !!

 

Fantastic weekend!, campsite was just around the corner and supplied transport to and from the Festival !!!

 

 

Excellent campsite for T in the Park and would recommend to anyone. If i go next year i would seriously consider staying there again!!

 

 

Lethangie is a cracking site, I've stayed here for the last 3 T in the Parks. Definately coming back for a fourth time.

 

 

The campsite is brilliant, managed to get back to my tent no bother and got a relativley peaceful sleep to boot !

Lethangie Campsite, Lethangie, Kinross, KY13 9EY
Tel: 07713 412 030, Email: lethangiecampsite@hotmail.co.uk