g_statesh.asp

一个很好的在线购物系统

      </font>   
     </td>                                                                                            
                                                                                               
     <td width="40" height="24" align="center" bgcolor="#DDD2C4">       
      <font size="2">签约   
      </font>   
     </td>                                                                                            
                                                                                               
     <td width="60" height="24" align="center" bgcolor="#DDD2C4">       
      <font size="2">业务员   
      </font>   
     </td>                                                                                            
                                                                                               
     <td width="60" height="24" align="center" bgcolor="#DDD2C4">       
      <font size="2">详细 
      </font> 
     </td>                                                                                           
                                                                                              
  </tr>                                                                                          
                                                                                          
     <% for n=1  to Stsh.pagesize%>              
      <%'找出对应的业务员的名字  
        set rs1=Server.CreateObject("ADODB.RecordSet") 
        sql="select *  from A_StuffInfo where StuffNum='"&Stsh("StuffNum")&"'" 
        rs1.open sql,Pubconn,1 
      
     %>      
    <%if  n mod 2=1 then                   
            bg="#f7f7f7"                     
       else                   
            bg="#EDEBEC"                    
       end if%>                                                                                   
                                                                                            
  <tr bgcolor="<%=bg%>">                                                        
                                                                                       
                                                                                 
    <td width="194" height="23" align="center"><a href="G_clientInfo.asp?ClientID=<%=Stsh("ClientNum")%>"><%=khname(Stsh("ClientNum"))%></a></td>                                                                             
      <td width="39" height="23" align="center"><font size="2"><%=Stsh("CloseState")%>&nbsp;      
       </font>      
    </td>                                                                                        
      <td width="37" height="23" align="center"><font size="2"><%=Stsh("InquiryState")%>&nbsp;      
       </font>      
    </td>                                                                                        
      <td width="48" height="23" align="center"><font size="2"><%=Stsh("Problem")%>&nbsp;      
       </font>      
    </td>                                                                                        
      <td width="38" height="23" align="center"><font size="2"><%=Stsh("ProjectState")%>&nbsp;</font></td>                                                                                        
      <td width="57" height="23" align="center"><font size="2"><%=Stsh("PriceTerm")%>&nbsp;</font></td>                                                                                         
      <td width="50" height="23" align="center"><font size="2"><%=Stsh("MainPerson")%>&nbsp;<font size="2"></td>                                                                                         
      <td width="39" height="23" align="center"><font size="2"><%=Stsh("UsherState")%>&nbsp;</font></td>                                                                                         
                                                
      <td width="56" height="23" align="center"><font size="2"><%=Stsh("VoteState")%>&nbsp;<font size="2"></td>       
                                                                          
      <td width="40" height="23" align="center"><font size="2"><%=Stsh("VisaState")%>&nbsp;<font size="2"></td>       
                                                                               
      <td width="60" height="23" align="center"><font size="2"><%=Pname(Stsh("stuffnum"))%> 
       </font> 
    </td>  
                                                                          
      <td width="60" height="23" align="center"><font size="2"><a href="G_statebrow.asp?ID=<%=Stsh("ID")%>" >详细<font size="2"></td>  
                                                                          
  </tr>                                                                            
  <%                                                                            
     Stsh.movenext                                                                            
     if Stsh.eof then exit for                                                                            
  next  
  rs1.close 
  set rs1=nothing 
  Stsh.close 
  set Stsh=nothing                                                                           
  %>                                                                                           
 </table>                                                                                                                                         
       
<p>      
 <a href="G_StateRemark.asp?Stuffid=<%=sid%>">请审核</a>&nbsp;&nbsp;                                                                                           
 </form>                                                                                                            
<% response.end     
end if   '有数据时     
     
end  if     '在已选择了业务员时     
     
 %>        
<form method="post" action="G_Statesh.asp" name="myform">          
<table border="0" width="100%">                                                  
                                           
 <tr>                                                
  <td width="100%">                                                
                                          
   <p align="left"><font size="2">请选择审核对象：</font>　<b>                                             
   &nbsp;                                                         
   </b>                                                         
                                                         
   </p>                                                         
                                                         
  </td>                                                         
 </tr>                                                         
</table>                                                         
                                                         
                                                         
                                                         
<table border="0" cellspacing="0" width="100%" align="center">                                                          
  <tr>                                                           
        
                                                           
    <td width="11%" align="center" bgcolor="#F1E8DA">         
         
      
     业务员         
         
       
         
       
            
      <select  name="txtstuff" style="width:100" size="1">                        
      <%                     
                            
      %>                                                      
            <%                                                        
    '业务员列表                                                        
    set rst=Server.CreateObject("ADODB.RecordSet")                                                        
    sql="Select * from A_StuffInfo Where SaleFlag='1' and delflag='0'"                                                        
    rst.open sql,pubconn,1                                                        
                                                            
    %>                                                     
       <option value="">请选择</option>                                                
       <%do while not rst.eof%>                                                       
        <option  value="<%=rst("StuffNum")%>" >  <%=rst("Name")%></option>                                                       
       <%                                                      
       rst.movenext                                                      
       loop  
       rst.close                                                     
      set rst=nothing                                                      
        %>                                                      
                                                       
      </select>&nbsp;&nbsp;&nbsp;&nbsp; <input type="button" value="查询" onclick="check1()" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1"  >&nbsp;       
      <a href="G_mainstate.asp">返回</a>         
         
    </td>                                                                                
 </tr>                                                                               
</table>                                                                        
</form>        
          
</body>