Запись текстового файла (по форуму искал)

[sukubba]

Ни как не получается создать текстовый файл.

ОС Win7 64-bit

Права для текущего пользователя на папку "MetaTrader - E-Global Trade & Finance Group" дал полные

Функция "TerminalPath()" возвращает адрес именно этой папки

Код следующий

   string DataNow = IntegerToString(Year(), 4)+IntegerToString(Month(), 2)+IntegerToString(Day(), 2)+IntegerToString(Hour(), 2)+IntegerToString(Minute(), 2)+IntegerToString(Seconds(), 2);
   FileHandle = FileOpen("Poisk.txt", FILE_BIN|FILE_READ|FILE_WRITE, "#");
   Comment(FileName + DataNow + ".txt");
   
   if(FileHandle<0) 
     { 
      Alert("Неудачная попытка открыть файл по абсолютному пути"); 
      Alert("Код ошибки ",GetLastError());
      Alert(FileName + DataNow + ".txt");
      return(INIT_FAILED); 
     }    
     else
     {
      FileWrite(FileHandle, DataNow);
     }

 Выполняется без ошибок, просто нет файла... Почему?? Что не так делаю?

[[Удален]]

Sukubba:   Ни как не получается создать текстовый файл.  Выполняется без ошибок, просто нет файла... Почему?? Что не так делаю?

Посмотрите по этой ссылке - поможет. Файл создается совершенно в другой папке.

[sukubba]

LRA:
Посмотрите по этой ссылке - поможет

Спасибо ошромное тема закрыта

[[Удален]]

Sukubba:  Спасибо ошромное тема закрыта

А что сделали скажите в этой теме или в той, может кому интересно...           Кстати, вместо трех подряд стоящих Alert

      Alert("Неудачная попытка открыть файл по абсолютному пути"); 
      Alert("Код ошибки ",GetLastError());
      Alert(FileName + DataNow + ".txt");

можно обойтись одним. А для перехода на новую строку использовать "\n". Попробуйте...

      Alert("Ошибка открытия файла\nКод ошибки ",GetLastError(),"\n", FileName + DataNow + ".txt");