ഀ ഀ
View ASP Source code
ഀ
ഀ
ഀ ഀ
ഀ
ഀ
ഀ
ASP Source Code
ഀ
ASP File: ഀ vbscript/ado/studentreg/display.asp
ഀ
ഀ
ഀ
ഀ
ഀ
ഀ
ഀ
ASP Script
ഀ
ഀ
ഀ
ഀ
Comments or Client-side ഀ Script
ഀ
ഀ
ഀ
HTML and Text
ഀ
ഀ
ഀ
<html>
<head>
<title>List of ഀ Students</title>
</head>
<body ഀ bgcolor="eadfdf">
<h1 align="center"><font face="Verdana, arial, ഀ helvetica" ഀ color="#003333">Student
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">Student ഀ Name</font></th>
<th><font ഀ face="Verdana, arial, ഀ helvetica">E-mail</font></th>
ഀ <th><font face="Verdana, arial, ഀ helvetica">Company</font></th>
ഀ <th><font face="Verdana, arial, helvetica">Course ഀ Expectations</font></th>
</tr>
<%
Dim lastname
Dim firstname
Dim email
Dim ഀ company
Dim courseexpectations
Dim courselocation
Dim ഀ CourseStartDate
Dim i
Set a = ഀ server.CreateObject("ADODB.CONNECTION")
a.open ഀ "DSN=studentdatabase;UID=;PWD=;"
Set b = a.execute("select * ഀ from Students ")
Set c = b.fields
i = ഀ 0
While Not b.EOF
ഀ lastname = c.Item(1).Value
firstname = ഀ c.Item(2).Value
email = ഀ c.Item(3).Value
company = ഀ c.Item(5).Value
courseexpectations ഀ = c.Item(8).Value
i = i + ഀ 1
ഀ b.movenext
%>
ഀ <tr>
<th><font face="Verdana, arial, ഀ helvetica">
<%=cstr(i)%>
ഀ </font></th>
<th><font ഀ face="Verdana, arial, helvetica">
<%=lastname+" ഀ "+firstname%>
ഀ </font></th>
<th><font ഀ color="#0000ff" face="Verdana, arial, helvetica"><a href>
<%=email%>
ഀ </a></font></th>
ഀ <th><font face="Verdana, arial, helvetica">
<%=company%>
ഀ </font></th>
<th><font ഀ face="Verdana, arial, helvetica">
<%=courseexpectations%>
ഀ </font></th>
</tr>
<%
ഀ Wend
%>
</table>
<%
a.Close
%>
</center></div><font ഀ face="Verdana, arial, ഀ helvetica">
<p>
ഀ <a href="studentindex.html"><font size="3" ഀ color="#0000ff">-----Return Main Web-----</font> ഀ </p>
</a></font>
</body>
</html>
ഀ
ഀ
ഀ
ഀ