<%@ Language="VBScript" %>
<%
If not Request.Form("cname")="" Then
set cname=Request.Form("cname")
set address=Request.Form("address")
set city=Request.Form("city")
set cstate=Request.Form("state")
set country=Request.Form("country")
set zip=Request.Form("zip")
set email=Request.Form("email")
set phone=Request.Form("phone")
set fax=Request.Form("fax")
set comment=Request.Form("comments")
set msg = CreateObject("CDO.Message")
msg.Subject = "Enquiry"
msg.From = email
msg.To = "info@dreamland-tours.com"
body=body & "