Private Declare Function GetTempFileName Lib "kernel32"
_ Alias "GetTempFileNameA" (ByVal lpszPath As String, _ ByVal
lpPrefixString As String, ByVal wUnique As Long, _ ByVal
lpTempFileName As String) As
Long 参数定义如下：
lpszPath
＝传入保存临时文件的路径
，如"C:\mytemp"
lpPrefixString=传入临时文件名开始的前三个字母，
起到帮助识别临时文件来源的作用。
wUnique
＝0 ,windows随机产生文件名；否则安其值定义文件名。
lpTempFileName=返回随机文件名
----
2.返回临时文件名
Private Function GenTempName(sPath As String) Dim sPrefix As
String Dim lUnique As Long Dim sTempFileName As
String
If IsEmpty(sPath) Then sPath =
"c:\temp" sPrefix = "TVB" lUnique = 0
'windows随机给名
注：本站部分文章源于互联网，版权归原作者所有！如有侵权，请原作者与本站联系，本站将立即删除！ 本站文章除特别注明外均可转载，但需注明出处！ [MinTao学以致用网] 
