VBNet - Форум

Вопрос: ASCII Добавлено: 24.06.04 16:17

Автор вопроса: Seregahome

Есть 1.txt со следующим содержанием -
111,333,Слово,222,
444,2222,Слово2,, и т.д.

Пишу примерно следующее (как подсказал SNE):

dim nf as integer, tStr as string, sArr() as string
open lpFileName for binary access read lock write as nf
    tStr = Space(LOF(nf))
    get nf, ,tStr
close nf
sArr = split(tStr, ",")
for nf = 0 to ubound(sArr)
    Adodc1.Recordset.AddNew
    Adodc1.Recordset.Fields(0) = sArr(nf)
next

на выходе всё записывается в один столбец, т.е. нет разбивки по столбцам, но данные по запятым разделяет. Что делать?
Ответить

Ответы Всего ответов: 5

Номер ответа: 1 Автор ответа: Gloom Вопросов: 0 Ответов: 36	Профиль \| \| #1	Добавлено: 24.06.04 16:23
	Adodc1.Recordset.Fields(nf) = sArr(nf) Ответить

Номер ответа: 2 Автор ответа: Seregahome Вопросов: 39 Ответов: 24	Профиль \| \| #2	Добавлено: 24.06.04 20:51
	Всё отлично, только теперь прога пытается весь массив записать в одну строку, правда на поля разбивает. Все значения, которые должны быть в первом столбце, помечены какими-то "ЖЖ". Что делать? Ответить

Номер ответа: 3 Автор ответа: Seregahome Вопросов: 39 Ответов: 24	Профиль \| \| #3	Добавлено: 24.06.04 20:53
	Т.е. нет перехода на новую строку. Ответить

Номер ответа: 4 Автор ответа: Gloom Вопросов: 0 Ответов: 36	Профиль \| \| #4	Добавлено: 25.06.04 14:04
	Проверяй наличие перевода строки в элементе массива и добавляй в этом случае новую запись в рекордсет. Или читай файл построчно... Ответить

Номер ответа: 5 Автор ответа: Seregahome Вопросов: 39 Ответов: 24	Профиль \| \| #5	Добавлено: 25.06.04 16:43
	А как? Ответить

Страница: 1 |