Hello Peter,
I applied patch and run a test. It generates error 'No database selected' for linked
tables and vb connections:
---------- Test ran:
Private Sub test()
Dim con As New ADODB.Connection, rs As ADODB.Recordset
con.Open "DRIVER={MySQL ODBC 3.51
Driver};DESC=;DB=test;SERVER=xx.xx.xx.xx;UID=test;PASSWORD=;PORT=3306;SOCKET=;OPTION=2050;STMT=set
time_zone='-5:00';"
Set rs = con.Execute("SELECT count(*) from test")
Debug.Print "Test records: "; rs.Fields(0).Value
rs.Close
con.Close
Set rs = Nothing
End Sub
----------- Error produced:
Run-time error '-2147467259 (80004005)': No database selected
------------ Server info:
mysql> \s
--------------
mysql Ver 14.7 Distrib 4.1.8, for Win95/Win98 (i32)
Connection id: 11009
Current database: test
Current user: root@stripped
SSL: Not in use
Using delimiter: ;
Server version: 4.1.8-standard-log
Protocol version: 10
Connection: xxxxxx via TCP/IP
Server characterset: latin1
Db characterset: utf8
Client characterset: utf8
Conn. characterset: latin1
TCP port: 3306
Uptime: 18 days 12 hours 46 min 9 sec
Threads: 4 Questions: 217501 Slow queries: 26 Opens: 113 Flush tables: 3 Open tables:
62 Queries per second avg: 0.136
------------------ Table:
mysql> select * from test;
+----+------+---------------------+
| id | test | time_stamp |
+----+------+---------------------+
| 4 | A | 2005-01-10 18:48:21 |
| 5 | B | 2005-01-10 18:48:21 |
| 6 | A | 2005-01-10 18:48:49 |
| 7 | B | 2005-01-10 18:48:49 |
| 8 | 1 | 2005-01-11 17:26:46 |
| 9 | 2 | 2005-01-11 17:26:46 |
+----+------+---------------------+
6 rows in set (0.09 sec)
------------------- OS:
OS Name Microsoft Windows XP Professional
Version 5.1.2600 Service Pack 2 Build 2600
Thanks!
Artem
Attention:
Any views expressed in this message are those of the individual sender, except where the
message states otherwise and the sender is authorized to state them to be the views of
any such entity. The information contained in this message and or attachments is intended
only for the person or entity to which it is addressed and may contain confidential and/or
privileged material. If you received this in error, please contact the sender and delete
the material from any system and destroy any copies.
