51Testing软件测试论坛

标题: LR测试C/S程序问题 [打印本页]

作者: lsl20032    时间: 2009-3-30 17:47
标题: LR测试C/S程序问题
我录制的程序情况:
开发语言:delphi、
数 据 库:Oracle10g
协   议:TCP/IP
录制时使用的协议:oracle(2-Tire)和winsocket协议!

在录制脚本后,有个lrd_ora8_stmt函数,里面有乱码
请问:1、我选择的协议对吗?
        2、回放时有乱码回放不成功,应该如何解决呢?
请各位大侠不吝赐教,感激不尽!

作者: archonwang    时间: 2009-3-31 10:11
请把源码贴出来。
作者: lsl20032    时间: 2009-3-31 13:57
标题: LR测试C/S程序问题--源码
……
        lrd_ora8_attr_set(OraStm34, PREFETCH_ROWS, "0", -1, 0);
        lrd_handle_free(&OraStm34, 0);
        lrd_handle_free(&OraStm32, 0);
        lrd_ora8_handle_alloc(OraEnv1, STMT, &OraStm35, 0);
        lrd_handle_free(&OraStm35, 0);
        lrd_ora8_handle_alloc(OraEnv1, STMT, &OraStm36, 0);
        lrd_ora8_stmt(OraStm36, "SELECT b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12,  b13, "
        "b14, b15, b16, b17, b18,b19, b20, b21,   b22, b23 FROM "
        "powerset WHERE (jobKindName = '绠\xA1\xE7" "悊鍛\x98\x27) \n", 1, 0, 0);
        lrd_ora8_handle_alloc(OraEnv1, STMT, &OraStm37, 0);
        lrd_ora8_stmt(OraStm37, "SELECT b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12,  b13, "
        "b14, b15, b16, b17, b18,b19, b20, b21,   b22, b23 FROM "
        "powerset WHERE (jobKindName = '绠\xA1\xE7" "悊鍛\x98\x27) \n", 1, 0, 0);
        lrd_ora8_attr_set(OraStm37, PREFETCH_ROWS, "1", -1, 0);
        lrd_ora8_exec(OraSvc1, OraStm37, 0, 0, &uliRowsProcessed, 0, 0, 0, 16,
        0);
        lrd_handle_free(&OraStm37, 0);
        lrd_ora8_handle_alloc(OraEnv1, STMT, &OraStm38, 0);
        lrd_ora8_stmt(OraStm38, "SELECT b0, b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, b11, b12,  b13, "
        "b14, b15, b16, b17, b18,b19, b20, b21,   b22, b23 FROM "
        "powerset WHERE (jobKindName = '绠\xA1\xE7" "悊鍛\x98\x27) \n", 1, 0, 0);
        lrd_ora8_stmt(OraStm38, "SELECT b0 , b1 , b2 , b3 , b4 , b5 , b6 , b7 , b8 , b9 , b10 , b11 ,"
        " b12 , b13 , b14 , b15 , b16 , b17 , b18 , b19 , b20 , b21 ,"
        " b22 , b23 , powerset.\"ROWID\"  FROM powerset WHERE  "
        "(jobKindName = '绠\xA1\xE7" "悊鍛\x98\x27) \n ", 1, 0, 0);
        lrd_ora8_attr_set(OraStm38, PREFETCH_ROWS, "100", -1, 0);
        lrd_ora8_exec(OraSvc1, OraStm38, 0, 0, &uliRowsProcessed, 0, 0, 0, 0,
        0);
         ……
以上就是源码,请archonwang指教下!

[ 本帖最后由 lsl20032 于 2009-3-31 13:59 编辑 ]




欢迎光临 51Testing软件测试论坛 (http://bbs.51testing.com/) Powered by Discuz! X3.2