Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как перекодировать файл в UTF8 / 13 сообщений из 13, страница 1 из 1
12.04.2009, 17:59
    #35927021
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Есть исходных файл XML в хз какой кодировке. VB его считывать с помощью XML DOM категорически отказывается, не видит данных.
При этом, если пересохранить этот же файл через Notepad в UTF8 все прекрасно читается.
Вопрос:
Как прочитать файл целиком (в виде текстового) и сохранить в кодировке UTF8, чтобы потом скормить XML DOM
strConv не помогает.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.04.2009, 08:37
    #35927451
vkodor
vkodor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
xcode
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.04.2009, 12:27
    #35928003
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Не помогает. Не поддерживает UTF8. Только cp866, cp1251. koi8-r, iso8859-5, mac
Хотя програмулина полезная. Спасибо. С ее помощью удалось вычислить что исходная кодировка XML-ки таки cp2151.
Таким образом задача конкретизировалась. Необходимо перекодировать XML-ку из cp2151 в UTF8 как обычный тексовый файл.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.04.2009, 12:29
    #35928010
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
штирлицем пробовал?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
13.04.2009, 16:05
    #35928380
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Штирлицем пробовал. Однако, Штирлиц - не выход.
Перекодировка должна происходить автоматически, при чтении XML-ки в программу. То есть, средствами VB. Ибо файлов XML много, и перекодировать их все руками - не выход.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.04.2009, 11:04
    #35929935
piterblinov
piterblinov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
        Dim v As System.Windows.Forms.DialogResult = OFD.ShowDialog
        Dim sr As IO.StreamReader
        If v = Windows.Forms.DialogResult.OK Then
            nF = OFD.FileName
            Dim en As System.Text.Encoding
            en = Encoding.UTF8
            sr = My.Computer.FileSystem.OpenTextFileReader(nF, en)
            Dim sw As IO.StreamWriter = My.Computer.FileSystem.OpenTextFileWriter(nF & "-8", False)
Гыы в VB.NET далее читаешь и пишешь.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.04.2009, 12:53
    #35930413
Antonariy
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
ADODB.Stream
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.04.2009, 16:20
    #35931152
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Самое смешное что пробовал и его.
Avira Antivir кусок кода с ним приняла за вирус и заблокировала проект :)
Вот этот кусок
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
   Dim adoStream As adodb.Stream
   Dim adoStreamOut As adodb.Stream
       Set adoStream = New adodb.Stream
       adoStream.Charset = "Windows-1251"
       adoStream.Open
       adoStream.LoadFromFile XMLFilePath
       adoStream.Position =  0 
       Set adoStreamOut = New adodb.Stream
       adoStreamOut.Charset = "UTF-8"
       adoStreamOut.Open
       adoStreamOut.WriteText adoStream.ReadText
       adoStreamOut.SaveToFile App.Path & "\out.xml", adSaveCreateOverWrite
       adoStreamOut.Close'
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.04.2009, 15:28
    #35936438
Роман Шевченко
Роман Шевченко
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Проблема решилась путем подключения к проекту библиотеки MSXML 6.0 и обязательной вставкой первой строкой XML строки вида
Код: plaintext
<?xml version=' 1 . 0 ' encoding='Windows- 1251 '?
Теперь затягивает в 1251 без проблем
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Период между сообщениями больше года.
30.07.2010, 07:00
    #36767559
DFilushin
DFilushin
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Но такой метод добавляет в начало файла 0xEF, 0xBB, 0xBF
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.07.2010, 17:58
    #36769071
Hugo121
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
А так попробовать: http://forum.script-coding.info/viewtopic.php?id=3929
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
01.08.2010, 16:33
    #36770092
Дмитрий77
Дмитрий77
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Роман ШевченкоAvira Antivir кусок кода с ним приняла за вирус и заблокировала проект :)
Самые злобные вирусы это антивирусы. Вирусы мерещутся везде и во всем (а как же не будет вирусов, нечего будет лечить, думаю у любого Касперского есть еще "особый отдел", кот. эти вирусы пишет и распространяет, игра такая). Авира в этом плане преуспела.
Пишешь на virus@avira.com , прикладываешь свой "вирус" и обкладываешь их матюгами с клятвенным обещанием рекомендовать везде и всем Касперского. Вопрос решается в течении суток с очередным обновлением и извинениями с их стороны.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
30.09.2010, 12:27
    #36874151
DFilushin
DFilushin
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как перекодировать файл в UTF8
Hugo121А так попробовать: http://forum.script-coding.info/viewtopic.php?id=3929

Спасибо огромное, заработал такой вариант.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как перекодировать файл в UTF8 / 13 сообщений из 13, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]