ระบบตรวจสอบผลการเรียน

<% DbPath = Server.MapPath("/std/stddata") strConn = "Driver={Microsoft Visual FoxPro Driver}; SourceType=DBF; SourceDB=" & DbPath Set conn = Server.Createobject("ADODB.Connection") conn.ConnectionString = strConn conn.Open set xx = server.createobject("ADODb.RecordSet") set xx= Conn.execute("select scname,telp from school") collegename="ยังไม่มีชื่อ" tel="" 'xx.movefirst if not xx.eof then collegename=xx("scname") tel="Tel. "+xx("telp") ' response.cookies("xx")=collegename end if xx.close 'response.cookies("collegename")=collegename %>

<%=collegename%>
<%=tel%>

กรุณาใส่รหัสนักศึกษาเพื่อดูผลการเรียน