Сохранение файла в файловой системе сервера

@zum · Регистрация: 21.03.2016

Студворк — интернет-сервис помощи студентам

Собственно как это сделать?
У меня идея одна, заатачить файл к документу,запустить агента на сервере, который этот атач снимет и файл положит в папку какую надо....

Но не хочется писать агента для такой ерунды.

Может есть другое простое решение?

@tmyky · 23.06.2010, 17:25

может просто WebDav ?
http://www.codestore.net/store.nsf/unid/FI...N7?OpenDocument

@zum · 23.06.2010, 18:08

поднимать на сервере его не есть гуд...
программно может какнить?

@tmyky · 23.06.2010, 18:57

Сообщение от zum

программно может какнить?

секундочку, а это что:

Сообщение от zum

Но не хочется писать агента для такой ерунды.

Может есть другое простое решение?

- явное противоречие ;) не?

@zum · 25.06.2010, 16:34

просто, есть например возможность запустить агента на сервере, думал чтото такое, но без агента, видимо никак)
Лана агент так агент

@omomymous · 20.11.2012, 10:49

Написал код, он выгружает данные в файл txt. Мне надо выгрузить его на сервер, задав путь к серверу, путь к папке. Filecopy "c:\notesaltas.txt", "\\ip-к сервера\D:\notesaltas.txt" не помогло, он матерится "File not found".
Пробую

Dim filenames As String
filenames = ws.SaveFileDialog( _
False,"File name",, "\\ip-к сервера\d:\work", "notesaltas.txt")

Но он, к сожалению, предложил лишь локальные папки.
Можно ли вообще Лотусскриптом выгрузить файл на сервер?

@ныш · 20.11.2012, 11:17

\ip-к сервера\d:\work

D: не прокатит, нужен путь к шаре (например, D$). И, возможно, надо будет авторизоваться для доступа к ней.

@omomymous · 20.11.2012, 11:24

И это пробовал
ws.SaveFileDialog( _
False,"File name",, "\\IP сервера\D$", "notesaltas.txt")
Не просит авторизоваться, все мне локальные диски открывает

@dymot · 20.11.2012, 11:27

Anonimous
А если подключить сетевую папку как диск?

@omomymous · 20.11.2012, 13:30

Тогда дал сохранить. Спасибо

@VtodSh · 20.11.2012, 15:43

Anonimous
Способ прямого сохранения на сервер - это, на самом деле, через задницу.
С сервером надо общаться через агентов. Создаём док, вкладываем файл, запускаем агент с помощью RunOnServer и передаём параметром noteId созданного документа, а в агенте пишем код, сохраняющий файл на диск /для работы с файловой системой уровень доступа агента должен быть = 2/.

@omomymous · 04.12.2012, 11:48

А так не получилось. Я создал агента, к-рый выполняется на сервере. Во вьюхе сделал кнопку, в к-рой создается документ, передаваемый агенту.
В поле этого документа записываю путь к файлу, к-рый хочу создать на известном сервере так:

docCur.ReplaceItemValue "FileName", "\\IP-сервера\d$\EquipmentInfo.txt"

потом вызываю агент

agent.RunOnServer(docCur.NoteID)

В самом агенте следующий код

Dim docCur As NotesDocument
Set docCur = session.CurrentDatabase.GetDocumentByID( session.CurrentAgent.ParameterDocID)

If docCur Is Nothyng Then Exit Sub

fileNum% = FreeFile()
fileName$ =docCur.Getitemvalue("FileName")(0)

Open fileName$ For Output As fileNum%

И код какой был.

Файл не создался.
Код агента работает, проверял на стороне клиента. Про уровни безопасности агента не забыл, дал сразу третий.

@omomymous · 04.12.2012, 12:25

Нет, понял. Забыл в агенте убрать UI объекты :lol: . Работает. Спасибо

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	Установка Emscripten SDK (emsdk) и CMake на Windows для сборки C и C++ приложений в WebAssembly (Wasm) 8Observer8 30.01.2026 Чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. Система контроля версиями Git. . .	Подключение Box2D v3 к SDL3 для Android: физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .

@zum 0 / 0 / 0 Регистрация: 21.03.2016 Сообщений: 3

	Сохранение файла в файловой системе сервера 23.06.2010, 17:08. Показов 19351. Ответов 12 Метки нет (Все метки) Собственно как это сделать? У меня идея одна, заатачить файл к документу,запустить агента на сервере, который этот атач снимет и файл положит в папку какую надо.... Но не хочется писать агента для такой ерунды. Может есть другое простое решение? 0

@tmyky 0 / 0 / 0 Регистрация: 23.08.2008 Сообщений: 6,252
	23.06.2010, 17:25
	может просто WebDav ? http://www.codestore.net/store.nsf/unid/FI...N7?OpenDocument 0

@zum 0 / 0 / 0 Регистрация: 21.03.2016 Сообщений: 3
	23.06.2010, 18:08
	поднимать на сервере его не есть гуд... программно может какнить? 0

@zum 0 / 0 / 0 Регистрация: 21.03.2016 Сообщений: 3
	25.06.2010, 16:34
	просто, есть например возможность запустить агента на сервере, думал чтото такое, но без агента, видимо никак) Лана агент так агент 0

@omomymous 0 / 0 / 0 Регистрация: 11.06.2012 Сообщений: 118
	20.11.2012, 10:49
	Написал код, он выгружает данные в файл txt. Мне надо выгрузить его на сервер, задав путь к серверу, путь к папке. Filecopy "c:\notesaltas.txt", "\\ip-к сервера\D:\notesaltas.txt" не помогло, он матерится "File not found". Пробую Dim filenames As String filenames = ws.SaveFileDialog( _ False,"File name",, "\\ip-к сервера\d:\work", "notesaltas.txt") Но он, к сожалению, предложил лишь локальные папки. Можно ли вообще Лотусскриптом выгрузить файл на сервер? 0

@omomymous 0 / 0 / 0 Регистрация: 11.06.2012 Сообщений: 118
	20.11.2012, 11:24
	И это пробовал ws.SaveFileDialog( _ False,"File name",, "\\IP сервера\D$", "notesaltas.txt") Не просит авторизоваться, все мне локальные диски открывает 0

@dymot 0 / 0 / 0 Регистрация: 17.10.2008 Сообщений: 506
	20.11.2012, 11:27
	Anonimous А если подключить сетевую папку как диск? 0

@omomymous 0 / 0 / 0 Регистрация: 11.06.2012 Сообщений: 118
	20.11.2012, 13:30
	Тогда дал сохранить. Спасибо 0

@VtodSh 1 / 1 / 0 Регистрация: 07.12.2009 Сообщений: 1,197
	20.11.2012, 15:43
	Anonimous Способ прямого сохранения на сервер - это, на самом деле, через задницу. С сервером надо общаться через агентов. Создаём док, вкладываем файл, запускаем агент с помощью RunOnServer и передаём параметром noteId созданного документа, а в агенте пишем код, сохраняющий файл на диск /для работы с файловой системой уровень доступа агента должен быть = 2/. 0

@omomymous 0 / 0 / 0 Регистрация: 11.06.2012 Сообщений: 118
	04.12.2012, 11:48
	А так не получилось. Я создал агента, к-рый выполняется на сервере. Во вьюхе сделал кнопку, в к-рой создается документ, передаваемый агенту. В поле этого документа записываю путь к файлу, к-рый хочу создать на известном сервере так: docCur.ReplaceItemValue "FileName", "\\IP-сервера\d$\EquipmentInfo.txt" потом вызываю агент agent.RunOnServer(docCur.NoteID) В самом агенте следующий код Dim docCur As NotesDocument Set docCur = session.CurrentDatabase.GetDocumentByID( session.CurrentAgent.ParameterDocID) If docCur Is Nothyng Then Exit Sub fileNum% = FreeFile() fileName$ =docCur.Getitemvalue("FileName")(0) Open fileName$ For Output As fileNum% И код какой был. Файл не создался. Код агента работает, проверял на стороне клиента. Про уровни безопасности агента не забыл, дал сразу третий. 0

@omomymous 0 / 0 / 0 Регистрация: 11.06.2012 Сообщений: 118
	04.12.2012, 12:25
	Нет, понял. Забыл в агенте убрать UI объекты :lol: . Работает. Спасибо 0