Как сохранить Excel файл в .DBF 4 в Windows кодировке?

Программирование на Visual Basic for Applications
Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Как сохранить Excel файл в .DBF 4 в Windows кодировке?

Сообщение Vitaly1 » 23.09.2003 (Вт) 17:34

Через опцию сохранить как, файл Excel можно сохранить в формате dBASE, но кодировка текста досовская(866). Можно ли каким либо образом сохранять формате dBASE в Windows кодировке(1251) :?:



п.с.
А то,не хочется перекодировать файл чере FoxPro!

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 23.09.2003 (Вт) 17:47

Ну насколько мне паямть не изменяет - у метода SaveAs есть параметр кодовой страницы....

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 24.09.2003 (Ср) 14:35

RayShade - зарание спасибо, будем копать :)

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 26.09.2003 (Пт) 11:40

Ну насколько мне паямть не изменяет - у метода SaveAs есть параметр кодовой страницы....

Увы, хотя и есть параметр TextCodePage, но Saveas на него плюет, в Excel это еще не доделали, хотя в хелпе и говорится, что не в англиской версии она работает, увы. :cry:

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 27.09.2003 (Сб) 7:49

Яндекс меня на дельфийно-сишный форум выкинул, там такое повествуется:

XLWorkbook->SaveAs(WideString(dlgOpen->FileName),
xlWorkbookNormal,
"",
"",
false,
false,
xlExclusive,
xlUserResolution,
false,
WideString("1251"),
0,
XLApp); // XLApp - имя ExcelApplication

Долго думал, что есть WideString("1251"). Пытался просто 1251 писать, пытался строкой, пытался strconv в юникод, из юникода. Один хрен 866 получается.
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: SemrushBot и гости: 85

    TopList