powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / а на фига в character set (0-127) повторяющиеся символы?
9 сообщений из 9, страница 1 из 1
а на фига в character set (0-127) повторяющиеся символы?
    #34616023
evgenius_b
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Интересуют некие символы 0 - 7, 11 - 12, 14-31, 127?

Ситуация: если исходный файл (что-то типа xml) открывать в notepad, то эти символы выглядят так, как они нарисованы в character set и данные расположены в одной строке.
Если сделать Файл/Открыть с помощью/ Excel, то файл откроется построчно.
Если я пытаюсь из VBA открыть исходный файл командой Line Input #, то файл открывается в одну строку, а хотелось бы в несколько (по количеству одного из тех неких символов).

Подскажите, полжалуйста, как преобразовать xml в txt с нормальным символом перевода строки?
Метод XmlImport URL не годится, так как исходная база бывает > 65000 "строк".

Как узнать код моего символа?

Может вручную, как-нить можно заменить? Только я не знаю как в notepad указать "перевод строки".

Спасибо.
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34616028
Фотография Mr Marmelad
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это о загрузке данных в SQL вопрос или так - в общем? Если о загрузке - то наиболее простой вариант - посмотреть DTS (SQL server 2K) или SSIS (2K5) для этих целей.
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34616037
evgenius_b
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сори, не указал, что желательно решить задачу силами VBA Excel.

А нужно - отфильровать исходный файл по полю.
Пример для VBA, который фильтрует txt - есть.
Но работает он, если txt разбит на строки.

А мой файл - если и разбит, то каким-то хитрым символом.
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34616119
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
а нельзя, хоть одним глазком, взглянуть на файл ;)
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34618586
evgenius_b
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
:)
понимаю Ваш юмор.

Вот начало эпопеи:
http://sql.ru/forum/actualthread.aspx?tid=441963

Но там чет заглохло.
А дело-то, может быть, за какой-нить мелочью встало.


Меня вот какие мысли одолевают:

Эти символы в справке VBA Excel помечены как "These characters are not supported by MS Windows".

Когда открываю файл в notepad - это одна строка и видны эти "not supported" в виде квадратов.
Когда открываю в BRED (текстовый редактор), то файл представлен построчно, символов не вижу.

Вопрос: хрен с ней, с автоматизацией, посоветуйте люди в каком редакторе эти символы можно заменить на понимаемые символы перевода строки?

Ну а если это удастся, то использовать Line Input #, который предназначен для считывания построчно, не составит труда.

Есть ли мысли?
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34618674
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
не получается скачать файл. выложи еще разок или пришли на email
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34618700
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
особенности твоего файла:
a) unicode т.е. по два байта на символ
b) разрыв строки через LF, а не через CRLF

разбить его на строки в VBA можно так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
Sub test()
Dim TextLine
Dim MyLines() As String
Dim WholeText As String
Dim LineIndex As Long

    Open "BaseConfig.zip" For Input As # 1 
    
    WholeText = ""
    
    Do While Not EOF( 1 )
        WholeText = WholeText & Input( 1 , # 1 )
    Loop
    
    Close # 1 
    
    MyLines = Split(WholeText, vbLf)

    For LineIndex = LBound(MyLines) To UBound(MyLines)
        Debug.Print MyLines(LineIndex)
    Next LineIndex
    
End Sub
надеюсь, что ответы на свои вопросы в коде найдешь, если есть еще вопросы, пиши
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34618708
evgenius_b
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
О-о-о !
Мне б так уметь ... :)

Пошел разбираться.
Пасиб.

А как узнали, что это LF?
...
Рейтинг: 0 / 0
а на фига в character set (0-127) повторяющиеся символы?
    #34618718
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
пожалуйста, это почти все из help :) evgenius_bА как узнали, что это LF?посмотри в текстовом редакторе, который может в 16-ричной системе, в том же FAR или UltraEdit.
LF имеет hex код 0A, а CR - 0D
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / а на фига в character set (0-127) повторяющиеся символы?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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