g_plan.asp

一个很好的在线购物系统

    <% if T_month<>"" then%>                                                                                                                                                                                                              
       <option value="<%=T_month%>" selected><%=T_month%></option>                                                                                                                                                                                                               
    <%else%>                                                                                                                                                                                                                        
        <option value=""></option>                                                                                                                                                                                                                        
     <% for i= 1 to 9%>                                                                                                                                                                                                                
        <option value="0<%=i%>">0<%=i%></option>                                                                                                                                                                                                           
     <%next%>                                                                                                                                                                                                                 
     <% for n= 10 to 12%>                                                                                                                                                                                                                
        <option value="<%=n%>"><%=n%></option>                                                                                                                                                                                                                
     <%next%>                                                                                                                                                                                                                      
    <% end if %>                                                                                                                                                                                                              
                                                                                                                                                                                                                          
                                                                                                                                                                                                                        
    </select>月<select size="1" name="Tdate" tabindex="6" >                                                                                                                                                                                                               
     <% if T_date<>"" then%>                                                                                                                                                                                                                  
        <option value="<%=T_date%>" selected><%=T_date%></option>                                                                                                                                                                                                               
    <%else%>                                                                                                                                                                                                                    
     <option value=""></option>                                                                                                                                                                                                               
      <% for m= 1 to 9%>                                                                                                                                                                                                                
        <option value="0<%=m%>">0<%=m%></option>                                                                                                                                                                                                               
      <%next%>                                                                                                                                                                                                                     
      <% for t= 10 to 31%>                                                                                                                                                                                                                
        <option value="<%=t%>"><%=t%></option>                                                                                                                                                                                                                
      <%next%>                                                                                                                                                                                                                      
   <% end if %>                                                                                                                                                                                                               
                                                                                                                                                                                                                             
    </select>日                                                                                                                                                                                                                         
    </font>                                                                                                                                                                                                                         
                                                                                                                                                                                                                                   
    </td>                                                                                                                                                                                                                             
    <td width="100" height="23" align="right" colspan="2">                                                                                                                                                                                                                         
     <font size="2">跟进时间</font>                                                                                                                                                                                                                         
    </td>                                                                                                                                                                                                                             
    <td width="233"  height="23">                                                                                                                                                                                                                          
    <font size="2"><select size="1" name="txttime"  style="width: 116; height: 23" tabindex="7"  onChange="zsm(document.form1.Tyear.value+'-'+document.form1.Tmonth.options[document.form1.Tmonth.selectedIndex].value+'-'+document.form1.Tdate.options[document.form1.Tdate.selectedIndex].value,document.form1.txttime.options[document.form1.txttime.selectedIndex].value,document.form1.txtywy.value)">                                                                                                                                                                                                               
                                                                                                                                                                                                                  
     <option value=""></option>                                                                                                                                                                                                                    
                                                                                                                                                      
      <% for i=0 to Ubound(closetime)%>                                                                                                                                                               
          <option value="<%=closetime(i)%>"><%=closetime(i)%></option>                                                                                                                                                               
      <%next%>                                                                                                                                                               
                                                                                                                                                                                              
                                                                                                                                                                                                                    
    </select>                                                                                                                                                                                                                                                                         
                                                                                                                                                                                                                                                                          
    </font>                                                                                                                                                                                                                   
                                                                                                                                                                                                                                                                          
    </td>                                                                                                                                                                                                                                                                              
  </tr>                                                                                                                                                                                                                                                                          
  <tr>                                                                                                                                                                                                               
    <td width="79" height="17" align="right">                                                                                                                                                                                                                                                                          
     <font size="2">跟进对象                                                                                                                                                                                                                                                                          
     </font>                                                                                                                                                                                                                                                                          
    </td>                                                                                                                                                                                                                                                                               
    <td width="173" height="17">                                                                                                                                                                                                                                                                               
    <font size="2"><select size="1" name="txtobject"  onChange="changelocation(document.form1.txtobject.options[document.form1.txtobject.selectedIndex].value)" style="width:100;" tabindex="8">                                                                                                                                                                                                                                                                          
   <option value=""></option>                                                                                                                                                                                                                                                    
<%                                                                                                                                                                                                                                                     
set rs=server.createobject("adodb.recordset")                                                                                                                                                                                                                                                    
str="select linkman from D_LinkMan where Onoroff='1' and  ClientNum='"&khxh&"'"                                                                                                                                                                                                                                                    
                                                                                                                                                                                                                                                   
rs.open str,pubconn,1                                                                                                                                                                                                                                                    
do while not rs.eof                                                                                                                                                                                                                                                     
                                                                                                                                                                                                                                                    
%>                                                                                                                                                                                                                                                    
<option value="<%=Trim(rs("linkman"))%>"><%=rs("linkman")%></option>                                                                                                                                                                                                                                                    
                                                                                                                                                                                                                                                    
<%                                                                                                                                                                                                                                                    
rs.movenext                                                                                                                                                                                                                                                    
loop                                                                                                                                                                                                                                             
                                                                                                                                                                                                                                                  
%>                                                                                                                                                                                                                                                    
</select>                                                                                                                                                                                                                                                     
                                                                                                                                                                                                                                                           
                                                                                                                                                                                                                                                                        
   </font>                                                                                                                                                                                                                                                                          
                                                                                                                                                                                                                                                                          
    </td>                                                                                                                                                                                                                                                                               
    <td width="100" height="17" align="right" colspan="2">                                                                                                                                                                                                                                                                          
     <font size="2">对象职务                                                                                                                                                                                                                                                                          
     </font>                                                                                                                                                                                                                                                                          
    </td>                                                                                                                                                                                                                                                                               
    <td width="233" height="17">                                                                                                                                                                                                                                                                            
    <input type="text" name="dxzw" size="15" readonly tabindex="9" >                                                                                                                                                                                                                                                                          
                                                                                                                                                                                                                                                                          
    </td>                                                                                                                                                                                                                                                                               
  </tr>                                                                                                                                                                                                               
  <tr>                                                                                                                                                                                                                                                                            
    <td width="79" height="23" align="right">                                                                                                                                                                                                                                                                          
                                                                                                                                                                                                                                                                   
    <font size="2">                                                                                                                                                                                                                                                                      
    跟进方式</font>                                                                                                                                                                                                                                                                         
    </td>                                                                                                                                                                                                                                                                              
    <td width="173" height="23">                                                                                                                                                                                                                                                                              
    <font size="2"><select size="1" name="txtway" style="width:100" tabindex="10">                                                                                                                                                                                                                                 
    <option value=""></option>                                                                                                                                                                                                                                                      
                                                                                                                                                                         
    <%for i=0 to Ubound(CloseMode)%>                                                                                                                                                                         
       <option value="<%=CloseMode(i)%>"><%=CloseMode(i)%></option>                                                                                                                                                                         
    <%next%>                                                                                                                                                                           
                                                                                                                                                                         
    </select>                                                                                                                                                                                                                     
                                                                                                                                                                                                                     
                                                                                                                                                                                                                     
    </font>                                                                                                                                                                                                                                       
                                                                                                                                                                                                                                       
    </td>                                                                                                                                                                                                                                            
    <td width="100" height="23" align="right" colspan="2">                                                                                                                                                                                                                                       
     <font size="2">跟进目的                                                                                                                                                                            
     </font>                                                                                                                                                                            
    </td>                                                                                                                                                                                                                                            
    <td width="233" height="23">                                                                                                                                                                                                                                         
    <font size="2">                                                                                                                                                                                                                                   
    <select size="1" name="txtmd" style="width: 160; height: 23" tabindex="11" >                                                                                                                                                                                           
    <option  value=""></option>                                                                                                                                                                                                                    
                                                                                                                                                                        
    <%for i=0 to Ubound(ClosePurpose)%>                                                                                                                                                                            
       <option value="<%=ClosePurpose(i)%>"><%=ClosePurpose(i)%></option>                                                                                                                                                                            
    <%next%>                                                                                                                                                                              
                                                                                                                                                                            
                                                                                                                                                                              
                                                                                                                                                                            
    </select></font>                                                                                                                                                                                                                                       
                                                                                                                                                                                                                                       
    </td>                                                                                                                                                                                                                                            
  </tr>                                                                                                                                                                                                                       
  <tr>                                                                                                                                                                                                                      
    <td width="79" height="23" align="right">                                                                                                                                                                                                                     
     <font size="2">备注</font>                                                                                                                                                                            
    </td>                                                                                                                                                                                                                          
    <td width="514" height="23" colspan="4">                                                                                                                                                                                                                          
                                                                                                                                                                                                                                
    <textarea rows="1" name="bz" cols="59" ></textarea>                                                                                                                                                                                                                                       
                                                                                                                                                                                                                                       
    </td>                                                                                                                                                                                                                          
  </tr>                                                                                                                                                                                                                      
  </table>                                                                                                                                                                                                                        
                                                                                                                                                                                                                     
<p align="center">                                                                                                                                                                                                                            
                                                                                                                                                                                                                                         
  <input type="button" value="新增"  onclick="location.href='G_plan.asp'" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">                                                                                                                                     
  &nbsp;&nbsp;&nbsp;&nbsp; <input type="button" value="保存" name="bc" onclick="datacheck()" class="hand" style="background-color: #D1D1D1; border-style: solid; border-width: 1">&nbsp;&nbsp;&nbsp;&nbsp; &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;                                                                                                           
  <a href=G_mainplan.asp>返回</a>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;                                                                                                                                                                                                                                                                                                                                        
                                                                                                                                                                                                                                                                                                                                
  </form>