<%
' version 6.2549-03-25
' แก้ปัญหา error ในบรรทัดที่ 24 ของ menu.asp
' ถ้าเพิ่มฐานข้อมูลให้แก้โปรแกรม header.asp
' โปรแกรมที่สำคัญในระบบนี้คือ menu.asp
%><html><head><title>e-Learning Open Source (Free Database & ASP Source Code For Education)</title>
<meta http-equiv=content-type content="text/html; charset=windows-874">
<meta name=keywords content="electronic,learning,free,education">
<meta name=description content="e-Learning Open Source (Free Database & ASP Source Code For Education)">
<style type="text/css">
body {font-size:10pt;font-family:ms sans serif;}
a:link{color:red;text-decoration:none;font-family:ms sans serif;}
a:visited{color:purple;text-decoration:none;font-family:ms sans serif;}
a:hover{color:blue;text-decoration:underline;font-family:ms sans serif;}
td{font-size:10pt;font-family:ms sans serif;}
</style>
</head>
<body bgcolor=black leftmargin=0 topmargin=0>
<div style="position:absolute; left:0px; top:0px;z-index:0;"><SCRIPT LANGUAGE=javascript1.1 src=http://truehits1.gits.net.th/data/i0014570.js></SCRIPT></div>
<table width=100% bgcolor=black border=0 cellpadding=1 cellspacing=1>
<td width=200><font color=white size=4 face=arial>
<marquee width=200 behavior=alternate scrolldelay=900>
<a href=http://course.yonok.ac.th style="color:white;TEXT-DECORATION:none;"><%= request.servervariables("HTTP_HOST") %></a>
</marquee>
</font></td>
<td>
<table width=100% border=0 cellpadding=1 cellspacing=1 bgcolor=white>
<tr>
<td align=center bgcolor=#400000><a href=default.asp style="color:white;TEXT-DECORATION:none;">Home</a></td>
<td align=center bgcolor=black><a href=http://www.utexas.edu/world/lecture/index.html style="color:white;TEXT-DECORATION:none;">worldlecture</a></td>
<td align=center bgcolor=black><a href=http://www.thai2learn.com style="color:white;TEXT-DECORATION:none;">thai2learn</a></td>
<td align=center bgcolor=black><a href=http://www.nectec.or.th/courseware style="color:white;TEXT-DECORATION:none;">courseware</a></td>
<td align=center bgcolor=black><a href=http://www.learn.in.th style="color:white;TEXT-DECORATION:none;">learn.in.th</a></td>
<td align=center bgcolor=black><a href=http://www.vcharkarn.com style="color:white;TEXT-DECORATION:none;">Vcharkarn</a></td>
<td align=center bgcolor=#800000><a href=faq.asp style="color:white;TEXT-DECORATION:none;">Source code</a></td>
</tr>
<td align=center bgcolor=#000040><a href=faq.asp style="color:white;TEXT-DECORATION:none;">FAQ</a></td>
<td align=center bgcolor=black><a href=http://www.school.net.th style="color:white;TEXT-DECORATION:none;">school.net.th</a></td>
<td align=center bgcolor=black><a href=http://www.itgeniusclub.com style="color:white;TEXT-DECORATION:none;">itgeniusclub</a></td>
<td align=center bgcolor=black><a href=http://www.sansarn.com style="color:white;TEXT-DECORATION:none;">สรรสาร.หาข่าว</a></td>
<td align=center bgcolor=black><a href=http://www.onlinetraining.in.th style="color:white;TEXT-DECORATION:none;">onlinetraining</a></td>
<td align=center bgcolor=black><a href=http://www.uni.net.th style="color:white;TEXT-DECORATION:none;">uni.net.th</a></td>
<td align=center bgcolor=#404040><a href=http://www.thaiall.com style="color:white;TEXT-DECORATION:none;">thaiall.com</a></td>
</tr>
</table>
</td>
</table>
<table width=100% bgcolor=black border=0 cellpadding=1 cellspacing=1>
<form name=main action=menu.asp method=post>
<tr><td bgcolor=black width=200 valign=top><font color=white>
<table bgcolor=#dddddd width=100%>
<tr><td align=right>รหัสผู้ใช้ :: </td><td>
<%
if len(session("mu")) > 0 then
response.write("<font color=blue size=4>" & session("mu") & "</font> <input name=fu value=" & session("mu") & " type=hidden>")
else
response.write("<input name=fu value=guest size=12>")
end if
response.write("</td></tr>")
if len(session("mu")) > 0 then
response.write("<tr><td align=right>รหัสเลือก :: </td><td><input name=fselectmu value=9999999 size=12></td></tr>")
else
response.write("<tr><td align=right>รหัสผ่าน :: </td><td><input type=password name=fp value=guest size=12></td></tr>")
end if
%>
</table><br>
<%
if len(session("mu")) > 0 then
if len(session("fsubj")) < 3 then
session("fsubj") = "qzosthaiall"
end if
if len(session("fact")) < 3 then
session("fsubj") = "signout"
end if
%>
<b>เลือกชุดข้อสอบ</b><br>
<input type=radio name=fsubj value=qzinsure <% if session("fsubj")="qzinsure" then response.write(" checked") end if %>>ชุด ตัวแทนประกัน<br>
<input type=radio name=fsubj value=qzacct4411 <% if session("fsubj")="qzacct4411" then response.write(" checked") end if %>>ชุด บัญชี : รุ่น 4411<br>
<input type=radio name=fsubj value=qzosthaiall <% if session("fsubj")="qzosthaiall" then response.write(" checked") end if %>>ชุด computer : thaiall.com<br>
<input type=radio name=fsubj value=qzynbcom12 <% if session("fsubj")="qzynbcom12" then response.write(" checked") end if %>>ชุด computer : ynbcom12<br>
<input type=radio name=fsubj value=qzgeneral <% if session("fsubj")="qzgeneral" then response.write(" checked") end if %>>ชุด General<br>
<center><select name=fact size=10>
<option value=signout <% if session("fact")="signout" then response.write("selected") end if %>>ยกเลิกการใช้งาน (SignOut)
<option value=do05 <% if session("fact")="do05" then response.write("selected") end if %>>เลือกทำจากชุดข้อสอบ 5 ข้อ
<option value=do30 <% if session("fact")="do30" then response.write("selected") end if %>>เลือกทำจากชุดข้อสอบ 30 ข้อ
<option value=aracct4411 <% if session("fact")="aracct4411" then response.write("selected") end if %>>รายชื่อบทความ บัญชี4411
<option value=arynbcom12 <% if session("fact")="arynbcom12" then response.write("selected") end if %>>รายชื่อบทความ ynbcom12
<option value=argeneral <% if session("fact")="argeneral" then response.write("selected") end if %>>รายชื่อบทความ ทั่วไป
<% if session("mu") <> "guest" then %>
<option value=addques <% if session("fact")="addques" then response.write("selected") end if %>>เพิ่มข้อสอบ
<option value=delques <% if session("fact")="delques" then response.write("selected") end if %>>ลบข้อสอบที่มีปัญหา
<option value=addaracct4411 <% if session("fact")="addaracct4411" then response.write("selected") end if %>>เพิ่มบทความ บัญชี4411
<option value=delaracct4411 <% if session("fact")="delaracct4411" then response.write("selected") end if %>>ลบบทความที่มีปัญหา บัญชี4411
<option value=addarynbcom12 <% if session("fact")="addarynbcom12" then response.write("selected") end if %>>เพิ่มบทความ ynbcom12
<option value=delarynbcom12 <% if session("fact")="delarynbcom12" then response.write("selected") end if %>>ลบบทความที่มีปัญหา ynbcom12
<option value=addargeneral <% if session("fact")="addargeneral" then response.write("selected") end if %>>เพิ่มบทความทั่วไป
<option value=delargeneral <% if session("fact")="delargeneral" then response.write("selected") end if %>>ลบบทความที่มีปัญหาทั่วไป
<option value=editmem <% if session("fact")="editmem" then response.write("selected") end if %>>แก้ไขข้อมูลสมาชิก
<%
end if
%>
</select>
<%
else
%><center>
<select name=fact size=2>
<option value=signin selected>ขอเข้าใช้บริการ (SignIn)
<option value=applymember>สมัครสมาชิกใหม่(SignUp)
</select>
<%
end if
%>
<br><input type=submit value=ดำเนินการ>
<br>Now: <%= now %>
<%
if len(session("intime")) > 2 then
response.write("<br>Sign in :"& session("intime"))
end if
%>
</center>
</td></form><td bgcolor=#ddffdd valign=top>
<%= session("result") %>
