如果html是自己写的就简单,否则就要麻烦做点手脚。
of = CREATEOBJECT("form1") of.show(1) RETURN DEFINE CLASS form1 as Form width=800 height=500 AutoCenter=1 ADD OBJECT WB AS Olecontrol WITH left=0,top=0, Width=this.width,Height=this.height,Anchor=15,OleClass="Shell.Explorer.2" PROCEDURE Init this.WB.Silent = 1 this.WB.Navigate("https://match.lottery./lotto/pc_zst/index?actionType=chzs&lottoType=3d") ENDPROC PROCEDURE WB.documentComplete(pdisp, url) IF SYS(3095,pdisp)==SYS(3095,this) this.document.body.Scroll = "no" this.document.parentWindow.scrollBy(100,600) && 滚动条滚到 x=100,y=600 ENDIF ENDPROC ENDDEFINE