<%
nAction = Request("nAction")
nMsg = ""
If nAction = "send" Then
If sendMail() = false Then
nMsg = showError()
Else
Response.Redirect("contactok.html")
End If
End If
%>
CenterLine Production - Contact
Talk to us
Please feel free to
contact us for more information.
<%="" + nMsg + ""%>
<%
Function CheckState(N)
If N = State Then
CheckState = "Selected"
Else
CheckState = ""
End If
End Function
%>
<%
Function ClassFounder_Name()
If nMsg = "" Then
ClassFounder_Name = "content"
Else
If name = "" Then
ClassFounder_Name = "contentRed"
End If
End If
End Function
%>
<%
Function ClassFounder_email()
If nMsg = "" Then
ClassFounder_email = "content"
Exit Function
Else
If email = "" Then
ClassFounder_email = "contentRed"
Exit Function
End If
If ValidateEmail(email) = false Then
ClassFounder_email = "contentRed"
Exit Function
End If
End If
End Function
%>
<%
Function ClassFounder_comments()
If nMsg = "" Then
ClassFounder_comments = "content"
Else
If comments = "" Then
ClassFounder_comments = "contentRed"
End If
End If
End Function
%>
