| 上一篇主題 :: 下一篇主題   | 
	
	
	
		| 發表人 | 
		內容 | 
	
	
		queena1024
 
 
  註冊時間: 2007-04-16 文章: 37
 
  第 1 樓
  | 
		
			
				 發表於: 星期二 三月 05, 2013 11:54 am    文章主題: 請問如何讓開啟網頁的時候可以讓他先置頂~~ | 
				     | 
			 
			
				
  | 
			 
			
				| 使用InternetExplorer.Application...有屬性可以讓一開啟網頁的時候是先置頂嗎?謝謝指教... | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		queena1024
 
 
  註冊時間: 2007-04-16 文章: 37
 
  第 2 樓
  | 
		
			
				 發表於: 星期三 七月 03, 2013 4:55 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				補充說明 p的話..是都會跳到最上面...但是win7的話...就會縮小... | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		garfield Site Admin
  
  註冊時間: 2003-01-30 文章: 2160
 
  第 3 樓
  | 
		
			
				 發表於: 星期四 七月 04, 2013 10:19 am    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				 	  | 代碼: | 	 		  
 
OBJIE = CREATEOBJECT("InternetExplorer.Application")
 
With OBJIE
 
   .Visible = .T.
 
   .Navigate('http://vfp.sunyear.com.tw')
 
 
   Do While !.READYSTATE = 4 .And. Inkey()#27
 
      If .READYSTATE = 4
 
         Exit
 
      Endif
 
      wait  windows '等待InterExplorer啟動中...,按[ESC]可中止.' nowait
 
   Enddo
 
   Wait Clear
 
   If Lastkey()=27
 
      release OBJIE
 
      Return .F.
 
   Endif
 
 
   DECLARE INTEGER SetForegroundWindow IN user32 integer hWnd
 
   SetForegroundWindow( .HWND )
 
ENDWITH
 
 | 	 
  _________________ 利用>>搜尋<<的功能會比問的還要快得到答案. | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		queena1024
 
 
  註冊時間: 2007-04-16 文章: 37
 
  第 4 樓
  | 
		
			
				 發表於: 星期四 七月 11, 2013 5:24 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				| 可以ㄌㄝ..非常感謝..所以是還要宣告這個SetForegroundWindow...真是太開心ㄌ | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		Watermelon
 
 
  註冊時間: 2005-01-22 文章: 204
 
  第 5 樓
  | 
		
			
				 發表於: 星期日 七月 21, 2013 9:08 pm    文章主題:  | 
				     | 
			 
			
				
  | 
			 
			
				thisform.Hyperlink1.NavigateTo("http://vfp.sunyear.com.tw/index.php?sid=590547ea134dff04e4870f60e962ae84")
 
 
我用這個好像每次都有開在最上面! | 
			 
		  | 
	
	
		| 回頂端 | 
		 | 
	
	
		  | 
	
	
		 |