A função GUIDFromString converte um cadeia de caracteres em um GUID, que é um matriz do tipo Byte.
Sintaxe
GUIDFromString ( stringexpression )
O argumento stringexpression necessário é uma expressão de cadeia de caracteres que avalia para um GUID em forma de cadeia de caracteres.
Comentários
O mecanismo de banco de dados do Microsoft Access armazena GUIDs como matrizes do tipo Byte. No entanto, Microsoft Office Access 2007 não pode retornar dados do Byte de um controle em um formulário ou relatório. Para retornar o valor de um GUID de um controle, você deve convertê-lo em uma cadeia de caracteres. Para converter um GUID em uma cadeia de caracteres, use a função StringFromGUID . Para converter uma cadeia de caracteres em um GUID, use a função GUIDFromString .
Exemplo de consulta
|
Expressão |
Resultados |
|
SELECT userID,GUIDfromString(userGUID) como GUIDCode FROM GUID_Table; |
Exibe o "userID", converte o StringExpression(userGUID) em GUID (matriz de bytes) e é exibido na coluna GUIDCode. Este exemplo funciona apenas para uma expressão de cadeia de caracteres que pode ser avaliada para um GUID. |
Exemplo de VBA
Observação: Exemplos a seguir demonstram o uso dessa função em um módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do Desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.
O exemplo a seguir usa a função GUIDFromString para converter uma cadeia de caracteres em um GUID. A cadeia de caracteres é um GUID armazenado no formulário de cadeia de caracteres em uma tabela Funcionários replicada. O campo, s_GUID, é um campo oculto adicionado a cada tabela replicada em um banco de dados replicado.
Sub CheckGUIDType()
Dim dbsConn As ADODB.Connection
Dim rstEmployees As ADODB.Recordset
' Make a connection to the current database.
Set dbsConn = Application.CurrentProject.Connection
Set rstEmployees = New ADODB.Recordset
rstEmployees.Open "Employees", _
dbsConn, , , adCmdTable
' Print the GUID to the immediate window.
Debug.Print rst!s_GUID
Debug.Print TypeName(rst!s_GUID)
Debug.Print TypeName(GuidFromString(rst!s_GUID))
Set rstEmployees = Nothing
Set dbsConn = Nothing
End Sub
