default_search.asp

来自「OA最新破解2008版 全新 破解 希望大家用着舒服」· ASP 代码 · 共 28 行

<TABLE cellSpacing=0 cellPadding=0 width=536 border=0>
                          <TBODY>
						  <FORM action="default2.asp" method=POST name=f>
                            <TR> 
                              <TD width=88>报价查询：</TD>
                              <TD width=88> 
                                <INPUT name=SearchText size="12" maxLength=100></TD>
                              <TD width=138>
<SELECT name=sortid>
                                  <OPTION 
              value="" selected>*** 所有类别 ***</OPTION>
                                  <%
          set rstype=server.createobject("adodb.recordset")
          typesql="select * from class_1"
          rstype.open typesql,conn,1,1
          do while not rstype.eof
          response.write "<option " & sel & " value='"+CStr(rstype("sortid"))+"'>"+rstype("sort")+"</option>"+chr(13)+chr(10)
          rstype.movenext
          loop
          rstype.close
          %> 
                                </SELECT> </TD>
                              <TD width=100>&nbsp;&nbsp; <!--#include file="../../include/state.asp"--> </TD>
                              <TD width=122> <div align="center"><img src="/netimg/but_search_01.gif" border=0 style="cursor:hand" onclick="document.f.submit();"></div></TD>
                            </TR>
  </form>
                        </TABLE>