- Код: Выделить всё
 Set rs1 = MySQL_Execute("SHOW COLUMNS FROM `" + cbTables.Text + "`;")
где
- Код: Выделить всё
 Public Function MySQL_Execute(strSQL As String) As Recordset
 Set MySQL_Execute = conn.Execute(strSQL)
 End Function
И вместо нормального ответа как при SHOW TABLES; приходят знаки вопроса(хотя названия колонок английские).
Пробовал сделать
- Код: Выделить всё
 MySQL_Execute "SET NAMES 'cp1251' ;"
 MySQL_Execute "SET CHARACTER SET 'cp1251' ;"
 MySQL_Execute "SET collation_connection='cp1251_general_ci';"
 MySQL_Execute "SET collation_server='cp1251_general_ci';"
 MySQL_Execute "SET character_set_client='cp1251';"
 MySQL_Execute "SET character_set_connection='cp1251';"
 MySQL_Execute "SET character_set_results='cp1251';"
 MySQL_Execute "SET character_set_server='cp1251';"
перед запросом, не помогло. Собственно вопрос: Как сделать чтобы ответ приходил в нормальном читаемом виде?





