Sunday, July 3, 2022

GUIDFromString-Funktion

Die GUIDFromString- Funktion konvertiert eine Zeichenfolge in eine GUID, die ein Array vom Typ Byte ist.

Syntax

GUIDFromString ( Zeichenfolgenausdruck )

Das erforderliche Zeichenfolgenausdruck- Argument ist ein Zeichenfolgenausdruck, der zu einer GUID in Zeichenfolgenform ausgewertet wird.

Bemerkungen

Das Microsoft Access-Datenbankmodul speichert GUIDs als Arrays vom Typ Byte . Microsoft Office Access 2007 kann jedoch keine Byte -Daten von einem Steuerelement in einem Formular oder Bericht zurückgeben. Um den Wert einer GUID von einem Steuerelement zurückzugeben, müssen Sie ihn in einen String konvertieren. Um eine GUID in eine Zeichenfolge zu konvertieren, verwenden Sie die Funktion StringFromGUID . Um eine Zeichenfolge in eine GUID zu konvertieren, verwenden Sie die GUIDFromString- Funktion.

Abfragebeispiel

Ausdruck

Ergebnisse

SELECT userID,GUIDfromString(userGUID) as GUIDCode FROM GUID_Table;

Zeigt die "userID" an, konvertiert den StringExpression (userGUID) in GUID (Array of Bytes) und zeigt in der Spalte GUIDCode an. Dieses Beispiel funktioniert nur für einen Zeichenfolgenausdruck, der zu einer GUID ausgewertet werden kann.

VBA-Beispiel

Hinweis: Die folgenden Beispiele veranschaulichen die Verwendung dieser Funktion in einem Visual Basic for Applications (VBA)-Modul. Um weitere Informationen zum Arbeiten mit VBA zu erhalten, wählen Sie Entwicklerreferenz in der Dropdown-Liste neben Suchen aus und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

Im folgenden Beispiel wird die GUIDFromString- Funktion verwendet, um eine Zeichenfolge in eine GUID zu konvertieren. Die Zeichenfolge ist eine GUID, die in Zeichenfolgenform in einer replizierten Employees-Tabelle gespeichert ist. Das Feld s_GUID ist ein verborgenes Feld, das jeder replizierten Tabelle in einer replizierten Datenbank hinzugefügt wird.

 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

No comments:

Post a Comment