inh

Im trying to get VB6 to delete a file, using the FileSystemObject, but I cant get it created..

I am trying to define it using this in the on form load event:

Dim fso As New FileSystemObject

I get a 'user defined type not defined' error.. Any ideas guys? =/

__________________
Space Navigator - 6 Axis input device: Take it apart - Driver App
RRCam - Video/webcam capture, text overlay, and recording: 2.0 Stable

Enforcer

1. have you set up a reference in Project->References to the Microsoft Scripting Runtime?

2. Have you got scrrun.dll on your PC?

__________________

inh

I setup the reference, no more error =] Thank you!

Will i have to distribute scrrun.dll with my program? Or is this a standard windows component?

__________________
Space Navigator - 6 Axis input device: Take it apart - Driver App
RRCam - Video/webcam capture, text overlay, and recording: 2.0 Stable

Enforcer

It should be standard however there are different versions so distributing it will not be a good idea.

__________________

ClockWorK

Personally, I prefer using the win32 API over system objects. Try the DeleteFile API or even the Kill command. If you use KILL, wrap it with an error trap. If you use the API, the return value is non-zero for successful delete. Make sure to add the API declaration to one of your modules though.

'in the declares of a module:
Declare Function DeleteFile Lib "kernel32" Alias "DeleteFileA" (ByVal lpFileName As String) As Long

'Then call it like:
dim retVal as long
retVal = DeleteFile(fullFileName)
'then check retVal.

or use the Kill command:
on error resume next
Kill fullFileName
on error goto 0
'then check error state or check if file still exists

My 2 cents. Hope it helps.

inh

Much appreciated =] I'll probably just leave the system object in though, since ive already tested it and it works fine. There is really no reason it should be passed invalid info, since it is only deleting files that the program has created =]

__________________
Space Navigator - 6 Axis input device: Take it apart - Driver App
RRCam - Video/webcam capture, text overlay, and recording: 2.0 Stable

st1mpy

Try Dim fso
set fso = createobject("scripting.filesystemobject")