%@ Language=VBScript %>
<%
Option Explicit
%>
<%
' -----------------------------------------------------
' CDONTS Email send script
' © http://www.designplace.org/
' Comments must remain intact for re-use of this code
' -----------------------------------------------------
dim strErrText, strAction
strAction = Request.QueryString("action")
Select Case strAction
Case "err1"
strErrText = "Error: Please enter your name."
Case "err2"
strErrText = strErrText & "Error: Please enter your email."
Case "err3"
strErrText = strErrText & "Error: Please enter your email confrimation."
End Select
%>
Finacial Assistance - Sugarland Ranch
|
|
|
|
|
|
|
| |
Contact Us
|
| |
If you have any questions about our programs or our non-profit organization feel free to contact us:
Sugarland Ranch, Inc.
3510 Matterhorn Blvd.
Reno, NV 89506
Ph: 1-800-713-7177
Email:
<%
if strAction > "" then
response.write strErrText
end if
%>
|
| |
|
|
|