管理頁
<%
Session("LoginOK") = false
Flag = request.form("Flag")
Select Case Flag
Case 0
Flag = Flag + 1
%>
<%
Case 1
UserID = request.form("userid")
Password = request.form("password")
' **** be sure to change "admin" and "password"
' **** to your choice of userid and password
If UserID <> "admin" OR Password <> "kam125" then
response.write ""
response.write "登入名稱或密碼不符!!"
Else
Session("LoginOK") = true
response.write "留言板管理頁"
response.write "
"
response.write "
"
response.write "討論區管理頁"
End If
End select
%>