这段内容涉及使用ADODB.Recordset对象进行SQL查询，检索特定用户名的工作任务信息，并展示任务的详细属性，如时间、发表人、任务类别、考核分值等。如果查询结果为空，则显示‘本月没有工作任务’。此外，代码还包含了处理用户选择加入任务的功能，能够获取选定任务的详细情况，包括任务标题、完成情况、考核分值和上级评分。
set rs=server.createobject("adodb.recordset")
sql="select * from workrep where username=" &
sqlstr(name)
rs.open sql,conn,1
if not rs.eof and not rs.bof then
%>
width="99%" border="1" align="left" cellpadding="1" cellspacing="1"
bordercolor="#000000">
width="30%" bgcolor="#999999">
align="center">工作任务
width="14%" bgcolor="#999999">
style="font-family:
"宋体"">时间
width="11%" bgcolor="#999999">
style="font-family:
"宋体"">发表人
width="10%" bgcolor="#999999">任务类别
width="11%" bgcolor="#999999">考核分值
width="10%" bgcolor="#999999">上级评分
width="10%" bgcolor="#FFFFFF">
value="加入">
while not rs.eof and not rs.bof
%>
href="javascript:openwin('displayworkrec.asp?username=&recdate=');">
width="10%" bgcolor="#FFFFFF">
name="checkbox" value="">
rs.movenext
wend
%>
set rs=server.createobject("adodb.recordset")
sql="select * from workrep "
rs.open sql,conn,1
if not rs.eof and not rs.bof then
%>
cellspacing="1" bordercolor="#000000">
width="100%">本月没有工作任务
end if
%>
end if
%>
if request("Submit2")="加入" and
request("checkbox")<>"" then
idno=request("checkbox")
idno=split(idno,",")
%>
rows="5">
for i=0 to ubound(idno)
set rs=server.createobject("adodb.recordset")
sql = "select * from workrep where id=" & clng(idno(i))
rs.open sql,conn,1
title=rs("title")&chr(32)&chr(32)+"完成情况："+rs("remark")&chr(32)&chr(32)+"考核分值："+rs("fenzhi")
&chr(32)
&chr(32)+"上级评分："+rs("fenzhi")&chr(10)
%>工作任务:
end if%>
扫一扫
7992
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
