📄 tuichu.asp
字号:
<!--#include file="include/opendb.asp"-->
<%
dim weizhi
wizhi="离开"
%>
<%oabusyname=request.cookies("oabusyname")
oabusysuid=request.cookies("oabusysuid")
oabusyuserdept=request.cookies("oabusyuserdept")
oabusyuserlevel=request.cookies("oabusyuserlevel")
'if request.form("weizhi")<>"" then
'set conn=server.CreateObject("ADODB.connection")
'conn.ConnectionString="driver={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("../database/myoffice.mdb") & ";uid=;PWD=;"
'conn.Open
'set conn=opendb()
'set rs=server.createobject("adodb.recordset")
'rs.Open "select * from a_userinf" ,conn,1,3
'while not rs.eof
'if rs("suid")=oabusysuid then
'rs("now-weizhi")=weizhi
'rs.update
'end if
'rs.movenext
'wend
'rs.close
'set rs=nothing
response.cookies("oabusyname")=""
response.cookies("oabusysuid")=""
response.cookies("oabusyuserdept")=""
response.cookies("oabusyuserlevel")=""
response.cookies("cook_allow_see_all_workrep")=""
response.cookies("cook_allow_see_dept_workrep")=""
response.cookies("cook_allow_control_dept_user")=""
response.cookies("cook_allow_control_all_user")=""
response.cookies("cook_allow_send_note")=""
response.cookies("cook_allow_control_note")=""
response.cookies("cook_allow_control_file")=""
response.cookies("cook_allow_control_level")=""
response.redirect "default.asp"
'else
'response.write "请选择您的位置"
'end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -