Проблема с повторным открытием файла

NetAndrey · Post by **NetAndrey** » 2004-11-15 17:47:05

Вопрос в следующем: Как несколько раз открыть один и тот же фаил и считать с него данные? Делаю так:
sub Main()
var F=file("D:\Or0.dat")
.....
for i=0 to 5
F.open()
.....
Count=safe call F.ReadNumber()
.....
F.close()
next
endsub
Срабатывает только один круг, затем выдает ошибку, при повторном запуске той же функции не работает. Призодится заново выходить и входить в UO.

AGRS · Post by **AGRS** » 2004-11-15 18:11:04

Читай что в доке написано. После Close ты его уже не откроешь.

NetAndrey · Post by **NetAndrey** » 2004-11-15 18:17:08

AGRS wrote:Читай что в доке написано. После Close ты его уже не откроешь.

AGRS подскажи, а то у меня дока нет, я учился по чужим скриптам.
Что тогда делать-то. Как два раза открывать фаил?

Edred · Post by **Edred** » 2004-11-15 18:33:47

открывай его в какой-то процедуре, читай данные и закрывай. А из главного скрипта вызывай эту процедуру столько раз сколько тебе надо.

NetAndrey · Post by **NetAndrey** » 2004-11-15 18:37:57

Edred спасибо, сейчас попробую переписать.

AlexeyVorotnikov · Post by **AlexeyVorotnikov** » 2004-11-15 19:38:46

NetAndrey wrote:Что тогда делать-то. Как два раза открывать фаил?

Нужно просто каждый раз перед открытием писать F=file("D:\Or0.dat")

NetAndrey · Post by **NetAndrey** » 2004-11-18 19:26:42

AlexeyVorotnikov wrote:
NetAndrey wrote:Что тогда делать-то. Как два раза открывать фаил?

Нужно просто каждый раз перед открытием писать F=file("D:\Or0.dat")

Спасибо.