<%@ Language=VBScript %> <%response.buffer= True%> <%' set con=server.CreateObject("ADODB.Connection") 'if request.cookies("username")="" then 'Set rst=server.CreateObject("Adodb.Recordset") 'con.Open "user","gempulse","kgjgbi7890" 'sql="Select * from usertable where username='"&request.form("username")&"'" 'rst.open sql,con,3,1,1 'rs=rst.recordcount 'if rs=0 then 'found=0 'else 'found=1 'end if 'if found=0 then 'response.cookies("username")="" 'else ' if request.cookies("username")="" then ' Response.Cookies("username")=Request.Form("username") ' Response.Cookies("password")=Request.Form("password") ' a=request.cookies("username") ' b=request.cookies("password") ' else ' a=request.cookies("username") ' b=request.cookies("password") ' end if 'end if 'rst.close 'else ' Set rst=server.CreateObject("Adodb.Recordset") ' con.Open "user","gempulse","kgjgbi7890" ' sql="Select * from usertable where username='"&request.cookies("username")&"'" ' rst.open sql,con,3,1,1 ' rs=rst.recordcount ' if rs=0 then ' found=0 ' else ' found=1 ' end if ' if found=0 then ' response.cookies("username")="" ' else ' if request.cookies("username")="" then ' Response.Cookies("username")=Request.Form("username") ' Response.Cookies("password")=Request.Form("password") ' a=request.cookies("username") ' b=request.cookies("password") ' else ' a=request.cookies("username") ' b=request.cookies("password") ' end if 'end if 'rst.close 'end if 'con.close %> indian Diamond Suppliers- Directory. List your diamond website A:hover {color: #C9984E; font-family: Verdana} <%' if request.cookies("username")="" then%> <%'response.redirect "../logingempulse.asp?gs=err"%> <%'else%> <% 'set con=server.CreateObject("ADODB.Connection") 'Set rst=server.CreateObject("Adodb.Recordset") 'con.Open "user","gempulse","kgjgbi7890" 'sql="Select * from usertable" 'rst.Open sql,con,3,1,1 'rst.MoveFirst 'isPresent=false 'if not rst.EOF then ' do while not rst.EOF ' if lcase(a)=lcase(rst("username")) and lcase(b)=lcase(rst("password")) then ' isPresent=true ' end if ' rst.MoveNext ' loop 'end if 'if isPresent=true then %>
     
      

Welcome  <%'=a%>

  

 Indian Diamond Suppliers

 List your website On the Diamond Directory. Quality Indian Diamond Suppliers Can request a link on this section. Reciprocal links is    must. Please insert the following code (<a href="http://www.gempulse.com/">Diamond Directory and
diamond news</a></font>) on a relevant page of your website and email us on Diamond Directory listings.
Please Provide us with the page which you have placed the link and your link would be active within 3 days of receipt of Your email.

 


 

       A) Diamond jewellery
 


 

Go to Jewellery and Gemstone Directory Index page
 
 
 
     
    ©Gempulse Infotech Pvt. Ltd.
<%'else%> <%'response.cookies("username")=""%> <%'response.cookies("password")=""%> <%'response.redirect "../logingempulse.asp?login=errgs"%> <%'end if%> <%'con.close 'end if%>