我欲成仙，快乐齐天

以下写得部分是我做的，感觉还是比较复杂，稍后应该会有更简单的程序。

DataDriver表中，只有两个字段，用于输入用户名和密码的，对于结果的判断在程序中读取。

代码如下：

#自动启动flight4a程序
app="D:\\WinRuner8.0\\samples\\flight\\app";
exe="flight4a.exe";
invoke_application(exe,"",app,SW_SHOW);

 
 
table ="login.xls";
rc = ddt_open(table, DDT_MODE_READWRITE);
if (rc!= E_OK && rc != E_FILE_OPEN)
 pause("Cannot open table.");
ddt_get_row_count(table,table_RowCount);
for(table_Row = 1; table_Row <= 2; table_Row ++)
{
 ddt_set_row(table,table_Row);
 # Login
   set_window ("Login", 3);
   edit_set ("Agent Name:", ddt_val(table,"Agent_Name"));
   password_edit_set("Password:", ddt_val(table,"Password"));
   button_press ("OK");
     if (ddt_val(table,"Agent_Name")=="")
     {
       set_window("Flight Reservations", 1);
       static_check_info("Please enter agent name(static)","value","Please enter agent name");
       tl_step("Error",PASS,"Agent_name null!");            
     }
     else
     {
       if(ddt_val(table,"Password")=="")
       {  
         set_window("Flight Reservations", 1);
         static_check_info("Please enter agent name(static)","value","Please enter password");
         tl_step("Error",PASS,"Please enter password");
       }
     }
   button_press ("确定");
}  
for(table_Row = 3; table_Row <= 5; table_Row ++)
{  
   ddt_set_row(table,table_Row);
   # Login
   set_window ("Login", 3);
   edit_set ("Agent Name:", ddt_val(table,"Agent_Name"));
   password_edit_set("Password:", ddt_val(table,"Password"));
   obj_get_info("Password:","value",value);
   ddt_set_val(table,"old_password",value);
   ddt_save(table);
   button_press ("OK");
   if(length(ddt_val(table,"old_password"))<4)
   {
     set_window("Flight Reservations", 10);
     static_check_info("Please enter agent name(static)","value","Password must be at least 4 characters long");
     tl_step("Error",PASS,"Password must be at least 4 characters long");    
   }
   else
   {
     if(length(ddt_val(table,"Agent_Name"))<4)
     {
       set_window ("Flight Reservations", 1);
       static_check_info("Please enter agent name(static)","value","Agent name must be at least 4 characters long.");
       tl_step("Error",PASS,"Agent name must be at least 4 characters long.");    
     }
     else
     {
       if(ddt_val(table,"Password")=="kzptnyospyospy")
       {
         set_window("Flight Reservations", 1);
         static_check_info("Please enter agent name(static)","value","Incorrect password. Please try again");
         tl_step("Error",PASS,"Incorrect password. Please try again");
         set_window("Flight Reservations", 1);
         button_press ("确定");
         set_window ("Login", 0);
         button_press ("OK");  
         set_window("Flight Reservations", 1);
         button_press ("确定");
         set_window ("Flight Reservations", 1);
         static_check_info("Please enter agent name(static)","value","Login unsuccessful. Please try again later.");
         tl_step("Error",PASS,"Login unsuccessful. Please try again later.");      
       }
     }
   }  
   button_press ("确定");
}
invoke_application(exe,"",app,SW_SHOW);
for(table_Row = 6; table_Row <= 6; table_Row ++)
{  
 ddt_set_row(table,table_Row);
 set_window ("Login", 5);
 edit_set ("Agent Name:", ddt_val(table,"Agent_Name"));
 password_edit_set("Password:", ddt_val(table,"Password"));
 if(ddt_val(table,"Password")=="kzptnyoslzjsaz")
 {
   tl_step("successful",PASS,"Login successful.");
   button_press ("OK");
 }
}
win_close("Flight Reservation");
ddt_close(table);