In vba.I got data from MySQL with ADO.
ADO judged one text field as "adVarBinary" and return the array of binary code.
But I wanted "string" value.
So I converted this data to string with the below way.
- code ----------------------
If ADODB.adVarBinary = objField.Type Then
vValue = StrConv(objField.value, vbUnicode)
Else
vValue = tmpObjField.value
End If
---------------------
I got wanted value.
0 件のコメント:
コメントを投稿