要獲得Windows的臨時(shí)文件的存放路徑，可以使用GetTempPath API函數(shù)。以下是該函數(shù)的聲明：
Private Declare Function GetTempPath Lib "kernel32" Alias_
"GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
“BufferLength”是這個(gè)函數(shù)的第一個(gè)參數(shù)，它將指定接受傳進(jìn)來(lái)字符串的緩沖區(qū)大小?！癇uffer”參數(shù)用于裝載臨時(shí)文件路徑的一個(gè)預(yù)初始化字串。
調(diào)用前，初始化一個(gè)（通常長(zhǎng)為255）的以null為結(jié)尾的字符串，長(zhǎng)度為字符長(zhǎng)度加1。然后調(diào)用這個(gè)函數(shù)，這個(gè)函數(shù)的返回值是一個(gè)Long型的變量，該返回值將是TEMP路經(jīng)的真實(shí)長(zhǎng)度。
Dim lngFolderSize As Long
Dim strFolder As String
Dim lngLength As Long
lngFolderSize = 255
strFolder = String(lngFolderSize + 1, 0)
lngLength = GetTempPath(lngFolderSize, strFolder)
If lngLength > 1 Then
strFolder = Left(strFolder, lngLength)
Else
strFolder = vbNullString
End If
MsgBox strFolder
當(dāng)你的用戶(hù)需要確定臨時(shí)文件目錄，并且應(yīng)用程序?qū)⒃谀抢飫?chuàng)建臨時(shí)的工作文件時(shí)，這個(gè)API函數(shù)將十分有用。
