上一篇主題 :: 下一篇主題 |
發表人 |
內容 |
ufochen
註冊時間: 2003-09-17 文章: 165
第 1 樓
|
發表於: 星期六 十月 26, 2013 7:16 pm 文章主題: 原來正常的程式,升win8.1後變不能用了 |
|
|
程式碼如下:
Public ieMonitor
nLeft = Thisform.Left
ieMonitor = Createobject("InternetExplorer.Application")
ieMonitor.Navigate("http://118.163.127.110")
ieMonitor.FullScreen=.F. &&全螢幕
ieMonitor.MenuBar = .F.
ieMonitor.StatusBar = .F.
ieMonitor.Toolbar = .F.
ieMonitor.AddressBar =.F.
ieMonitor.Visible = .T.&& 至此...IE 畫面出現
WAIT "" WINDOW TIMEOUT 0.5
Do While ieMonitor.BUSY Or ieMonitor.READYSTATE <> 4
Enddo
Wait "" Window Timeout 0.3
ieMonitor.Document.getElementById("userpwd").Value= "123"
Do While ieMonitor.BUSY Or ieMonitor.READYSTATE <> 4
Enddo
Wait "" Window Timeout 0.3
ieMonitor.Document.getElementById("login_ok_button").Click()
執行後出現"OLE error code 0x8002005:Type mismatch" 錯誤訊息
錯誤行停在->ieMonitor.MenuBar = .F. 這行
請前輩指導一下?到底錯哪?沒升級win8.1以前還好好的! |
|
回頂端 |
|
|
ckp6250
註冊時間: 2004-07-30 文章: 1644
第 2 樓
|
發表於: 星期一 十月 28, 2013 11:12 am 文章主題: |
|
|
我是沒有安裝8.1啦,
不過,猜看看
既然錯誤訊息是 Type mismatch
那,把ieMonitor.MenuBar = .F.
改成
ieMonitor.MenuBar = 0
Try Try See! |
|
回頂端 |
|
|
ufochen
註冊時間: 2003-09-17 文章: 165
第 3 樓
|
發表於: 星期日 十一月 03, 2013 6:08 pm 文章主題: |
|
|
ckp6250 寫到: | 我是沒有安裝8.1啦,
不過,猜看看
既然錯誤訊息是 Type mismatch
那,把ieMonitor.MenuBar = .F.
改成
ieMonitor.MenuBar = 0
Try Try See! |
試過了還是不行! 謝謝 ! |
|
回頂端 |
|
|
ufochen
註冊時間: 2003-09-17 文章: 165
第 4 樓
|
發表於: 星期日 十一月 03, 2013 6:12 pm 文章主題: |
|
|
再請問一下?關於用VFP程式控制IE的指令要從哪裡得知?或參考甚麼樣的書籍? |
|
回頂端 |
|
|
bx1166
註冊時間: 2011-12-06 文章: 273
第 5 樓
|
發表於: 星期日 十一月 03, 2013 7:02 pm 文章主題: |
|
|
type 不外乎 txt logical number 還有一個你沒試
ieMoniter.MenuBar="" |
|
回頂端 |
|
|
jys
註冊時間: 2004-12-27 文章: 33 來自: 台灣
第 6 樓
|
發表於: 星期五 二月 21, 2014 11:38 am 文章主題: |
|
|
先到IE,將網站開啟,在工具中設定,相容性檢視設定
因為IE太新的關係. |
|
回頂端 |
|
|
ckp6250
註冊時間: 2004-07-30 文章: 1644
第 7 樓
|
發表於: 星期五 二月 21, 2014 10:04 pm 文章主題: |
|
|
我用 WIN8.1試了一下
ieMonitor.MenuBar = .F &&這行沒問題呀 |
|
回頂端 |
|
|
區榮熾
註冊時間: 2005-11-14 文章: 191
第 8 樓
|
發表於: 星期四 五月 08, 2014 5:04 pm 文章主題: |
|
|
抱歉,无法找到118.163.127.110!
热点 更多>>
以上是執行的結果........ieMonitor.MenuBar = .F. (沒有錯誤(我的VFP6.0, WIN 8.1 PRO))
ieMonitor.Document.getElementById("userpwd").Value= "123" 成員getelementByid無法對物件求值
如果你原程式成員正確,則在WIN 8.1 PRO OK! |
|
回頂端 |
|
|
|