Проблема с копированием файлов... помогите пожалуйста

← →
Brenton © (2003-10-28 04:52) [0]

У меня есть следующий код для копирования файла:
ToDir:="o:\Arc\"+DateToStr(Date); ForceDirectories(ToDir); fromdir:="o:\"; StrPCopy(FromDirp,FromDir+"\OCM.db"); StrPCopy(ToDirp,ToDir+"\OCM.db"); CopyFile(Fromdirp,todirp,false);
На одной машине (на которой пишу, ос - WinXP) это работает, а на другой (Win98) - создает только каталоги, а файлы копировать не хочет. Никаких сообщений об ошибках не выдает. Диск o:\ - это сетевой диск, права доступа полные с обеих машин.
Подскажите в чем может быть проблема.

← →
Anatoly Podgoretsky © (2003-10-28 09:22) [1]

Какая ошибка при этом возникает

← →
dataMaster © (2003-10-28 09:41) [2]

Кажется, в строке StrPCopy(FromDirp,FromDir+"\OCM.db"); слеш лишний.

← →
Anatoly Podgoretsky © (2003-10-28 09:59) [3]

Это да, но дело в другом, почему не обрабатывает ошибки? Самоуверенный? А если обрабатывает, то почему утаивает информацию.

← →
Brenton © (2003-10-28 10:03) [4]

Никаких ошибок не выдает, НИКАКИХ!!! и слэш там не лишний

← →
Anatoly Podgoretsky © (2003-10-28 10:06) [5]

Приведи значение, а то не совсем верится или просто приведи остаток кода после CopyFile(Fromdirp,todirp,false); с анализом ошибки, чтобы тебе можно было доверять, пока доверия нет.

The CopyFile function copies an existing file to a new file.

BOOL CopyFile( LPCTSTR lpExistingFileName, // pointer to name of an existing file LPCTSTR lpNewFileName, // pointer to filename to copy to BOOL bFailIfExists // flag for operation if file exists );
Return Values

If the function succeeds, the return value is nonzero.
If the function fails, the return value is zero. To get extended error information, call GetLastError.
Сама она тебе об ошибке не скажет :))), скажет GetLastError

это я уже сам нашел, по англицки читать умею... :))

Проблема с копированием файлов... помогите пожалуйста Найти похожие ветки