VPF::[RealBasic(MacOsX)] + MySQL Кодировка! - Форум программистов

nemisha

Дата 14.6.2011, 15:28 (ссылка)

(нет голосов)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 2
Регистрация: 20.1.2008

Репутация: нет
Всего: нет

Прошу подсказки.

Исходные данные:
RealBasic (Mac OS)
MySQL (из под MAMP)

уже всю голову сломал насчет кодировок. Постоянно крякозябры.

MySQL настроен на UTF8, RB передает строки хз в чем (декодер Лебедева говорит что CP1252)
Пробовал все возможные варинаты Convertencoding, ничего не помогает. Ни в одну ни в другую сторону

Пример Кода:

1) "Чтение, выгрузка из БД в Листбокс"

Код


  listbox1.DeleteAllRows  // Очищаем листбокс
  
  // Заново заполняем листбокс
  dim dr as new DatabaseRecord
  dim sql as string
  
  sql="select ID,Name,phone from phonebook"
  
  dim rs as RecordSet = TestRb.SQLSelect(sql)
  
  while not rs.EOF
    listbox1.AddRow(rs.Field("ID").value)
    listbox1.Cell(listbox1.LastIndex,1) = rs.Field("Name").StringValue
    listbox1.Cell(listbox1.LastIndex,2) = rs.Field("phone").StringValue
    rs.MoveNext
  wend
  
  rs.Close
  //Листбокс заполнен

2) "Запись в БД"

Код


  dim dr As new DatabaseRecord
  
  dr.Column("ID")=trim(id_box.text)
  dr.Column("name")=trim(name_box.text)
  dr.Column("phone")=trim(phone_box.text)
  
  TestRb.InsertRecord "phonebook", dr
  TestRb.Commit
  
  textfield1.text=trim(name_box.text)

Это сообщение отредактировал(а) nemisha - 14.6.2011, 17:43

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »