度量快速开发平台中,字段可以设置为附件类型,设置为附件类型的字段,在上传了数据后,字段中保存的数据格式是这样:
32位附件码|附件1名称
32位附件码|附件1名称\附件2名称
32位附件码|附件1名称\附件2名称\附件3名称
上面格式可以看到一个 附件 字段设置后,可以上传多个附件。根据存储数据格式情况,我们建议,附件这个字段长度尽量设置长,比如长度为1000或者2000,这样上传几个附件也不会提示字符超长。
度量快速开发平台中,附件字段是加密上传到服务器端的,数据库中实际上只记录了服务器上加密文件的指针位置。因此,我们要自己构建功能实现附件的查看和下载,就需要有专门的方法来实现。度量快速开发平台中也已经提供了该方法。
下面示例演示了读取业务中一条数据的附件的情况:
dim sql=""
sql="select file_name,floder,file_save_name from sa_attachfiles where attachcode='32位附件码'"
dim dt = ExecuteSelect(sql)
网格部件1.DataTable=dt
网格部件1.RefreshDataByDataTable()
上面网格部件中,就列出该条业务数据的附件数据,有可能有多条附件数据。
在网格部件的双击事件上写:
DownloadFile(网格部件1.GetFocusedRowValue("FILE_NAME"),网格部件1.GetFocusedRowValue("FILE_SAVE_NAME"),1,网格部件1.GetFocusedRowValue("FLODER"))
就能下载与打开附件了。
downLoadFile 函数:
'第一个参数:本地文件名。如:文件.doc,即保存到本地的文件名。
'第二个参数:服务器上的文件名
'第三个参数:服务器上的文件目录,默认值为 1
'第四个参数:服务器上的子目录名称,没有则传空值
DownloadFile("测试.xls","23b4709f0b034ef7a55f4c21ad365481.at",1,"文件目录")
原文地址:
转载请注明出处:
撰写人:度量科技