else if (Ext = 'doc') or (Ext = 'docx') then
Result := 'application/msword'
else if (Ext = 'xls') or (Ext = 'xlsx') then
Result := 'application/vnd.ms-excel'
else if (Ext = 'ppt') or (Ext = 'pptx') then
Result := 'application/vnd.ms-powerpoint'
Regards Bjørnar
Hello!
> else if (Ext = 'doc') or (Ext = 'docx') then
> Result := 'application/msword'
> else if (Ext = 'xls') or (Ext = 'xlsx') then
> Result := 'application/vnd.ms-excel'
> else if (Ext = 'ppt') or (Ext = 'pptx') then
> Result := 'application/vnd.ms-powerpoint
> Hello!
>
> > else if (Ext = 'doc') or (Ext = 'docx') then
> > Result := 'application/msword'
> > else if (Ext = 'xls') or (Ext = 'xlsx') then
> > Result := 'application/vnd.ms-excel'
> > else if (Ext = 'ppt') or (Ext = 'pptx') then
> > Result := 'applicatio