La fonction GUIDFromString convertit un chaîne en GUID, qui est une tableau de type Byte.
Syntaxe
GUIDFromString ( stringexpression )
L’argument stringexpression requis est une expression de chaîne qui prend la valeur d’un GUID sous forme de chaîne.
Notes
Le moteur de base de données Microsoft Access stocke les GUID sous forme de tableaux de type Byte. Toutefois, Access ne peut pas retourner de données d’octet à partir d’un contrôle sur un formulaire ou état. Pour retourner la valeur d’un GUID à partir d’un contrôle, vous devez la convertir en chaîne. Pour convertir un GUID en chaîne, utilisez la fonction StringFromGUID . Pour convertir une chaîne en GUID, utilisez la fonction GUIDFromString .
Exemple de requête
Expression |
Résultats |
---|---|
SELECT userID,GUIDfromString(userGUID) as GUIDCode FROM GUID_Table ; |
Affiche « userID », convertit stringExpression (userGUID) en GUID (tableau d’octets) et affiche dans la colonne GUIDCode. Cet exemple fonctionne uniquement pour une expression de chaîne qui peut être évaluée à un GUID. |
Exemple VBA
Remarque : Les exemples suivants illustrent l’utilisation de cette fonction dans un module Visual Basic pour Applications (VBA). Pour plus d’informations sur l’utilisation de VBA, sélectionnez Référence du développeur dans la liste déroulante en regard de Rechercher et entrez un ou plusieurs termes dans la zone de recherche.
L’exemple suivant utilise la fonction GUIDFromString pour convertir une chaîne en GUID. La chaîne est un GUID stocké sous forme de chaîne dans une table Employees répliquée. Le champ, s_GUID, est un champ masqué ajouté à chaque table répliquée dans une base de données répliquée.
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