返回列表 上一主題 發帖

[發問] 請問如何讀取MSQL裡的binary資料至excel裡

sasho

帖子
49 
主題
18 
精華
0 
積分
154 
點名
0  
作業系統
windows 
軟體版本
XP 
閱讀權限
20 
性別
男 
註冊時間
2010-6-16 
最後登錄
2024-8-5 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2013-6-19 16:32 | 只看該作者

[發問] 請問如何讀取MSQL裡的binary資料至excel裡

最近需要從mysql的資料庫中抓資料到excel進行分析
但在運作的過程中，發現若是binary的資料則無法讀取
讀出來的結果也是空白的，不曉得各位前輩是否能幫忙解決，謝謝!!
以下是我的code

Private Sub DataUpdate()

Dim oConn As ADODB.Connection
Dim myRS As ADODB.Recordset
Dim mySQL As String
Dim LastR As Long

Set oConn = New ADODB.Connection
Set myRS = New ADODB.Recordset
oConn.Open "DRIVER={MySQL ODBC 5.2a Driver};" _
           & "SERVER=localhost;" & "DATABASE=test;" & "USER=root;" _
           & "PASSWORD=XXXXXXX;" & "Option=3"

mySQL = "select * from `test` "
myRS.Open mySQL, oConn

With Worksheets(1)

    LastR = .Range("A65536").End(xlUp).Row

    Do While Not myRS.EOF        
        .Cells(LastR + 1, 1) = myRS.Fields(0)
        myRS.MoveNext
        LastR = LastR + 1
    Loop

End With

Set oConn = Nothing
Set myRS = Nothing

End Sub
收藏 分享

luhpro

帖子
835 
主題
6 
精華
0 
積分
915 
點名
16  
作業系統
Win 10,7 
軟體版本
2019,2013,2003 
閱讀權限
50 
性別
男 
註冊時間
2010-5-3 
最後登錄
2024-11-14 
2#
發表於 2013-6-22 05:18 | 只看該作者
回復 1# sasho

你資料庫中 binary 的資料內容若要顯示出來會是可見的文字嗎(即是 BIG5 <或 UTF-8> 編碼下可看到的文字)?

一般來說 Excel 的儲存格並不能把不可見文字顯示出來,
所以你可能需要藉由程式,
或是設個對照表之類的方式,
把 binary 的資料內容轉成我們想要看到的文字再放進儲存格內,
Excel 並不會在讀取 binary 資料時,
自動代換成 FF AB ... 或是 10010110 ... 之類的文字.

實作上你可以先將資料讀到 Variant 變數內,
再透過程式轉成你想要看到的文字.

TOP

        靜思自在 : 有心就有福，有願就有力，自造福田，自得福緣。
返回列表 上一主題