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.

Sintaxe

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

expressão Uma expressão que devolve um objeto DataRecordsets .

Parâmetros

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 com dados for bem-sucedida, o método GetLastDataError devolve RecordsetID = 0, DataErrorCode = 0 e DataErrorDescription = "" (uma cadeia vazia).

Se tentar adicionar um conjunto de registos de dados gerar um erro, o método devolve 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. Isto só pode acontecer quando tenta atualizar um conjunto de registos de dados que é um de um grupo de conjuntos de registos de dados que partilham a mesma ligação a uma origem 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. Nesta situação, se a operação de atualização falhar antes de todos os conjuntos de dados no grupo serem atualizados, o Visio reverterá a atualização de quaisquer conjuntos 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.