I have this code MARK 1
<pre class="ip-ubbcode-code-pre">
sub main()
sRawWeb = hs.GetURL("www.tvnz.co.nz","",False,80)
'Find the positions in Page
iPos1 = InStr(10,sRawWeb,"<!-- Vignette")
iPos1 = InStr(iPos1+1,sRawWeb,"<table")
iPos2 = InStr(iPos1+1,sRawWeb,"</table")
Temp = mid(sRawWeb,ipos1,ipos2-ipos1+8)
temp = replace(Temp ,"What's On","What's On ONE")
hs.SetDeviceString "z1",temp
hs.setdevicelastchange "z1", now()
iPos1 = InStr(iPos2+1,sRawWeb,"<table")
iPos2 = InStr(iPos1+1,sRawWeb,"</table")
Temp = mid(sRawWeb,ipos1,ipos2-ipos1+8)
temp = replace(Temp ,"What's On","What's On TWO")
</pre>
Problem is
when I run it from a event it show the data from the last time I open it in explorer manually
e.g
i I run it as is it shows me data from last explorer open
if i go there with the explorer
then run the event again the data is right.
why ?
what am I doing something wrong ?????????????????
StePhan McKillen
My Pages
[This message was edited by StePhan on Wed, 27 August 2003 at 05:04 AM.]
<pre class="ip-ubbcode-code-pre">
sub main()
sRawWeb = hs.GetURL("www.tvnz.co.nz","",False,80)
'Find the positions in Page
iPos1 = InStr(10,sRawWeb,"<!-- Vignette")
iPos1 = InStr(iPos1+1,sRawWeb,"<table")
iPos2 = InStr(iPos1+1,sRawWeb,"</table")
Temp = mid(sRawWeb,ipos1,ipos2-ipos1+8)
temp = replace(Temp ,"What's On","What's On ONE")
hs.SetDeviceString "z1",temp
hs.setdevicelastchange "z1", now()
iPos1 = InStr(iPos2+1,sRawWeb,"<table")
iPos2 = InStr(iPos1+1,sRawWeb,"</table")
Temp = mid(sRawWeb,ipos1,ipos2-ipos1+8)
temp = replace(Temp ,"What's On","What's On TWO")
</pre>
Problem is
when I run it from a event it show the data from the last time I open it in explorer manually
e.g
i I run it as is it shows me data from last explorer open
if i go there with the explorer
then run the event again the data is right.
why ?
what am I doing something wrong ?????????????????
StePhan McKillen
My Pages
[This message was edited by StePhan on Wed, 27 August 2003 at 05:04 AM.]
Comment