vb目录中的tmp哪里来的?

来源:百度知道 编辑:UC知道 时间:2024/06/23 01:30:06
vb目录中的有很多tmp文件,而且vb工程的盘符根目录也有很多,能不能通过设置参数让这些tmp文件生成到指定的目录中去?看着这么多tmp文件闹心!
大哥,不是编程序删除,是有没有在VB中可以直接设置的地方?比如IE就可以设置临时目录的位置。
另:我就25分,没法给更多的分了。

一般情况下,vb目录中不会产生tmp文件。除非VB非正常退出,或用户把其他软件安装到VB目录中。

解决的办法很简单:
1、保证每次VB打开后,正常关闭。
2、把别的应用程序安装到其他目录,即使是VB编写的程序也一样。

我的怎么没有这tmp目录?是不是你保存工程时自己创建的?

Function ReNameFile(Folder As String) As Integer
On Error GoTo 10 '捕获错误进入10
Set ofso = CreateObject("Scripting.FileSystemObject") '建立FSO对象
Set fo = ofso.getfolder(Folder) '用FSO打开Folder文件夹
Dim filenum As Integer
Dim a
For Each f In fo.Files '在Folder文件夹根目录查找文件
If UCase(Mid(f.Name, 1, 3)) = "TMP" And UCase(Mid(f.Name, Len(f.Name) - 2, 3)) = "JPG" Then
'如果文件命名格式为TMP*.JPG(*是通配符)
a = Val(Mid(f.Name, 4, Len(f.Name) - 7)) '记录上一句中*的值
filenum = IIf(filenum < a, filenum, a) '与上个文件*的值进行比较,取小者赋给*
End If
Next '继续查找下一个文件
Name Folder & f.Name As Folder & "zz.jpg" '重命名为zz.jpg
ReNameFile = -1 '如果没有发生异常则返回-1,表示无异常
Exit Function
10 '错误入口
ReNameFile