<TABLE cellPadding=1 align= "center " cellSpacing=1 align=center border=1 width= "900 " height= "1 " >
<%
response.write " <tr> "
response.write " <td width=100> 需求单位 </td> "
response.write " <td width=100> 需求提出人 </td> "
response.write " <td width=100> 主旨 </td> "
response.write " <td width=100> 资讯主办 </td> "
response.write " <td width=100> 需求提出日期 </td> "
response.write " <td width=100> 希望上线日期 </td> "
response.write " <td width=100> 预估完成日期 </td> "
response.write " <td width=100> 状态 </td> "
response.write " <td width=100> 说明 </td> </tr> "
Set Rs = server.CreateObject( "Adodb.Recordset ")
'sql= "select APPLY_DEPARTMENT,APPLIER,MAJOR_IDEA,IT_UNDERTAKER,APPLY_TIME,WISH_FINISH_TIME,TOTESTTIME,REQUIRE_ESTI.PHASE from songzw.REQUIRE_BILL inner join REQUIRE_ESTI on songzw.REQUIRE_BILL.IT_NO=REQUIRE_ESTI.IT_NO "
sql= "select APPLY_DEPARTMENT,APPLIER,MAJOR_IDEA,IT_UNDERTAKER,APPLY_TIME,WISH_FINISH_TIME,TOTESTTIME,REQUIRE_ESTI.PHASE from songzw.REQUIRE_BILL inner join REQUIRE_ESTI on songzw.REQUIRE_BILL.IT_NO=REQUIRE_ESTI.IT_NO where 1=1 "
if len(MAJOR_IDEA)> 0 then
sql=sql & " and MAJOR_IDEA like '% "& MAJOR_IDEA & "% ' "
end if
if len(APPLY_TIME_start)> 1 then
sql=sql & " and APPLY_TIME > = ' "& APPLY_TIME_start & " ' "
end if
if len(APPLY_TIME_end)> 1 then
sql=sql& " and APPLY_TIME <= ' "& APPLY_TIME_end & " ' "
end if
if len( WISH_FINISH_TIME_start)> 1 then
sql=sql& " and WISH_FINISH_TIME > = ' "& WISH_FINISH_TIME_start & " ' "
end if
if len(WISH_FINISH_TIME_end)> 1 then
sql=sql& " and APPLY_TIME <= ' "& WISH_FINISH_TIME_end & " ' "
end if
if len(IT_UNDERTAKER)> 1 then
sql=sql& " and IT_UNDERTAKE = ' "& IT_UNDERTAKE & " ' "
end if
if len(PHASE)> 3 then
sql=sql& " and PHASE= ' "& PHASE & " ' "