Método DataRecordsets.GetLastDataError (Visio)

Obtém o código de erro do ADO (Active X Data Objects), a descrição do ADO e a identificação do conjunto de registros de dados associada a um erro resultante da adição de um novo conjunto de registros de dados ou da atualização dos dados em um existente.

Observação

This Visio object or member is available only to licensed users of Visio Professional 2013.

Sintaxe

expressão. GetLastDataError (DataErrorCode, DataErrorDescription, RecordsetID)

Expressão Uma expressão que retorna um objeto DataRecordsets .

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
DataErrorCode	Obrigatório	Long	Parâmetro externo. O código de erro do ADO do último erro.
DataErrorDescription	Obrigatório	String	Parâmetro externo. A descrição do ADO do último erro.
RecordsetID	Obrigatório	Long	Parâmetro externo. A identificação do conjunto de registros de dados que gerou ou disparou o erro.

Valor de retorno

Nada

Comentários

As operações relacionadas a dados que podem gerar erros do ADO no Microsoft Visio incluem a adição de um novo objeto DataRecordset à coleção DataRecordsets do documento ativo e a atualização dos dados em um conjunto de registros de dados existente.

Se uma operação relacionada a dados for bem-sucedida, o método GetLastDataError retornará RecordsetID = 0, DataErrorCode = 0 e DataErrorDescription = "" (uma cadeia de caracteres vazia).

Se tentar adicionar um conjunto de registros de dados gerar um erro, o método retornará RecordsetID = 0, bem como o código de erro e a descrição.

Se a tentativa de atualizar os dados em um conjunto de registros de dados existente causar um erro e, se o Visio souber qual conjunto de registros de dados causou o erro, GetLastDataError retornará a identificação do conjunto de registros de dados.

Entretanto, é possível que o Visio não saiba especificamente qual conjunto de registros de dados causou o erro. Isso só pode acontecer quando você tenta atualizar um conjunto de registros de dados que é um de um grupo de conjuntos de conjuntos de registros de dados que compartilham a mesma conexão com uma fonte de dados. Isso porque quando os dados em um conjunto de registros de dados nesse grupo (denominados conjuntos de registros de dados transacionados) são atualizados, todos os conjuntos de registros de dados do grupo são atualizados. Nessa situação, se a operação de atualização falhar antes que todos os conjuntos de dados do grupo sejam atualizados, o Visio reverterá a atualização de quaisquer conjuntos de registros de dados concluídos com êxito até esse ponto.

Se você chamar GetLastDataError, o método retornará o seguinte:

• A identificação do conjunto de registros de dados no qual você chamou o método Refresh para iniciar a operação de atualização que subsequentemente falhou.

• A mensagem de erro gerada pela operação de atualização que falhou, embora não haja um meio de saber se a falha estava especificamente relacionada ao conjunto de registro de dados cuja identificação foi passada ao método GetLastDataError.

Exemplo

A seguinte macro do Microsoft Visual Basic for Applications (VBA) mostra como usar o método GetLastDataError para obter o código de erro e a descrição do ADO, além da identificação do conjunto de registros de dados associado ao último erro de dados.

Public Sub GetLastDataError_Example() 
 
    Dim vsoDataRecordsets As Visio.DataRecordsets 
    Dim lngCode As Long 
    Dim strDescription As String 
    Dim lngID As Long 
     
    Set vsoDataRecordsets = Visio.ActiveDocument.DataRecordsets 
     
    vsoDataRecordsets.GetLastDataError lngCode, strDescription, lngID 
     
    Debug.Print "Error code: ", lngCode 
    Debug.Print "Error description: ", strDescription 
    Debug.Print "Data recordset ID: ", lngID 
 
 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.