Поле чтения ODBC меняет его на Null Excel VBA ⇐ MySql

[Anonymous]

summary;
В первый раз, когда я прочитал поле данных, я получаю 0 , каждый раз после того, что в том же поле записи читается NULL . Это меняется, если я отлаживаю, пройдя и смотрю значения в местных жителях/списке наблюдения, я получаю null каждый раз. Я использую последний драйвер, который я загрузил и установил с dev.mysql.com/downloads/connector/odbc
Вот поля таблицы и первое пример ряд:


/> meta_id < /th>
post_id < /th>
meta_key < /th>
meta_value < /th>
< /tr>
< /theade>





< /br />

< /br />

/> bigint unsigned
bigint unsigned
varchar



Установите:
Binary
Binary
utf8mb4
utf8mb4
utf8mb4
utf8mb4
utf8mb4
utf8mb4
utf8mb4 />
First Row: < /strong> < /td>
21875 < /td>
100 < /td>
total_sales < /td>
0 < /td>
< /tr>

0 < /td>
< /tr>
/> < /table> < /div>

Код: Выделить всё

Sub test()
Const sConnection As String = _
"DRIVER={MySQL ODBC 9.2 Unicode Driver};" & _
"SERVER=127.0.0.1;" & _
"DATABASE=wp_woocommercedb;" & _
"USER=root;" & _
"PASSWORD=CorporateAnxiety;" & _
"CharSet=utf8;"
Const sSQLQuery = "SELECT * FROM `wp_postmeta` WHERE `post_id` = '100';"

Dim conn As New ADODB.Connection
conn.Open sConnection

Dim rs As New ADODB.Recordset
rs.Open sSQLQuery, conn

Debug.Print rs.Fields("meta_id")
Debug.Print rs.Fields("meta_value")
Debug.Print rs.Fields("meta_id")
Debug.Print rs.Fields("meta_value")

rs.Close
Set rs = Nothing
conn.Close
Set conn = Nothing
End Sub
< /code>
Это то, что он печатает, если я просто запускаю: < /p>
 21875
0
21875
Null

Я оценил Rs.fields ("meta_value") , чтобы вернуть 0 каждый раз, поэтому я начал качаться в окне «Часы/местные жители». Но когда я прошу, глядя на это, я получаю: < /p>

Код: Выделить всё

 21875
Null
21875
Null

Я включил скриншоты изменения значения, потому что это просто причудливое


Подробнее здесь: https://stackoverflow.com/questions/795 ... -excel-vba