<% if request("insert") ="mail" then
'Create an instance of our Mailer object.
Set mailObj = Server.CreateObject("Dundas.Mailer")
'Configure our test email.
mailObj.SMTPRelayServers.Add "66.232.97.60"
mailObj.FromAddress = request("email")
mailObj.FromName = request("email")
mailObj.Subject = "This is a test email"
mybody = "Name : " & request("name") & " "
mybody = mybody & "EMail ID : " & request("email") & " "
mybody = mybody & "Organization Name : " & request("com_name") & " "
mybody = mybody & "Type of Business: " & request("business") & " "
mybody = mybody & "Contact No : " & request("tel") & " "
mybody = mybody & "Contact No : " & request("country") & " "
mybody = mybody & "Project Document: " & request("document") & " "
mybody = mybody & "Web site : " & request("website") & " "
mybody = mybody & "Requirements : " & request("requirements") & " "
mybody = mybody & "At what stage are you in the outsourcing process?: " & request("outsourcing") & " "
mybody = mybody & "How soon would you like to start?: " & request("time") & " "
mailObj.Body = mybody
'Add a recipient address.
mailObj.TOs.Add "ashish@kiteindia.com"
'We need to catch the error.
On Error Resume Next
mailObj.SendMail
If (Err <> 0) Then
Response.Write "There was an error sending the email: " & Err.Description
End If
%>
<% end if %>
Are you interested in sourcing projects for us?
Do you know of people or companies who are interested in outsourcing software development work? Are you interested in facilitating communication between companies that could work well together? Do you feel that you have the ability to capture project requirements and articulate them to someone who can implement them for you? Contact us for more details here.
