访问 - 删除带附件字段的记录

时间:2017-06-18 10:21:34

标签: ms-access attachment record

我有一张表格中包含各种记录的连续表格。该表有大约5个字段,其中一个包含附件。附件未显示在表单上。

当我创建(并使用)删除按钮时,我收到一条消息,表示我要删除一条记录,然后继续。该记录似乎已删除,因为它已从表单中删除。但是,它不会被删除,因为它在刷新或重新打开时返回。而是删除存储在附件字段中的附件。 (我正在使用Access 2016)

我尝试使用自动删除记录按钮创建一个宏。 我也尝试使用以下代码,但得到相同的结果。

Dim rst As DAO.Recordset

'If MsgBox("Are you sure you wish to delete this record?" & vbCrLf & "It cannot be undone?", vbYesNo + vbInformation, "Please confirm:") = vbYes Then
    'Set rst = Me.Recordset
    'If Not rst.EOF Then
        'rst.Delete
        'rst.MoveNext
    'End If


     'set rst = Nothing
'End If

也试过

DoCmd.RunCommand acCmdDeleteRecord

并获得相同的结果。从表单中删除记录时,该记录将被删除。刷新或重新打开表单时返回记录。该文档将从包含附件的字段中删除。请注意,在所有情况下,字段中只有一个附件。

1 个答案:

答案 0 :(得分:0)

我遇到了与Access 2013完全相同的问题,我怀疑这同样适用于Access 2016,但是我无法进行测试。我有一个包含2-3个字段和一个附件的子表单。当我删除表单中的行时,它从表单中删除了该行,但是在刷新后返回了该行。

在查看表单的属性时,记录源设置为

import { Pipe, PipeTransform } from '@angular/core';

@Pipe({
  name: 'complaintBgColourPipe'
})
export class ComplaintBgColourPipe implements PipeTransform {
  transform(value: string): string {
    switch (value) {
      case 'Reported': {
        return 'red';
      }

      case 'Resolved': {
        return 'green';
      }

      case 'In progress': {
        return 'yellow';
      }

      default: {
        return '';
      }
    }
  }
}

将其更新为仅“附件”即可解决问题

当数据源设置为查询而不是链接到实际表时,Access似乎无法删除该行。