%
theAction=request("action")
if theAction = "new" then
Response.Write "Go fuck yourself"
Response.Redirect "xxx"
end if
if session("allow")= false and theAction <> "add" then
Response.Redirect "bc_login.asp?file_name=bc_member_update.asp"
end if
%>
<%
Response.CharSet="windows-1255"
codepage=1255
'if strDBNTUserName = "" then
'doNotLoggedInForm
'end if
theError=request("error")
if theAction <> "add" then%>
<%
end if
%>
|
עדכון פרטים | <% if theError = "1" then Response.Write "" Response.Write "השם, הסיסמא והטלפון הם שדות חובה" Response.Write "" else Response.Write " " end if %> | <% if STRdbntUserName <> "" then strSQL = "SELECT * FROM PORTAL_MEMBERS WHERE M_NAME = '" & STRdbntUserName & "'" set rsUser = my_Conn.Execute(strSQL) level=rsUser("M_LEVEL") if level = "3" then %>ניהול | <% end if rsUser.Close set rsUser = nothing end if %>