获得Windows的临时文件的路径
添加时间: 2006-2-16 9:38:08 作者: VB教程 阅读次数:93 来源: http://www.d9soft.com
Private Declare Function GetTempPath Lib "kernel32" Alias_
"GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
“BufferLength”是这个函数的第一个参数，它将指定接受传进来字符串的缓冲区大小。“Buffer”参数用于装载临时文件路径的一个预初始化字串。
调用前，初始化一个（通常长为255）的以null为结尾的字符串，长度为字符长度加1。然后调用这个函数，这个函数的返回值是一个Long型的变量，该返回值将是TEMP路经的真实长度。
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
当你的用户需要确定临时文件目录，并且应用程序将在那里创建临时的工作文件时，这个API函数将十分有用。
上下文章:
上一篇文章: 用FileSystemWatcher监控作业 下一篇文章: 使用文件的默认的打开方式
相关文章: