5. Dezember 2011 12:50
IF ISCLEAR(FileObject) THEN
CREATE(FileObject, TRUE, TRUE);
Ext := FileObject.GetExtensionName(ClientFilePath);
ClientTempFilePath := ClientTempFileName('',Ext);
ClientTempFile := FileObject.GetFileName(ClientTempFilePath);
//message('clienttemp: %1 ;;;;; clientfile %2',Clienttempfilepath,clientfilepath);
//FileObject.CopyFile(ClientFilePath,ClientTempFilePath,TRUE);
ServerFilePath := ServerTempFileName('',Ext);
//message(serverfilepath);
Status := UPLOAD('',Magicpath,'',ClientTempFile,ServerFilePath);
Status := UPLOAD('',Magicpath,'',ClientFilepath,ServerFilePath);
EXIT(Status);
CLEAR(PathServerTemp);
SilentUpload(Name,PathServerTemp);
ImageFile.OPEN(PathServerTemp);
ImageFile.CREATEINSTREAM(NVInStream);
BLOBRef.Blob.CREATEOUTSTREAM(NVOutStream);
COPYSTREAM(NVOutStream,NVInStream);
EXIT(Name);
5. Dezember 2011 12:58
kyrios hat geschrieben:Kann das vil. wirklich an der fehlenden Berechtigung liegen?
5. Dezember 2011 13:31
Natalie hat geschrieben:CTL_E_FILENOTFOUND sagt ja schon, dass die zu kopierende Datei nicht gefunden werden kann.
Entweder, die Datei liegt nicht genau an der Stelle und/oder unter dem Namen, den du spezifiziert hast, oder du hast keine Leseberechtigungen auf dieses Verzeichnis.
5. Dezember 2011 15:17
FileObject.CreateFolder('C:\tmp');
ServerFilePath := 'C:\tmp';
5. Dezember 2011 16:40