Table of Content
HAL Forum
procedure WebSetContentDisposition (
string string)
Description:
Sets the way that a part of the web content is delivered to the user.
Parameters:
string String that defines the delivery method
global
procedure SendAttachedFile(record Attach2Vc Attachr,boolean downloadf)
begin
  string 255 ext;
  
  if (Attachr.SerNr>0) then begin
    ext = GetFileExtension(Attachr.FileName);
    
    SetContentTypeForExtension(ext);
    
    if (downloadf) then begin
      WebSetContentDisposition("attachment; filename=" & Attachr.FileName);
    end else begin
      WebSetContentDisposition("inline; filename=" & Attachr.FileName);
    end;

    WebOutAttachment(Attachr.SerNr);
  end;
  
  return;
end;
Related topics:
««