% @LANGUAGE = VBScript%>
<%
Option Explicit
Response.Expires = 0
Response.Buffer = True
Sub sendMail()
Dim mailSubject,mailBody,inEmail,badMail,inID,x,mailName,eMail
inID = Trim(Request.Form("FormID"))
inEmail = Trim(Request.Form("Email"))
mailSubject = ""
mailBody = ""
If inStr(inEmail, "@") < 1 OR inStr(inEmail,"@") > Len(inEmail) OR inStr(inEmail,"@") = Len(inEmail) Then badMail = "BAD EMAIL: "
If inID = "BOOKING" Then
mailName = Trim(Request.Form("FirstName"))&" "&Trim(Request.Form("LastName"))
mailSubject = mailSubject & "RADWEB BOOKING: "&Trim(Request.Form("Course"))
Else
mailName = Trim(Request.Form("FullName"))
mailSubject = mailSubject & "RADWEB CONTACT: "&Trim(Request.Form("Course"))
End If
mailBody = "
radtrain.co.za: "&mailSubject&""
mailBody = mailBody&""
mailBody = mailBody&"Date: "&Year(Now)&"/"&Month(Now)&"/"&Day(Now)
mailBody = mailBody&" ("&Hour(Now)&":"&Minute(Now)&")
"
mailBody = mailbody&"Subject: "&mailSubject&"
"
For Each x in Request.Form
If x = "SB" OR x = "RB" OR x = "FormID" Then
Else
If x = "Email" Then
mailBody = mailBody&""&x&": "&Trim(Request.Form(x))&"
"
Else
mailBody = mailBody&""&x&": "&Trim(Request.Form(x))&"
"
End If
End If
Next
mailBody = mailBody&"
"
'Response.Write mailBody
Set eMail = Server.CreateObject( "JMail.Message" )
eMail.Logging = true
eMail.silent = true
eMail.From = inEmail
eMail.FromName = mailName
eMail.AddRecipient "info@radtrain.co.za", "Radical Training Website"
eMail.Subject = mailSubject
eMail.HTMLBody = mailBody
eMail.Send("mail.radtrain.co.za")
Set eMail = Nothing
End Sub
sendMail
%>
Radical Training CC
|
|
|
2012 Schedule |
|
06 to 11 May - SAD (Systems Development
Workshop) - KZN |
|
14 to 18 May - SAD (Systems
Development Workshop) - JHB |
|
20 to 25 May - BAD (Business Analyst
Development Workshop) - JHB |
|
03 to 08 June - BAD (Business Analyst
Development Workshop) KZN |
|
15 to 19 October - SAD (Systems Development
Workshop) - KZN |
|
26 to 30 November - BAD (Business Analyst
Development Workshop) |
|
|
Prices
COURSE PRICES
| System
Development and "BAD" Workshop
The cost shown below includes return
airfares (except for Durban delegates), transport to the venue,
full hotel accommodation from Sunday to Friday and all workshop
fees. The venue is the Oaks hotel, Byrne Valley in the Natal
Midlands
- ...from Cape Town R9 950 (excl.
VAT)
- ...from Durban R7 950 (excl. VAT)
- ...from Johannesburg R9 900 (excl.
VAT)
- Contact us for in-house
course costs
In-house courses or other special
arrangements by negotiation. |
|
Prices for the
following Workshops are R875 per
person per day, VAT and venue cost excluded
|
|