OpenOffice. Чтение значений из текстового файла. #205702


#0 by MikleV
Сабж.. в конторе есть прайс., выгруженный в текстовый файл. Есть openoffice(calc) хочу: слабать макрос загрузки из файла в openoffice. чего не понимаю - не знаю этого языка. чего есть уже: sub Main dim document   as object dim dispatcher as object Dim N As variant document   =  ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") dispatcher.executeDispatch(document, ".uno:Open", "", 0, Array) - вот эта особенно интересует:) просьба помочь с кодом.
#1 by MikleV
+ эт конструктор сляпал.. тут чего..через api всё?
#2 by MikleV
up
#3 by MikleV
да млин.. неужели нихто с ним не работает..
#4 by LobS
А что в нем нет мастера импорта текстов как в Ёкселе?
#5 by Мяв-Мяв
это бейсик. странно что ты "этого языка не знаешь".
#6 by smaharbA
А что мои методы еще мало известны ? Вроде уже все должны знать как массив в ОО передать
#7 by smaharbA
+ извиняюсь, думал это в связке с 1С...
#8 by smaharbA
кстати в ОО безпроблем (если не *никс) можешь ОЛЕ пользовать, объекты что есть в ОС
#9 by MikleV
угу.попробую) а ты его знаешь?
#10 by Мяв-Мяв
бейсик? конечно. в нескольких диалектах.
#11 by MikleV
тогда напиши. как надо.)
#12 by Мяв-Мяв
так уже все написано. "открыть диалог выбора файла, открыть выбранный файл в новом фрейме, поиск не использовать, аргументы не передавать"
#13 by MikleV
тьху..да я прост потерялся..мне тамошний конструктор такую лажу выдал.. вот канает..вот так.. после написания ткнул в мануал нашёл там пример..блин.. sub Main Dim LineNo As Integer Dim StrFile As String Dim Path_File As String Path_File = "d: est.txt" LineNo = Freefile Open Path_File For Input As LineNo While not eof(LineNo) Line Input #LineNo, strFile Msgbox StrFile wend Close #LineNo end sub
#14 by MikleV
на чё спрашивается полдня убито..
Тэги:
Ответить:
Комментарии доступны только авторизированным пользователям

В этой группе 1С