LR 测试 sqlserver2005

wofeman

选用的是ODBC协议
做一个连表的查询

脚本如下

/* -------------------------------------------------------------------------------
        Script Title       :
        Script Description :
                        
                        
        Recorder Version   : 1008
   ------------------------------------------------------------------------------- */

vuser_init()
{
    lr_think_time(3);
        lr_start_transaction("login");

        lrd_init(&InitInfo, DBTypeVersion);
        lrd_open_context(&Ctx1, LRD_DBTYPE_ODBC, 0, 0, 0);
        lrd_db_option(Ctx1, OT_ODBC_OV_ODBC3, 0, 0);
        lrd_alloc_connection(&Con1, LRD_DBTYPE_ODBC, Ctx1, 0 /*Unused*/, 0);
        lrd_db_option(Con1, OT_ODBC_LOGIN_TIMEOUT, (void FAR const *)15, 0);
        lrd_db_option(Con1, OT_ODBC_SS_QUOTED_IDENT, "OFF", 0);
        lrd_db_option(Con1, OT_ODBC_SQL_PACKET_SIZE, (void FAR const *)0, 0);
        lrd_open_connection(&Con1, LRD_DBTYPE_ODBC, "", lr_decrypt("4590ade4e"), "", lr_decrypt("4590ade47aebc1e520628ebbe8b9d70b426b24ca6cf40bd9"
        "7b33608fa8ff50fa0048d1d4c23920ef37e1d6fcff9e0e2cba8f28312650"
        "413665769cfa8db78a5e02c1b7513d025632c47ece3ec3488dc4"), Ctx1, 1, 0);
        lrd_open_cursor(&Csr1, Con1, 0);
        lrd_db_option(Csr1, OT_ODBC_MAX_LENGTH, (void FAR const *)64512, 0);
        lrd_result_set(Csr1, 0, 0, 0);
        lrd_db_option(Csr1, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr1, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr1, "select @@microsoftversion", -1, 1, 0 /*None*/, 0);
        lrd_bind_cols(Csr1, BCInfo_D2, 0);
        lrd_fetch(Csr1, -1, 1, 0, PrintRow2, 0);
        GRID(2);
        lrd_result_set(Csr1, 0, 0, 0);
        lrd_result_set(Csr1, 0, 0, 0);
        lrd_db_option(Csr1, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr1, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_result_set(Csr1, 0, 0, 0);
        lrd_db_option(Csr1, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr1, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
                 lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "set lock_timeout -1", -1, 1, 0 /*None*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "select IS_SRVROLEMEMBER ('sysadmin')", -1, 1, 0 /*None*/, 0);
        lrd_fetch(Csr2, 1, 1, 0, PrintRow14, 0);
        GRID(14);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "set nocount off\r\nset arithabort on\r\nset concat_null_yields_null "
        "on\r\nset ansi_nulls on\r\nset cursor_close_on_commit off\r"
        "\nset ansi_null_dflt_on on\r\nset implicit_transactions "
        "off\r\nset ansi_padding on\r\nset ansi_warnings on\r\nset "
        "quoted_identifier on\r\n", -1, 1, 0 /*None*/, 0);
        lrd_open_context(&Ctx3, LRD_DBTYPE_ODBC, 0, 0, 0);
        lrd_db_option(Ctx3, OT_ODBC_OV_ODBC3, 0, 0);
        lrd_alloc_connection(&Con3, LRD_DBTYPE_ODBC, Ctx3, 0 /*Unused*/, 0);
        lrd_db_option(Con3, OT_ODBC_LOGIN_TIMEOUT, (void FAR const *)15, 0);
        lrd_open_connection(&Con3, LRD_DBTYPE_ODBC, "", lr_decrypt("4590ade4e"), "", lr_decrypt("4590ade47aebc1e520628ebbe8b9d70b426b24ca6cf40bd9"
        "7b33608fa8ff50fa0048d1d4c23920ef37e1d6fcff9e0e2cba8f28312650"
        "413665769cfa8db78a5e02c1b7513d025632c47ed5c83a217f2de37b540c"
        "aaac02bf5002d7808f7a928eacd3fbac31e3c5435f64032510"), Ctx3, 1, 0);
        lrd_open_cursor(&Csr3, Con3, 0);
        lrd_db_option(Csr3, OT_ODBC_QUERY_TIMEOUT, (void FAR const *)30, 0);
        lrd_stmt(Csr3, "set lock_timeout 30", -1, 1, 0 /*None*/, 0);
        lrd_close_cursor(&Csr3, 0);
        lrd_open_cursor(&Csr4, Con3, 0);
        lrd_db_option(Csr4, OT_ODBC_QUERY_TIMEOUT, (void FAR const *)30, 0);
        lrd_stmt(Csr4, "dbo.sp_MShasdbaccess", -1, 1, 0 /*None*/, 0);
        lrd_bind_cols(Csr4, BCInfo_D27, 0);
        lrd_fetchx(Csr4, -15, 1, 0, PrintRow16, 1, 0);
        GRID(16);
        lrd_db_option(Csr4, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_db_option(Csr4, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_close_cursor(&Csr4, 0);
        lr_end_transaction("login",LR_AUTO);
    lr_think_time(6);
        lr_start_transaction("choice");

        //lr_think_time(15);

        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "set showplan_text off\r\n", -1, 1, 0 /*None*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
         
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "DBCC USEROPTIONS", -1, 1, 0 /*None*/, 0);
        lrd_bind_cols(Csr2, BCInfo_D30, 0);
        lrd_fetch(Csr2, -14, 1, 0, PrintRow18, 0);
        GRID(18);
        lrd_stmt(Csr2, "set showplan_text off\r\n", -1, 1, 0 /*None*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "SET NOEXEC OFF SET PARSEONLY OFF", -1, 1, 0 /*None*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "set showplan_all off\r\n", -1, 1, 0 /*None*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_stmt(Csr2, "use [UMsgBig]", -1, 1, 0 /*None*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lr_end_transaction("choice",LR_AUTO);
        return 0;
}


Action()
{
   
    lr_think_time(3);  
        lr_start_transaction("exe");

        //lr_think_time(15);

        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        //lr_think_time(4);

        lrd_stmt(Csr2, "declare @telno bigint\r\ndeclare @area2Spell varchar(16)\r\ndeclare "
        "@area3Spell varchar(16)\r\ndeclare @UserID "
        "uniqueidentifier\r\ndeclare @time datetime\r\ndeclare @Tag1 "
        "varchar(64)\r\ndeclare @Tag2 varchar(64)\r\ndeclare "
        "'AAAAAAAA-AAAA-AAAA-AAAA-AAAAAAAAAAAA','??????????????',"
        "'00001','0000100002'\r\n,0,'','',0,0,'1900-1-1','1900-1-1',"
        "'','0',0,@time,1)\r\n\r\nset @i=@i+1\r\nend\r\n\r\n\r\n\r\n"
        "\r\n\r\n", -1, 1, 0 /*None*/, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_bind_cols(Csr2, BCInfo_D33, 0);
        lrd_fetch(Csr2, -1, 1, 0, PrintRow22, 0);
        GRID(22);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_bind_cols(Csr2, BCInfo_D35, 0);
        lrd_fetch(Csr2, -1, 1, 0, PrintRow24, 0);
        GRID(24);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_bind_cols(Csr2, BCInfo_D69, 0);
        lrd_fetch(Csr2, -5, 1, 0, PrintRow26, 0);
        GRID(26);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lr_end_transaction("exe",LR_AUTO);
   
        return 0;
}

vuser_end()
{
lr_think_time(4);
        lr_start_transaction("logout");

        //lr_think_time(13);

        lrd_cancel(0, Csr2, 0 /*Unused*/, 0);
        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_stmt(Csr2, "select @@trancount", -1, 1, 0 /*None*/, 0);
        lrd_fetch(Csr2, 1, 1, 0, PrintRow28, 0);
        GRID(28);
        //lr_think_time(7);


        lr_end_transaction("logout", LR_AUTO);

        lrd_result_set(Csr2, 0, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_CLOSE, 0, 0);
        lrd_db_option(Csr2, OT_ODBC_CURSOR_UNBOUNDCOLS, 0, 0);
        lrd_close_cursor(&Csr2, 0);
        lrd_close_connection(&Con2, 0, 0);
        lrd_free_connection(&Con2, 0 /*Unused*/, 0);
        lrd_close_context(&Ctx2, 0, 0);
        lrd_close_connection(&Con3, 0, 0);
        lrd_free_connection(&Con3, 0 /*Unused*/, 0);
        lrd_close_context(&Ctx3, 0, 0);
        return 0;
}

picture

刚好我也在研究LR测试数据库,你这个脚本是连表的查询啊.那算是性能的还是功能上的!查询的结果LR怎么捕捉的啊 ,我也是新手,都不知道这么去测试数据库,一般来说是不是测试数据库功能上面的合理性啊,性能数据库是看配置的吧应该

foxmishy

我也在研究LR，不知道是否可以直接测试WEB 方法就可以了呢？

you力

PrintRow24 ？是什么意思？

GRID(26);这个表格出现的值，你能不能取出其中特定的一个值呢？就比如说，你把查询语句，变成count(*)类型的数值. 在GRID中会显示出这个count,那么这个count的值你用什么方法可以取出来，用于别的地方的对比呢？批点~~~~

筷子

sdlkfj8

房雷

定上来。。。

房雷

还有谁知道啊。。