大型系统具备一个通用的附件管理功能,对于单据中无法清晰表达的字段,用一个附件图片或附件文档表示是最好的方法了。比如物料清单附加一张CAD图纸,销售订单评审功能中附加客户的各种表格,通用附件功能对系统起到画龙点睛的作用。一图解千言,先来看一下界面设计模式,看起来和一般的数据输入功能相同。
首先是设计附件表,它的定义参考下面的代码。
CREATE TABLE [dbo].[Attachment]
(
[Index] [int] NOT NULL,
[MasterTable] [nvarchar] (50) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF__Attachmen__Maste__5165187F] DEFAULT (''),
[MasterKey] [decimal] (10, 0) NOT NULL CONSTRAINT [DF__Attachmen__Maste__52593CB8] DEFAULT ((0)),
[FileType] [nvarchar] (10) COLLATE SQL_Latin1_General_CP1_CI_AS NOT NULL CONSTRAINT [DF__Attachmen__FileT__534D60F1] DEFAULT (''),
[FilePath] [nvarchar] (250) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[CreatedDate] [datetime] NULL,
[CreatedBy] [nvarchar] (10) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[RevisedDate] [datetime] NULL,
[RevisedBy] [nvarchar] (10) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[Description] [nvarchar] (60) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[KeySegment1] [nvarchar] (30) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[KeySegment2] [nvarchar] (30) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[KeySegment3] [nvarchar] (30) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[KeySegment4] [nvarchar] (30) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[KeySegment5] [nvarchar] (30) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[Size] [decimal] (18, 0) NULL,
[File] [image] NULL,
[UploadedBy] [nvarchar] (10) COLLATE SQL_Latin1_General_CP1_CI_AS NULL,
[UploadedDate] [datetime] NULL,
[Md5Hash] [nvarchar] (32) COLLATE SQL_Latin1_General_CP1_CI_AS NULL
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
GO
ALTER TABLE [dbo].[Attachment] ADD CONSTRAINT [PK_Attachment] PRIMARY KEY CLUSTERED ([Index], [MasterTable], [MasterKey]) ON [PRIMARY]
GO
EXEC sp_addextendedproperty N'MS_Description', N'附件', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', NULL, NULL
GO
EXEC sp_addextendedproperty N'MS_Description', N'索引', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'Index'
GO
EXEC sp_addextendedproperty N'MS_Description', N'附件所附加的主表', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'MasterTable'
GO
EXEC sp_addextendedproperty N'MS_Description', N'主键', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'MasterKey'
GO
EXEC sp_addextendedproperty N'MS_Description', N'文件类型', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'FileType'
GO
EXEC sp_addextendedproperty N'MS_Description', N'文件路径', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'FilePath'
GO
EXEC sp_addextendedproperty N'MS_Description', N'创建日期', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'CreatedDate'
GO
EXEC sp_addextendedproperty N'MS_Description', N'建立人', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'CreatedBy'
GO
EXEC sp_addextendedproperty N'MS_Description', N'修改日期', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'RevisedDate'
GO
EXEC sp_addextendedproperty N'MS_Description', N'修改人', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'RevisedBy'
GO
EXEC sp_addextendedproperty N'MS_Description', N'名称', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'Description'
GO
EXEC sp_addextendedproperty N'MS_Description', N'关键词', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'KeySegment1'
GO
EXEC sp_addextendedproperty N'MS_Description', N'关键词', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'KeySegment2'
GO
EXEC sp_addextendedproperty N'MS_Description', N'关键词', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'KeySegment3'
GO
EXEC sp_addextendedproperty N'MS_Description', N'关键词', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'KeySegment4'
GO
EXEC sp_addextendedproperty N'MS_Description', N'关键词', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'KeySegment5'
GO
EXEC sp_addextendedproperty N'MS_Description', N'附件大小', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'Size'
GO
EXEC sp_addextendedproperty N'MS_Description', N'附件内容', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'File'
GO
EXEC sp_addextendedproperty N'MS_Description', N'上传人', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'UploadedBy'
GO
EXEC sp_addextendedproperty N'MS_Description', N'上传日期', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'UploadedDate'
GO
EXEC sp_addextendedproperty N'MS_Description', N'哈希值', 'SCHEMA', N'dbo', 'TABLE', N'Attachment', 'COLUMN', N'Md5Hash'
GO
在以前的一篇文章中解释过,为什么需要给每个数据库表增加一个Recnum(记录编号)的数字值字段,我们在这里要记录下的业务功能表中要使用附件的功能,也就是要记下表中的Recnum的值。
MasterTable用于程序分组显示附件,当上传的附件比较多而又不容易到每个独立的功能中去查找,需要设计一个附件浏览器功能,用于查看系统中的所有附件。
有了以上两个基础,附件功能基本上完成。再来增加附件文件存储或下载查看功能。
先来看一下附件的存储方法。可以直接将附件存放在数据库中,也可以考虑增加一个FTP服务器,将附件传送到文件服务器中。当附件文件过大时,存在数据库中会影响数据库性能,优点是便于迁移。存放在FTP服务器中,优点是性能会好,缺点是要考虑文件系统的相关事项。比如用户A上传一个附件文件DOC20150718.pdf,用户B也上传了一份同样的文件DOC20150718.pdf,后上传的文件名不能覆盖前面已经上传的文件名。解决方法是用GUID表示文件名,数据库中记录下文件的GUID,这样可以解决文件重复性问题,但不能解决文件可读性问题。在FTP目录中打开文件夹结构,看到都是GUID作文件名的文件,不利于搜索。于是需要考虑文件名可读性的问题,比如按照用户和时间的组合来命名。还是以前面的文件名DOC20150718.pdf为例子,当前登陆用户名是A,我可以将此文件重命名为用户+年+月+日+小时分钟+ 文件名+ 流水号的文件编码方案给文件命名,于是上面的文件名变成A-201507182110-DOC20150718-0012.pdf,文件名中的时间部分已经精确到分钟,重复的可能性大大降低,增加了可读性。我按照这个规则再写一个文件重命名工具,万一这些文件与ERP系统脱离关系,用软件工具简单的重命名,也可以恢复到当初用户上传时使用的文件名。
再来看阅读器编码。PDF阅读器和DOCX阅读器来自于RadControls_WinForms_2013,它内置了这两种文档的阅读器控件,调用起来简洁。PDF阅读器代码调用如下:
private Telerik.WinControls.UI.RadPdfViewer readerPDF;
this.readerPDF.Visible = true;
if (attachment != null && attachment.Length > 0)
{
MemoryStream stream = new MemoryStream(attachment);
this.readerPDF.LoadDocument(stream);
}
DOCX文档阅读器代码调用参考如下:
IDocumentFormatProvider provider = GetProviderByExtension(extension);
if (provider == null)
{
throw new FileLoadException("Unable to find format provider for extension " + extension);
}
using (Stream stream = File.OpenRead(file))
{
RadDocument document = provider.Import(stream);
this.readerWord.Document = document;
document.LayoutMode = DocumentLayoutMode.Paged;
readerWord.ChangeSectionPageOrientation(PageOrientation.Rotate270);
readerWord.Focus();
}
.NET有功能强大的文件API Aspose 软件包,包含市面上几乎所有文件的转换接口,这是.NET的File API。对于不可直接阅读的文件,如Excel,PowerPoint等常见文件格式,可考虑调用Aspose 文件接口转化为PDF,再调用PDF阅读器显示。Aspose 在文件处理方面应用相当广泛,与文件转化相关的功能推荐用此接口。
总结一下通用附件管理功能的三个要点:
1 如何关联业务功能表,主要保存Recnum记录编号。
2 如何存储附件, FTP文件服务器或数据库image二进制字段。
3 如何查看文档, PDF和DOCX文档阅读器,其它常见文档转化为PDF。