Quantcast
Channel: Atozed Forums - All Forums
Viewing all articles
Browse latest Browse all 268

IW 15.5.10 Sendfile

$
0
0
Hi,

After installing Delphi 12 Version 29.0.51511.6924 and IW 15.5.10


I has written a csv file like this: 
  { Create file }
  xFileName:=UserSession.UserId + '_1' + ExtractFileName('SaveAs') + '.csv';
  xPath:=gServerController.ContentPath  + 'Files\XIBFiles\' + xFileName;
  UserSession.ViewThisFile:=xPath;
  DeleteFile(UserSession.ViewThisFile);
  ZnfStreamW := TStreamWriter.Create(UserSession.ViewThisFile, False, TEncoding.Default);

.....
.....
.....

      ZnfStreamW.WriteLine(Line);
      dm.FDQrySaveAs.Next;
    end;
    dm.FDQrySaveAs.Close;
    WebApplication.SendFile(UserSession.ViewThisFile, False, '', ExtractFileName(UserSession.ViewThisFile));
  finally
    FreeAndNil(ZnfStreamW);    { Close and Free the writer }
  end;

This has worked perfectly before, but now the file is mysterious converted to a html fil

&t!DOCTYPE HTML&t
&thtml lang="en"&t
&thead&t
&tmeta charset="utf-8"&t
&ttitle&tXIB - Web Watch Dog: WWD (OpusCapita Solutions)&t/title&t
&tmeta name="generator" content="IntraWeb v15.5.10 Serial 202440434"&t



&tlink href="/wwd/isapixibwwd.dll/$/css/IWBase__2933165573.css" rel="stylesheet"&t
&tscript nonce="yIJCVKoI+fDI9a5EoWWulrCEZwY"&t
var GURLBase="/wwd/isapixibwwd.dll/$/", GAppID="AeUrkFJfeLMC7BviU77qNcKmFGq", GTrackID=12
function doOnReady(f){
  var d = document
  if (d.readyState!="loading") f()
  else if (d.addEventListener) d.addEventListener("DOMContentLoaded", f)
  else d.attachEvent("onreadystatechange", function(){if (d.readyState=="complete") f()
}
&t/script&t
&tscript src="/wwd/isapixibwwd.dll/$/js/IWLib__1925002372.js"&t&t/script&t
&tscript src="/wwd/isapixibwwd.dll/$/js/IWBase__702901585.js"&t&t/script&t
&tscript src="/wwd/isapixibwwd.dll/$/js/IWGecko__3425527816.js"&t&t/script&t
&tscript nonce="yIJCVKoI+fDI9a5EoWWulrCEZwY"&t

Viewing all articles
Browse latest Browse all 268

Trending Articles