Office: (Office 2016) Umstellung auf Windows 64 bit, Code-Anpassung

Harrysantos · 7. November 2020

Hallo,

ich habe eine alte Datenbank übernommen, in der folgender Code enthalten ist.
Jetzt soll auf Win 64 bit umgestellt werden, leider habe ich kaum Ahnung davon, welche Anpassungen nötig sind.

Könnte mir jemand behilflich sein?
Ich wäre euch überaus dankbar!

Code:

Function fOSUserName() As String
Dim lngLen As Long, lngX As Long
Dim strUserName As String

strUserName = String$(254, 0)
lngLen = 255
lngX = apiGetUserName(strUserName, lngLen)
If lngX 0 Then
fOSUserName = Left$(strUserName, lngLen - 1)
Else
fOSUserName = ""
End If
End Function
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

:)

daolix · 9. November 2020

Code:

Declare PtrSafe Function GetUserName Lib "ADVAPI32.DLL" Alias "GetUserNameW" (ByVal lpBuffer As LongPtr, ByRef pcbBuffer As Long) As Long

Function NameVomBenutzer() As String
Dim s As String
Dim l As Long
s = String(256, 0)
l = 256
If GetUserName(StrPtr(s), l) Then NameVomBenutzer= Left$(s, l - 1)
End Function
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Maxel · 9. November 2020

BTW: Office 32 bit (incl. Access) läuft durchaus problemlos unter Win 64 bit.

Fred_BS · 9. November 2020

Hallo,

ergänzend zu Maxels richtiger Aussage: Nur wenn MS Office auf die 64 Bit - Variante umgestellt wird, sind Anpassungen erforderlich, Windows selber ist das egal. Die Anpassungen sind im Wesentlichen bei den Declare-Anweisungen der API-Funktionen durchzuführen. Wenn sich Datentypen ändern, muss natürlich auch geprüft werden, ob übergebene Parameter und/oder Rückgabewerte angepasst werden müssen.
Die häufigste Begründung für das 64 Bit Office, die ich zu hören bekam, waren die Lade- und Rechenzeiten großer Excelsheets, die dann meistens als Datenbankersatz missbraucht wurden. Daher meine Standardantwort: "Wenn Du so viele Daten in Excel hast, dass es signifikant langsamer wird, brauchst Du in der Regel kein 64 Bit Office, sondern eine Datenbank."

Gruß
Fred

fraeser · 9. November 2020

Das wird hier wohl sehr oft missverstanden, dass die Problematiken bei Umstellung auf Office 64bit - nicht bei Win 64bit - auftreten!

Office: (Office 2016) Umstellung auf Windows 64 bit, Code-Anpassung

Umstellung auf Windows 64 bit, Code-Anpassung

Umstellung auf Windows 64 bit, Code-Anpassung

Umstellung auf Windows 64 bit, Code-Anpassung

Umstellung auf Windows 64 bit, Code-Anpassung - Similar Threads - Umstellung bit Code

Formel auf Index umstellen ?

Laufzeitfehler 424: Objekt erforderlich seit Umstellung auf O365

Outlook nur noch in Englisch

INDEX-Bestandteile umstellen

Umstellung Access 32 bit auf Access 64 bit

FileDialog von 32-Bit auf 64-Bit umstellen

64 bit auf 32 Bit umstellen