<%@ Language=VBScript %> <% dim strEmail dim strPass dim objCon dim objRS dim strSQL if Request.ServerVariables("content_length") <> 0 then set objCon=server.CreateObject("ADODB.Connection") objCon.Open application("ConnectionString") set objRs=Server.CreateObject("ADODB.Recordset") strPass=trim(Request.Form("txtPassword")) strEmail=trim(Request.Form("txtEmail")) Session("Email")=strEmail strSQL="SELECT * FROM tblRegistration where Email='" & strEmail & "' and Password='" & strPass &"'" objRS.Open strSQL,objCon if objRS.EOF=true then 'esponse.Write "Wrong User ID and Password Try Again..............." & "
" Response.Redirect "../index_files/error.htm" %> <% else Response.Redirect "BooksDetail.asp" end if objRS.Close objCon.Close set objRS=Nothing set objCon=Nothing else %> Login Form
  Search
Advanced Search
Harvester's Network
Water Pilgrimage
Raincentre
Water Library
Campaigns
Newsletter
Catch Water
Books on water
Do you have a roof?
 
 
     
 
   
  E-mail ID: >
  Password:
 
Copyright © Centre for Science & Environment. All rights reserved.
Site best viewed in 800x600 resolution.
Center for Science & Environment CSE Store Equity Watch Gobar Times Down to Earth
Now buy viagra online from different online pharmacies and sort out all sexual performance related issues. You can get comprehensive and up to date source of drug information online. Not only Viagra, but you can buy cialis online also at some discounted price. From the site casino online also you can buy these.
<%End If%>