<% dim dil dim student1,student2,student3,student4 dim con, rs set con=server.CreateObject("Adodb.Connection") set rs=server.CreateObject("Adodb.Recordset") set rs1=server.CreateObject("Adodb.Recordset") strDSNPath = "PROVIDER=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)};pwd=password; DBQ=" & Server.MapPath("../../../../db/users.mdb") con.open "provider=microsoft.jet.oledb.4.0;Jet OLEDB:Database Password=password;data source=" & server.MapPath("../../../../DB/users.mdb") sql="select * from student order by sn desc" set rs=con.execute(sql) set rs1=con.execute("select count(*) from student") %>
Welcome to the world of
Palm InfoTech Pvt.Ltd.
OUR SERVICES
Domain Registration
Website Development
WebSite Hosting
Software Devlopment
Enterpreneuership
Education
Outsourcing Jobs
PC Maintances
Desktop Publishing
Cyber/ Communication
 
 
 
 
 
 
 
 
 
 
 
Current Students
<% do while not rs.eof student1="" student2="" student3="" student4="" student1=rs(1) DIL="../../../" %> <% if not rs.eof then rs.movenext loop %>
<%' if not rs.eof then rs.movenext if not rs.eof then %>
" width="106" height="90" alt="<%= dil & rs.fields("paths") %>">
<% student1=rs(1) end if %>
<% if not rs.eof then rs.movenext if not rs.eof then %>
<%= rs.fields(1) %>
<% student2=rs(1) end if %> 		<% if not rs.eof then rs.movenext if not rs.eof then %>
<%= rs.fields(1) %>
<% student3=rs(1) end if %> 		<% if not rs.eof then rs.movenext if not rs.eof then %>
<%= rs.fields(1) %>  
<% student4=rs(1) end if %>

<%= student1 %>

<%=student2 %>

<%=student3 %>

<%=student4 %>
Total No of Student :- <% response.Write rs1(0) %>    <% rs.close con.close %>
 
 
 
 
 
   
 
Copyright © 2006 Palm InfoTech Pvt. Ltd. - All Rights Reserved.