VB新丁,求教GetTempPath的用法
--------------------编程问答-------------------- Private Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long调用:
dim s as string*255
dim s1 as string
dim P as long
GetTempPath 255,s
p=instr(1,s,chr(0))
if p>0 then
s1=left(s,p-1)
msgbox s1
end if
--------------------编程问答-------------------- 觉得楼主应该是调用API GetTempPath取得那个字符串后,截取有效部分时多算了一个字符。其实啊,现在那个fso对象就包含了取得这些特殊路径的方法了吧,不熟悉API的还不如直接使用这种方式。 --------------------编程问答-------------------- 用环境变量不行么?还费那个劲调用API.....
msgbox environ("temp")
就行了.
具体的环境变量去系统属性里找. --------------------编程问答-------------------- lz仔细看msdn吧,这个api本来就不是lz理解的用处的,lz想获得临时目录还是用获取环境变量的方法吧,很方便 --------------------编程问答--------------------
VB Environ系统环境变量函数大全:
Environ ("Windir") 'c:\windows Windows 目录
Environ ("ProgramFiles") 'c:\ProgramFiles 应用程序文件夹
Environ ("UserProfile") 'C:\Documents and Settings\Administrator 用户配置文件目录
Environ ("ALLUSERSPROFILE") '局部 返回所有“用户配置文件”的位置。
Environ ("APPDATA") '局部 返回默认情况下应用程序存储数据的位置。
Environ ("COMPUTERNAME") '系统 返回计算机的名称。
Environ ("COMSPEC") '系统 返回命令行解释器可执行程序的准确路径。
Environ ("HOMEDRIVE") '系统 返回连接到用户主目录的本地工作站驱动器号。基于主目录值的设置。用户主目录是在“本地用户和组”中指定的。
Environ ("HOMEPATH") '系统 返回用户主目录的完整路径。基于主目录值的设置。用户主目录是在“本地用户和组”中指定的。
Environ ("NUMBER_OF_PROCESSORS") '系统 指定安装在计算机上的处理器的数目。
Environ ("OS") '系统 返回操作系统的名称。Windows 2000 将操作系统显示为 Windows_NT。
Environ ("PATH") '系统 指定可执行文件的搜索路径。
Environ ("PATHEXT") '系统 返回操作系统认为可执行的文件扩展名的列表。
Environ ("PROCESSOR_ARCHITECTURE") '系统 返回处理器的芯片体系结构。值: x86,IA64。
Environ ("PROCESSOR_LEVEL") '系统 返回计算机上安装的处理器的型号。
Environ ("PROCESSOR_LEVEL") '系统 返回处理器的版本号。
Environ ("SYSTEMDRIVE") '系统 返回包含 Windows XP 根目录(即系统根目录)的驱动器。
Environ ("SYSTEMROOT") '系统 返回 Windows XP 根目录的位置。
Environ ("TEMP") 'and %TMP") '系统和用户 返回对当前登录用户可用的应用程序所使用的默认临时目录。有些应用程序需要 TEMP,而其它应用程序则需要 TMP。
Environ ("USERDOMAIN") '局部 返回包含用户帐户的域的名称。
Environ ("USERNAME") '局部 返回当前登录的用户的名称。 --------------------编程问答--------------------
老蔡这个好,收了哈哈
补充:VB , API