਍ഀ ਍ഀ View ASP Source code਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ
ASP Source Code਍ഀ

ASP File: ਍ഀ vbscript/ado/employeereg/display.asp

਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ ਍ഀ
      ਍ഀ  ASP Script
      ਍ഀ  Comments or Client-side ਍ഀ Script
        HTML and Text ਍ഀ
਍ഀ
਍ഀ <html>

<head>
<title>List of ਍ഀ Employee</title>
</head>

<body ਍ഀ bgcolor="eadfdf">
<h1 align="center"><font face="Verdana, arial, ਍ഀ helvetica" ਍ഀ color="#003333">Employee
List</font></h1>
<font ਍ഀ face="Verdana, arial, helvetica">

<hr ਍ഀ align="center">
</font><div ਍ഀ align="center"><center>

<table border="1" width="100%" ਍ഀ cellpadding="5" bordercolorlight="#666666" ਍ഀ bordercolordark="#333333">
   ਍ഀ <tr>
     ਍ഀ <th> </th>
     <th><font ਍ഀ face="Verdana, arial, helvetica">Employee ਍ഀ no</font></th>
     <th><font ਍ഀ face="Verdana, arial, helvetica">Employee ਍ഀ name</font></th>
     <th><font ਍ഀ face="Verdana, arial, ਍ഀ helvetica">Job</font></th>
     ਍ഀ <th><font face="Verdana, arial, ਍ഀ helvetica">Manager</font></th>
   ਍ഀ </tr>
<%
      dim ਍ഀ empno
      dim ਍ഀ ename
      dim ਍ഀ job
      dim mgr
      ਍ഀ dim hiredate
      dim ਍ഀ sal
      dim comm
      ਍ഀ dim deptno
      Dim ਍ഀ i

      Set a = ਍ഀ server.CreateObject("ADODB.CONNECTION")
      a.open ਍ഀ Session("EmployeeStrcnn")

      set b = ਍ഀ Server.createObject("ADODB.RECORDSET")
      b.open ਍ഀ "select * from emp",a
      Set c = ਍ഀ b.fields
      i = ਍ഀ 0
      While Not ਍ഀ b.EOF
           empno = ਍ഀ c.Item(0).value
           ਍ഀ ename = ਍ഀ c.item(1).value
           ਍ഀ job = ਍ഀ c.item(2).value
           ਍ഀ mgr = ਍ഀ c.item(3).value
           ਍ഀ i = i + 1
           ਍ഀ b.movenext
%>

   ਍ഀ <tr>
     <th><font face="Verdana, arial, ਍ഀ helvetica"><%=cstr(i)%>  ਍ഀ </font></th>
     <th><font ਍ഀ face="Verdana, arial, helvetica"><%=empno%>  ਍ഀ </font></th>
     <th><font ਍ഀ color="#0000ff" face="Verdana, arial, helvetica"><a href><%=ename%>  ਍ഀ </a></font></th>
     ਍ഀ <th><font face="Verdana, arial, helvetica"><%=job%>  ਍ഀ </font></th>
     <th><font ਍ഀ face="Verdana, arial, helvetica"><%=mgr%>  ਍ഀ </font></th>
   </tr>
<%
     ਍ഀ Wend
%>

</table>
</center></div><font ਍ഀ face="Verdana, arial, helvetica">
<%
a.Close
%>

<p>              
              
              
        ਍ഀ <a href="employee.asp"><font size="3" color="#0000ff">-----Return ਍ഀ Main Web-----</font> ਍ഀ </p>
</a></font>
</body>
</html>
਍ഀ
਍ഀ
਍ഀ

 

਍ഀ