Page 1 of 1

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

Posted: 2004-11-15 17:47:05
by NetAndrey
Вопрос в следующем: Как несколько раз открыть один и тот же фаил и считать с него данные? Делаю так:
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.

Posted: 2004-11-15 18:11:04
by AGRS
Читай что в доке написано. После Close ты его уже не откроешь.

Posted: 2004-11-15 18:17:08
by NetAndrey
AGRS wrote:Читай что в доке написано. После Close ты его уже не откроешь.

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

Posted: 2004-11-15 18:33:47
by Edred
открывай его в какой-то процедуре, читай данные и закрывай. А из главного скрипта вызывай эту процедуру столько раз сколько тебе надо.

Posted: 2004-11-15 18:37:57
by NetAndrey
Edred спасибо, сейчас попробую переписать.

Posted: 2004-11-15 19:38:46
by AlexeyVorotnikov
NetAndrey wrote:Что тогда делать-то. Как два раза открывать фаил?

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

Posted: 2004-11-18 19:26:42
by NetAndrey
AlexeyVorotnikov wrote:
NetAndrey wrote:Что тогда делать-то. Как два раза открывать фаил?

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

Спасибо. :)