<%
if session("userid")="" then
response.Redirect("login.asp")
end if
submit=Request("submit2")
if submit<>"" then
%>
<%
email=Request("email")
sql="Update admin set email='" & email & "'"
cn.Execute(sql)
set rs=nothing
cn.Close
set cn=nothing
Response.Redirect "admin.asp?msg=4"
end if
%>
Admin Area
