性能測試腳本自動建立測試datapool應用
為了說明問題。我用分別用vb,delphi, DotNETMILY: 宋體">實現一個簡單添加用戶的功能,后臺用ACCESS數據庫,例用ado通過odbc連接。
1. 分析程序實現的結構,是簡單的c/s結構,利用odbc連接。并且客戶端,服務器端都配置在一臺計算機。(請注意這個是條件,我們第二步選擇的基礎)
2. 設置session Record Options
錄制方法選擇api record錄制,協議用odbc。(如果我后臺換sqlserver或則oracle,其他實現方式不變,應該選擇什么協議,因該添加什么協議)
3. Vb,delphi編碼方式的功能腳本錄制成功(創建同名datapool)。DotNet腳本錄制成功,卻無法產生同名的datapool(怎么辦)。不成功腳本如下:
/*
->-> Session File Information <-<-
Created: Sun Apr 25 23:24:36 2004
Name: G:\Program\robot\lead\TestDatastore\DefaultTestscrīptDatastore\TMS_Sessions\demo.wch
Type: Rational Robot - API
(with ODBC)*/
myE._v%r2O0#include <VU.h>
{
push Timeout_scale = 200; /* Set timeouts to 200% of maximum response time */
push Think_def = "LR";
Min_tmout = 120000; /* Set minimum Timeout_val to 2 minutes */
push Timeout_val = Min_tmout;
/* No Datapool Items Remain */
/* After All Data Analyses. */
VBNETDemo = sqlconnect("VBNETDemo", "", LOOKUP_PWD,
"VBNETDemo", "odbc",
"DRIVER_INFO='DSN=?;;UID=DEFAULT;PWD=DEFAULT;'");
/*{ INFO SERVER "UNKNOWN"="0.0.0.0"; } */
/* Unable to determine Server Name/Address */
set Server_connection = VBNETDemo;
push Think_avg = 0;
stmt_2_1_id = sqlopen_cursor ["pre001"] "", "select * from login";
set Think_avg = 313;
push CS_blocksize = 1;
sqlfetch_cursor ["pre002"] stmt_2_1_id, ALL_ROWS;
set Think_avg = 0;
&^ aW^R ^R+S0
sqlclose_cursor ["pre003"] stmt_2_1_id ;
set Think_avg = 4078;
stmt_2_2_id = sqlopen_cursor ["pre004"] "", "INSERT INTO `login` (`name`,`password`) VALUES (?,?)",
"'f\002'<varchar(50):I>",
"'f\002'<varchar(50):I>";
set Think_avg = 0;軟件測試專業網站:51Testing軟件測試網K6T HV0asm-P
軟件測試專業網站:51Testing軟件測試網|d*|0W+t3m9`v
sqlfree_cursor( stmt_2_2_id );軟件測試專業網站:51Testing軟件測試網!w9h2MO1_wv$GI
軟件測試專業網站:51Testing軟件測試網8U.h#m8Ub.^gP
set Think_avg = 2781;軟件測試專業網站:51Testing軟件測試網&o%d _UKN"@1i
文章來源于領測軟件測試網 http://www.kjueaiud.com/