51Testing软件测试网5[KS0PV2ou/E7D T论坛上看到有个大大写了个自动点QTP的RUNERROR窗口的小工具,但是网友们苦于楼主失踪,无法求得原代码,因此自个而按照自己的猜测写了个,各位可以试试,要怎么改就怎么改,要加界面就用VS2005拖一个再将这写放到里面,想点什么就自己改代码咯.有什么错误的话请各位在小弟的BLGG 9527留上训言.
hKd;]F{A mO-Y051Testing软件测试网B2p'p [4s\不过注意咯,用作监控的话要加上无限循环::EnumWindows(EnumFunc,0)这个,所以最好起一个线程,在线程函数里加上
2K;hg+e%of6w0`#aJY'yq0while(true){51Testing软件测试网G;} j4w&uML
51Testing软件测试网,ON%tk3R%q::EnumWindows(EnumFunc,0);
[(_2L
e%l051Testing软件测试网2g]`3F;Atq!M//为了性能,最好在这加上一句等待51Testing软件测试网
W^6mNwW%X!}
x(PSVE0L0}51Testing软件测试网-^~*^$k0a
eq GE
51Testing软件测试网6F5~~Ev?0X用来监控的一定要有循环,要不就失去监控的意义,不过当然各位可以通过其他数据的监控再驱动,如果加上了无限循环,那么会出现阻塞,所以为了避免阻塞,请用线程.
5P3e bwe{w)G~,Y0&Tf6mzH
Q7l0下面是定位窗口子对象并发送消息的代码.
-oXr5Pjgl051Testing软件测试网e5q9} o&Umf!P1]VBOOL CALLBACK EnumChildProc(HWND hwndChild,LPARAM lParam)
2Qsoj_a;p0{
,d?}.KEU
voE0 char WndTitle[255];
G"}2T4z?!{"l1mxW0 char szName[255];
|8c?+dM;R0 ::GetWindowText(hwndChild,WndTitle,255);//获取当前子对象的TITLE
nWnua2i0 ::GetClassName(hwndChild,szName,255);//获取当前子对象的CLASSNAME51Testing软件测试网 nO.^IC;T.T
if((strcmp(WndTitle,"确定") == 0)&&(strcmp(szName,"Button") == 0))//这里也改,你想找TITLE是什么的就自己改,CLASSNAME同理51Testing软件测试网n.^]+xliK
{51Testing软件测试网q4j/K(E,jaR
DWORD dw = 1;51Testing软件测试网VkV,aYzZU
dw = dw << 16;51Testing软件测试网#q$^#b*e:W3~c|R
dw +=1;