 |
| |
Search for
an Internet Drive! |
|
| Search
>> |
 |
| |
Drive Ratings
and User Reviews. |
|
| Reviews
>> |
 |
| |
Professional
Data Storage for a price. |
|
| Paid
Storage >> |
 |
| |
Become your
own Internet Drive! |
|
| Cobranding
>> |
 |
| |
Confused
about Internet Drives? |
|
| FAQs
>> |
 |
| |
Brief Explanation
of Related Terms. |
|
| Drive
Help >> |
 |
| |
Receive
DriveSeek News & Updates. |
|
| Newsletter
>> |
|
|
| DriveSeek.com: Home > Contact Us > |
| |
<%
strSubject = Array ( "Choose a Subject (click to pull down)", _
"I need information about an Internet Drive.", _
"I have some queries about your site & services.", _
"I need explanation of a certain feature.", _
"I am interested in becoming your partner.", _
"I just wanted to say you: ""Hello"".", _
"- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -", _
"I want to suggest a feature.", _
"There are errors in your site." )
If Request.Form("Action") = "Send Email >>" Then
If Len(Request("Name")) > 0 And Len(Request("Email")) > 0 And CInt(Request("Subject")) > 0 And Len(Request("Message")) > 0 Then
%>
| Message Send ... |
| Your message has been send successfully. We will contact you as soon as possible. Thanks for your time and co-operation. |
| |
| Return to DriveSeek.com Home... |
<%
Set objMailer = Server.CreateObject(strEmailComponent)
SendMail objMailer, Request("Name"), Request("Email"), strSenderName, strSenderEmail, _
strSubject(CInt(Request("Subject"))), Request("Message")
Set objMailer = Nothing
Else
%>
| Fill out all the Fields |
| You have left one or more fields blank. You must fill out all the fields and select a subject to send us an email message; OR send an email to info@driveseek.com. |
<%
End If
Else
%>
| Contact DriveSeek.com |
| Send your valuable comments, suggestions and criticism to us. We will be glad to act upon your opinions. You may use the form below to contact us: |
| |
<% End If %>
|
| |
|
|
|
|
|