Hey everyone. (Visual Basic 6 Question here)<br>
<br>
I compiled a program that reads directories from an .ini file and deletes files out of those directories that are over thirty days old. I compiled on NT4.0 w/s and it runs on my box and others, but the one where I REALLY need to run it on gets the error in the above section line. I have verified that I have all the required run-time dll's on the target machine and I am not using any out of the ordinary objects in the code. I can't figure it out for the life of me. All the machines are at SP3<br>
<br>
Here is the only object that I use and I think this is where I get the run-time error:<br>
<br>
Sub ShowFolderList(folderspec)<br>
Dim fs2, f, f1, fc, s<br>
Set fs2 = CreateObject("Scripting.FileSystemObject")<br>
Set f = fs2.GetFolder(FolderSpec) 'lets say replaced with c:\test<br>
Set fc = f.Files<br>
For Each f1 in fc<br>
'LOGIC TO DELETE FILES<br>
Next<br>
End Sub<br>
<br>
Ohh. Another thing worth mentioning is that all machines are running NTFS partitions but everyone has Full Control to the drive so I don't think it is a permissions issue.<br>
<br>
Thanks In Advance,<br>
Michael Sauer, MCSE<br>
msauer@ismi.net
<br>
I compiled a program that reads directories from an .ini file and deletes files out of those directories that are over thirty days old. I compiled on NT4.0 w/s and it runs on my box and others, but the one where I REALLY need to run it on gets the error in the above section line. I have verified that I have all the required run-time dll's on the target machine and I am not using any out of the ordinary objects in the code. I can't figure it out for the life of me. All the machines are at SP3<br>
<br>
Here is the only object that I use and I think this is where I get the run-time error:<br>
<br>
Sub ShowFolderList(folderspec)<br>
Dim fs2, f, f1, fc, s<br>
Set fs2 = CreateObject("Scripting.FileSystemObject")<br>
Set f = fs2.GetFolder(FolderSpec) 'lets say replaced with c:\test<br>
Set fc = f.Files<br>
For Each f1 in fc<br>
'LOGIC TO DELETE FILES<br>
Next<br>
End Sub<br>
<br>
Ohh. Another thing worth mentioning is that all machines are running NTFS partitions but everyone has Full Control to the drive so I don't think it is a permissions issue.<br>
<br>
Thanks In Advance,<br>
Michael Sauer, MCSE<br>
msauer@ismi.net