📄 cscx.asp
字号:
<!--#include file="../../include/Pubconn.asp"-->
<!--#include file="../../include/Pubfun.asp"-->
<%username=getuser()
departid=session("departid")
userclass=tablevisitor("f_aimdepart",username)%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>经销商名称</title><link href="../../cread.css" rel="stylesheet" type="text/css">
<%
bz=request("bz")
dyear=request("dyear")
'response.write bz
if request("currentpage")<>"" then
currentpage=cint(request.querystring("currentpage"))
else
currentpage=1
end if
%>
</head>
<script language="vbscript">
sub win()
dyear=document.myform.dyear.value
window.location="cscx.asp?currentpage="+document.myform.page1.value+"&dyear="+dyear+"&bz="+document.myform.bz.value
end sub
sub win1()
dyear=document.myform.dyear.value
window.location="cscx.asp?currentpage="+document.myform.page1.value+"&dyear="+dyear
end sub
sub cxch()
bz="1"
dyear=document.myform.dyear.value
window.location="cscx.asp?dyear="+dyear+"&bz="+bz
end sub
sub qx()
msgbox "您无此权限！"
exit sub
end sub
</script>
<body bgcolor="#FFFFFF">
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="100%"><b><font size="3"><img border="0" src="../../pic/it_22.gif">
</font><font size="2">公司目标</font></b><font size="2"><b>管理</b></font><hr width="40%" size="1" align="left">
</td>
</tr>
</table>
<form method="post" action="xzqx.asp" name=myform>
<table border="1" cellspacing="0" width="100%">
<tr>
<td width="9%" align="right" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA"><font size="2">公司名</font></td>
<td width="15%" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<%gssql="select * from a_departinfo where departcode='01'"
set gsrs=pubconn.execute(gssql)%>
<input type="text" name="ddbh" size="18" value=<%=gsrs("name")%> readonly style="background-color: #edefef">
</td>
<td width="6%" align="right" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA"><font size="2">时间</font></td>
<td width="31%" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<select name=dyear >
<!-- <%if dyear<>"" then %>
<option value=<% =dyear%> selected> <% =dyear %> </option>
<%end if %>
<%j=1990
for i=1 to 21 %>
<option value=<% =j%>> <% =j %> </option>
<%j=j+1
next%> -->
<option value="">全部</option>
<% for i=1990 to 2010 %>
<option value="<%=i%>"
<% if dyear<>"" then
if cint(dyear)=i then
response.write ("selected")
end if
end if
%>
><%=i%></option>
<%next%>
</select>年
</td>
<td width="9%" bgcolor="#F1E8DA" bordercolor="#F1E8DA" bordercolorlight="#F1E8DA">
<input type="button" value="查询" onclick="cxch()" style="background-color: #D1D1D1; border-style: solid; border-width: 1" class="hand">
</td>
</tr>
</table>
<input type=hidden name=bz value="<%=bz%>">
<p align="center">
<br>
<%
set rs=server.createobject("adodb.recordset")
rs.CursorLocation=3
rs.CursorType = adOpenStatic
'if bz="1" then
qsql="select distinct departcode,name,year,authors,departid from viewaim1 where departcode='01'"
if dyear<>"" then
qsql=qsql&"and year='"&dyear&"'"
end if
%>
<%'else%>
<%'qsql="select distinct departcode,name,year from viewaim1 where departcode='01'"
%>
<%'end if
'response.write qsql
rs.open qsql,pubconn,1,3
if rs.recordcount>=1 then
rs.pagesize=5
if currentpage>=rs.pagecount then
currentpage=rs.pagecount
else
if currentpage<1 then
currentpage=1
end if
end if
rs.absolutepage=currentpage
pagenum=rs.pagecount
if pagenum<1 then
pagenum=1
end if
%>
<table border="1" cellspacing="0" width="100%" height="38">
<tr>
<td width="4%" height="1" align="center" bgcolor="#DDD2C4"><font size="2">操作</font></td>
<td width="9%" height="1" align="center" bgcolor="#DDD2C4"><font size="2">公司</font></td>
<td width="9%" height="1" align="center" bgcolor="#DDD2C4"><font size="2">年度</font></td>
</tr>
<%
for i=1 to rs.pagesize
%>
<%
if i mod 2=1 then%>
<tr bgcolor="#f7f7f7" >
<%else%>
<tr bgcolor="#EDEBEC" >
<%end if%>
<td width="4%" height="1" align="center">
<%if (userclass=2 and username=rs("authors") and departid=rs("departid")) or (userclass=3 and departid=rs("departid")) then%>
<input type="checkbox" name="sc<%=i%>" value="on">
<%else%>
<input type="checkbox" name="sc" value="1" onmousedown="qx()">
<%end if%> </td>
<input type=hidden name="xsbm<%=i%>" value=<%=rs("departcode")%>>
<input type=hidden name="syear<%=i%>" value=<%=rs("year")%>>
<td width="9%" height="1" align="center"><a href="xx.asp?dyear=<%=rs("year")%>" ><%=rs("name")%></a></td>
<td width="8%" height="1" align="center"><%=rs("year")%></td>
</tr>
<%
rs.MoveNext
if rs.eof then exit for
next %>
</table>
<p align="left">
<font size="2">
<input type="submit" value="删除" style="background-color: #D1D1D1; border-style: solid; border-width: 1" class="hand"> <br>
共<%=rs.pagecount%>页
<a href="cscx.asp?currentPage=1&bz=<%=bz%>&dyear=<%=dyear%>">首 页</a>
<%if pagenum<>0 then
if currentPage<pagenum then%> <a href="cscx.asp?currentPage=<%=currentpage+1%>&bz=<%=bz%>&dyear=<%=dyear%>">下一页</a>
<% else%>
下一页 <%
end if
if currentPage>1 then
%> <a href="cscx.asp?currentPage=<%=currentpage-1%>&bz=<%=bz%>&dyear=<%=dyear%>">上一页</a>
<% else%>
上一页 <%
end if
end if %>
<a href="cscx.asp?currentPage=<%=rs.pagecount%>&bz=<%=bz%>&dyear=<%=dyear%>">尾 页</a>
<select name="page1" >
<%
for j=1 to rs.pagecount%>
<option value=<%=j%>><%=j%>
<%next%>
</select>
<%if bz="" then%>
<input type="button" value="Go" name="page" onclick="win1()" style="background-color: #D1D1D1; border-style: solid; border-width: 1" class="hand">
<%else%>
<input type="button" value="Go" name="page" onclick="win()" style="background-color: #D1D1D1; border-style: solid; border-width: 1" class="hand">
<%end if%>
<%else%></font>
<p align="left">
<font size="2">经查询，没有记录显示!<br>
<%end if
%></font> <hr size="1">
<%if userclass>1 then%>
<input type=button value=新增 onclick=javascript:location.href='frame.asp' style="background-color: #D1D1D1; border-style: solid; border-width: 1" class="hand">
<%else%>
<input type=button value=新增 onclick=javascript:location.href='frame.asp?qx=1' style="background-color: #D1D1D1; border-style: solid; border-width: 1" class="hand">
<%end if%>
<a href="../index.htm" ><font size="2">返回</font></a>
</form> <p align="right"><font size="2"><a href="../ywy/cscx.asp">
业务员目标</a> <a href="../cscx.asp">部门目标</a>
</font>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -