LR测试C/S程序问题

lsl20032

我录制的程序情况：
开发语言：delphi、
数 据 库：Oracle10g
协   议：TCP/IP
录制时使用的协议：oracle（2-Tire）和winsocket协议！

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

archonwang

请把源码贴出来。

lsl20032

……
        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 编辑 ]