2019年12月18日 星期三

VB .net webbrowser 抓 table 資料到二維陣列

網路上找了很多資料,看到快昏倒了,都不是很正確


經過參考眾多的資料後做出來的....希望能幫到大家


這是我測試過的 Function


 


Function funHtml_Table2Array(ByRef bo_WebOcx As WebBrowser, ByVal bs_TableID As String) As String()()
Dim ls_Arr2(0)() As String
Dim ii, jj As Integer
ii = -1
jj = -1


Dim T1 As HtmlElement = bo_WebOcx.Document.GetElementById(bs_TableID)


For Each the_TR_Element As HtmlElement In T1.GetElementsByTagName("tr")
ii = ii + 1
ReDim Preserve ls_Arr2(ii)


For Each the_TD_Element As HtmlElement In the_TR_Element.GetElementsByTagName("td")
jj = jj + 1
ReDim Preserve ls_Arr2(ii)(jj)
ls_Arr2(ii)(jj) = the_TD_Element.InnerText & Chr(9) & the_TD_Element.InnerHtml
Next
jj = -1


Next


Return ls_Arr2
End Function


2019年12月5日 星期四

VMWare VB6 編譯時會發生錯誤的解決方式

VMWare 可以設定分享資料夾,可以把本機的指定目錄掛接成網路磁碟機


但是如果你的程式專案是放在本機,透過 VMWare 虛擬機內的 Microsoft Visual Basic 6 來進行編譯(Compiler)
這時候就會發生錯誤 cannot run "cvtres.exe"
因為我的程式有一些元件只能在XP下跑,所以必須用虛擬機來進行編譯
經過我上網搜尋所有的資料,發現根本無解,而且這是長久以來的問題
VMWare 一直都沒有解決....真是太瞎了


經過我的研究,發現了一個解決的方法
就是不使用設定分享資料夾的方式來掛接網路磁碟機
而是使用 Host-only 的方式


1. 先開啟 Virtual Network Editor ,查看 Host-only 的設定

這樣表示本機的 IP 應該是 192.168.142.1


寫下來之後把他關掉


2. Edit virtual machine setting

增加一個網路卡,Network connection 要選擇 Host-only


按下 OK


3. Start virtual machine

在檔案總管輸入 \\192.168.142.1\[your share folder]




然後就可以成功編譯了....YA


PS:
經過測試終於知道為什麼了
因為 VMWare 的共用資料夾名稱是 Shared Folder
中間有個空白字元....造成錯誤的發生


吞藥技巧

我的吞藥技巧很簡單


就是站著喝水吞.....哈哈


不知道為什麼對我很有效.....


Windows 10 閒置一段時間會被登出

在 Windows 7 以前,只要更改螢幕保護設定就可以了 現在 Windows 10 多了一個設定 設定 / 帳戶 / 登入選項 把他改成"永不"....就不會在閒置之後被要求登入了 真搞不懂,為什麼要多此一舉,害我一直被登出,找半天找不到原因 後來在網路上...