<%@ Language=VBScript %> <%Response.Buffer=true%>
<% if Request.QueryString("value")="1" then cid=Request.QueryString("cid") session("CustomerId")=cid end if %> <% set con=Server.CreateObject("ADODB.Connection") set rs=Server.CreateObject("ADODB.Recordset") strDSNPath = "PROVIDER=MSDASQL;" strDSNPath = strDSNPath & "DRIVER={Microsoft Access Driver (*.mdb)};" strDSNPath = strDSNPath & "DBQ=" & Server.MapPath("online.mdb") & ";" con.open strDSNPath str="select * from Customer_Mst where customerid="&session("CustomerId") rs.Open str,con,2,2 %>
Enter your Password
Name       : <%=rs("customername")%>
Password :
Home