Загрузка данных

Тема в разделе "Lotus - Программирование", создана пользователем romanko, 7 сен 2011.

  1. romanko

    romanko Гость

    Подскажите как очистить содержимое файла и загрузить из переменной в него данные. Или как заменить содержимое файла на содержимое переменной?
     
  2. Omh

    Omh Lotus team
    Lotus team

    Регистрация:
    4 июл 2007
    Сообщения:
    2.210
    Симпатии:
    0
    romanko
    Я уже узнаю тебя по постановке вопроса ;)
     
  3. romanko

    romanko Гость

    Вот делаю вот так

    Open filepath For Output Access Write _
    As fileNum

    Открываю фал на запись. а как в него внести данные?Хотя бы в какую сторону рыть?
     
  4. nayke

    nayke Well-Known Member

    Регистрация:
    4 авг 2010
    Сообщения:
    310
    Симпатии:
    0
    Рыть? открой Domino Designer Help и в строке поиска забей Open fileName$
    получишь пример использования

    Код (Text):
    Dim fileNum As Integer, empNumber As Integer, I As Integer
    Dim fileName As String, empName As String
    Dim empLocation As Variant
    Dim empSalary As Currency
    fileNum% = FreeFile()
    fileName$ = "data.txt"
    ' Write out some employee data.
    Open fileName$ For Output As fileNum%
    Write #fileNum%, "Joe Smith", 123, "1 Rogers Street", _
    25000.99
    Write #fileNum%, "Jane Doe", 456, "Two Cambridge Center", _
    98525.66
    Write #fileNum%, "Jack Jones", 789, "Fourth Floor", 0
    Close fileNum%
    ' Read it all back and print it.
    Open fileName$ For Input As fileNum%
    For I% = 1 To 3
    Input #fileNum%, empName$, empNumber%, empLocation, _
    empSalary@
    Print empName$, empNumber%, empLocation, empSalary@
    Next I%
    Close fileNum%
    ' Output:
    ' LotusScript prints out the contents of the file
    ' C:\data.txt in groups of four values each. Each group
    ' consists of a String, an Integer, a Variant, and
    ' a Currency value, in that order.
     
  5. romanko

    romanko Гость

    делаю вот так как в примере но в файл ничего не заносится
    Тмр1 это переменная ранее заполненая данными
    Open filepath For Output As fileNum
    Write #fileNum, Tmp1
     
  6. lmike

    lmike нет, пердело совершенство
    Команда форума Lotus team

    Регистрация:
    27 авг 2008
    Сообщения:
    6.083
    Симпатии:
    300
    ОФФ: а чё, в форуме, выделить фразу и нажать "цитата" религия не позволяет?
    или поправить "испорченые" теги (руками)
     
  7. romanko

    romanko Гость

    А как загонять в файл построчно. я считываю с файла учитывая Chr(13) как теперь вгоняя в другой файл учитывать это?
     
  8. romanko

    romanko Гость

    И еще когда вот так
    Open fileName$ For Output As fileNum
    Write #fileNum, Tmp1
    записуешь в файл он создает его во временной папке как указать путь для создания файла??
     
  9. nayke

    nayke Well-Known Member

    Регистрация:
    4 авг 2010
    Сообщения:
    310
    Симпатии:
    0
    filename - путь к файлу. Если задашь 1.txt то файл будет создан/перезаписан в рабочей директории если c:\1.txt то по указанному пути.
     
  10. Omh

    Omh Lotus team
    Lotus team

    Регистрация:
    4 июл 2007
    Сообщения:
    2.210
    Симпатии:
    0
    Код (LotusScript):
    NotesssssStreeeaaaaam
     
Загрузка...

Поделиться этой страницей