如何最大化IE視窗

出自VFP Wiki

在2006年10月2日 (一) 11:21由Elleryq (對話 | 貢獻)所做的修訂版本
(差異) ←上一修訂 | 最新修訂 (差異) | 下一修訂→ (差異)
跳轉到: 導航, 搜尋


參考資料

代碼

LOCAL  loWebBrowser  
DECLARE  Integer  SendMessage  IN  "user32"  Integer,  Integer,  Integer,  Integer  
loWebBrowser  =  CREATEOBJECT("InternetExplorer.Application")  
loWebBrowser.Navigate("http://www.163.com")  
SendMessage(loWebBrowser.HWnd,  274,61488,0)  
loWebBrowser.Visible  =  .T.  
MESSAGEBOX('点击确定关闭IE',64,'信息提示')  
loWebBrowser.Quit  &&关闭