09-22-2006, 02:17 PM
Memory leaks in htm while waiting. I'll try to fix this, if possible.
Avoid using htm with wait time. Instead use wait.
Another problem - iexplore.exe memory usage also grows, and almost 2 times faster than qm.exe. It also grows if using only keyboard and mouse. If it is problem, restart IE every n times.
I could not test with your macro because it needs particular web page, etc. Instead I used this code:
While it runs, QM memory usage grows. Adds about 15 MB after 500 times. But this code does not add memory:
Avoid using htm with wait time. Instead use wait.
OI.Click
wait 180 "window name" ;;or wait 180 I
0.1
OI=htm("TD" _s "" win(" Internet Explorer" "IEFrame") "1/2" 11 0x21)Another problem - iexplore.exe memory usage also grows, and almost 2 times faster than qm.exe. It also grows if using only keyboard and mouse. If it is problem, restart IE every n times.
I could not test with your macro because it needs particular web page, etc. Instead I used this code:
out
rep() clo "Internet Explorer"; err break
web "http://www.google.com/advanced_search?hl=en" 9
int ie=win("Microsoft Internet Explorer")
Htm el
int i
for i 0 5000
,el=htm("INPUT" "as_q" "" ie 0 0 0x221 30)
,el.SetText("egubotiretfa")
,el=htm("INPUT" "as_epq" "" ie 0 3 0x221)
,el.SetText("kkksshhgshags")
,el=htm("INPUT" "as_oq" "" ie 0 4 0x221)
,el.SetText("eersttaatta")
,el=htm("INPUT" "as_eq" "" ie 0 5 0x221)
,el.SetText("lljshajha")
,el=htm("INPUT" "Google Search" "" ie 0 2 0x421)
,el.Click
,el=htm("A" "Advanced Search" "" ie 0 13 0x21 30)
,el.Click
,out iWhile it runs, QM memory usage grows. Adds about 15 MB after 500 times. But this code does not add memory:
out
rep() clo "Internet Explorer"; err break
web "http://www.google.com/advanced_search?hl=en" 9
int ie=win("Microsoft Internet Explorer")
1
Htm el
int i
for i 0 5000
,el=htm("INPUT" "as_q" "" ie 0 0 0x221)
,el.SetText("egubotiretfa")
,el=htm("INPUT" "as_epq" "" ie 0 3 0x221)
,el.SetText("kkksshhgshags")
,el=htm("INPUT" "as_oq" "" ie 0 4 0x221)
,el.SetText("eersttaatta")
,el=htm("INPUT" "as_eq" "" ie 0 5 0x221)
,el.SetText("lljshajha")
,el=htm("INPUT" "Google Search" "" ie 0 2 0x421)
,el.Click
,wait 0 "egu"
,0.1
,el=htm("A" "Advanced Search" "" ie 0 13 0x21)
,el.Click
,wait 0 "Google Advanced Search"
,0.1
,
,out i