1 1 1 1 1 1 1 1 1 1 Rating 0.00 (0 Votes)

Problemstellung:

Wie kann ich das aktuelle temporäre Verzeichnis meines Systems ermitteln?

Folgenden Code in öffentliches Modul kopieren:

Public Declare Function GetTempPath _
    Lib "kernel32" Alias "GetTempPathA" ( _
    ByVal nBufferLength As Long, _
    ByVal lpBuffer As String) As Long
    
Public Function GetTempFolder() As String
    Dim strTempFolder As String
    Dim lngRet As Long
    strTempFolder = String(255, 0)
    lngRet = GetTempPath(255, strTempFolder)
    If lngRet <> 0 Then
        strTempFolder = Left(strTempFolder, lngRet)
        GetTempFolder = Left(strTempFolder, _
            Len(strTempFolder) - 1)
    End If
End Function

Aufruf:

MsgBox GetTempFolder

Ergebnis:


Ähnliche Artikel

Kommentar schreiben

Sicherheitscode
Aktualisieren

Login Form

1.png1.png9.png3.png2.png6.png1.png
Heute77
Gestern57
Diese Woche190
Dieser Monat1320
Total1193261

  • IP: 54.80.183.100
  • Browser: Unknown
  • Version:
  • OS: Unknown

Online

1
Online

23. Mai 2018