show_view_tech_bonus.asp

来自「这是一个自己研发的薪酬管理系统」· ASP 代码 · 共 82 行

            <TR CLASS='TABLEDATA' ALIGN=CENTER>
            
                <TD>
                    <% Response.write (mInt_Page-1)*mInt_CountPerPage+Int_Count %>
                </TD>
                <TD>
                    <%
                    Response.write Str_employee_name
                    %>
                </TD>
                <TD>
                    <%
                    Response.write Str_project_name
                    %>
                </TD>
                <TD>
                    <%
                    if isdate(Str_project_begin) then
                        Response.write (Val(FormatDate(Str_project_begin,"yyyy"))-gInt_BeginYear) & FormatDate(Str_project_begin,"年mm月dd日")
					else
						response.write("未知")
                    end if
                    %>
                </TD>
                <TD>
                    <%
                    if isdate(Str_project_end) then
                        Response.write (Val(FormatDate(Str_project_end,"yyyy"))-gInt_BeginYear) & FormatDate(Str_project_end,"年mm月dd日")
					else
						response.write("未知")
                    end if
                    %>
                </TD>
                <TD>
                    <%
                    if isdate(Str_project_finish) then
                        Response.write (Val(FormatDate(Str_project_finish,"yyyy"))-gInt_BeginYear) & FormatDate(Str_project_finish,"年mm月dd日")
					else
						response.write("尚未完工")
                    end if
                    %>
                </TD>
                <TD>
                    <%
					if len(Str_tbonus_fprize)<>0 then
						Response.write Str_tbonus_fprize
					else
						response.write("无")
					end if
                    %>
                </TD>
                <TD>
                    <%
                    if isdate(Str_tbonus_fdate) then
                        Response.write (Val(FormatDate(Str_tbonus_fdate,"yyyy"))-gInt_BeginYear) & FormatDate(Str_tbonus_fdate,"年mm月dd日")
					else
						response.write("未定")
                    end if
                    %>
                </TD>
                <TD>
                    <%
					if len(Str_tbonus_lprize)<>0 then
						Response.write Str_tbonus_lprize
					else
						response.write("无")
					end if
                    %>
                </TD>
                <TD>
                    <%
                    if isdate(Str_tbonus_ldate) then
                        Response.write (Val(FormatDate(Str_tbonus_ldate,"yyyy"))-gInt_BeginYear) & FormatDate(Str_tbonus_ldate,"年mm月dd日")
					else
						response.write("----")
                    end if
                    %>
                </TD>
                </TD>
            </TR>