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, o Access 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 do Visual Basic for Applications (VBA). 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
