Home
Home Contact Us Sitemap
Home
Company
Services
Products
Contact
Home
Company
Services
Products
Contact
Be Our Partner
Increase your revenue by joining hands with some of the top IT personnel in the world today.
Guaranteed higher intelligence with years of experience.
Cut costs by completing your projects overseas.
Get insight on our inner processes.
Be Our Partner
 


Home » Be Our Partner
 
   
 (Enter Code)
  <% If(Request.QueryString("DPS") = "NA")Then %> You should enter the correct verification code to submit form. <% End If %>
 
 
Fields marked in * are compulsory.

Top
  © 2005 DPS Technologies India Pvt Ltd

<% Set rs = Server.CreateObject("ADODB.Recordset") Response.Write Request.Form("txtUserID") if trim(Request.Form("txtUserID"))="" then else strSQL = "SELECT * FROM partner where userid='" & trim(Request.Form("txtUserID")) & "'" rs.Open strSQL, adoCon,3,3 if not (rs.EOF and rs.BOF) then %> <% else strHostIP = Request.ServerVariables("REMOTE_HOST") rs.AddNew rs.Fields("Name") = trim(Request.Form("txtName")) rs.Fields("Desig") =trim(Request.Form("txtdesg")) rs.Fields("Company")=trim(Request.Form("txtCompany")) rs.Fields("addr")=trim(Request.Form("txtaddr")) rs.Fields("Country")=trim(Request.Form("txtCountry")) rs.Fields("zip")=trim(Request.Form("txtzip")) rs.Fields("Tel")=trim(Request.Form("txtTel")) rs.Fields("Mobile")=trim(Request.Form("txtMobile")) rs.Fields("email")=trim(Request.Form("txtEmail")) rs.Fields("userid")=trim(Request.Form("txtUserID")) a=trim(Request.Form("txtPwd")) rs.Fields("pwd")=Encrypt(a,"100") rs.Fields("HostIP")=strHostIP if Request.Form("chkcd")<>"" then rs.Fields("cd")=1 end if if Request.Form("chkbrochure")<>"" then rs.Fields("brochure")=1 end if rs.Update set rs=nothing set adocon=nothing Response.Redirect ("res.asp") end if end if %>