|
数据库使用Oracle817,编程语言使用Delphi,客户端程序通过BDE对数据库进行操作。
但是使用LoadRunner对程序性能测试时。如果选择Oracle(2-tier)协议,什么也录制不到,但是如果使用Socket协议虽然可以录制到内容,但是data.ws里面的内容不太看得懂啊!!
#include "lrs.h"
vuser_init()
{
lrs_startup(257);
lr_think_time(15);
lrs_create_socket("socket0", "TCP", "RemoteHost=GREENMAN:1521", LrsLastArg);
lrs_send("socket0", "buf0", LrsLastArg);
lrs_receive("socket0", "buf1", LrsLastArg);
lrs_close_socket("socket0");
lrs_create_socket("socket1", "TCP", "RemoteHost=GREENMAN:2030", LrsLastArg);
lrs_send("socket1", "buf2", LrsLastArg);
lrs_receive("socket1", "buf3", LrsLastArg);
...
...
...
lrs_receive("socket1", "buf1097", LrsLastArg);
lrs_send("socket1", "buf1098", LrsLastArg);
lrs_receive("socket1", "buf1099", LrsLastArg);
lrs_send("socket1", "buf1100", LrsLastArg);
lrs_receive("socket1", "buf1101", LrsLastArg);
lrs_send("socket1", "buf1102", LrsLastArg);
...
...
;WSRData 2 1
send buf0 131
"\x00\x83\x00\x00\x01\x00\x00\x00\x01"
"3"
"\x01"
","
"\x00\x00"
"\b"
"\x00\x7f\xff\x7f"
"\b"
"\x00\x00\x01\x00\x00"
"a"
"\x00"
"\""
"\x00\x00\x04\x00\x04\x00"
"(DESCRIPTION=(ADDRESS=(PROTOCOL=tcp)(HOST=192.168.1.219)(PORT=1521))(CONNE"
"CT_DATA=(SID=ping817)))"
recv buf1 65
"\x00"
"A"
"\x00\x00\x05\x00\x00\x00\x00"
"7(ADDRESS=(PROTOCOL=tcp)(HOST=192.168.1.219)(PORT=2030))"
send buf2 131
"\x00\x83\x00\x00\x01\x00\x00\x00\x01"
"3"
"\x01"
","
"\x00\x00"
"\b"
"\x00\x7f\xff\x7f"
"\b"
"\x00\x00\x01\x00\x00"
"a"
"\x00"
"\""
"\x00\x00\x04\x00\x04\x00"
"(DESCRIPTION=(ADDRESS=(PROTOCOL=tcp)(HOST=192.168.1.219)(PORT=2030))(CONNE"
"CT_DATA=(SID=ping817)))" |
|