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 -- To unsubscribe or change your settings for TWSocket mailing list please goto http://lists.elists.org/cgi-bin/mailman/listinfo/twsocket Visit our website at http://www.overbyte.be
