Rakenduskoht
Microsoft 365 rakendus Access Access 2024 Access 2021 Access 2019 Access 2016

Funktsioon GUIDFromString teisendab stringGUID, mis on massiiv, mille tüüp on Bait.

Süntaks

GUIDFromString ( stringexpression )

Nõutav stringexpression argument on stringiavaldis, mis annab tulemiks stringivormi GUID-i.

Kommentaarid

Microsoft Accessi andmebaasimootor talletab GUID-sid massiividena, mille tüüp on Bait. Siiski ei saa Access tagastada vorm või aruannejuhtelementbaitandmeid . Juhtelemendi GUID väärtuse tagastamiseks peate selle teisendama stringiks. GUID-i teisendamiseks stringiks kasutage funktsiooni StringFromGUID . Stringi teisendamiseks GUID-ks kasutage funktsiooni GUIDFromString .

Päringu näide

Avaldis

Tulemid

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

Kuvab väärtuse "userID", teisendab StringExpression(userGUID) GUID-ks (baitide massiiviks) ja kuvab veerus GUIDCode. Selles näites kasutatakse ainult stringiavaldist, mida saab hinnata GUID-iks.

VBA näide

Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Järgmises näites kasutatakse funktsiooni GUIDFromString stringi teisendamiseks GUID-ks. String on tiražeeritud tabelis Töötajad talletatud stringkujul talletatud GUID. Väli s_GUID on tiražeeritud andmebaasi igasse tiražeeritud tabelisse lisatud peidetud väli.

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

Kas vajate veel abi?

Kas soovite rohkem valikuvariante?

Siin saate tutvuda tellimusega kaasnevate eelistega, sirvida koolituskursusi, õppida seadet kaitsma ja teha veel palju muud.