How to create a FILES

[desprits]

I would like to know what should I do to know if a files exist in VB.

Exemple : if File1 exist then
else
Create File1
endif

 

[BiggerBrother]

create a reference to microsoft scripting runtime, under references in the project menu. Then use the following code:

Dim FSO As FileSystemObject

Set FSO = New FileSystemObject

If FSO.FileExists("C:\Folder\worddoc.doc") = True Then 'file exists

else 'file not present.

End if

BB

 

[desprits]

Thank you very much !

 

[desprits]

What the refecence of that ?

FileSystemsObject

 

[strongm]

As BiggerBrother said the normal reference required to get access to the FileSystemObject is the Microsoft Scripting Runtime

 

[AndyTWI]

Far easier IMO is the Dir$() function:

If LenB(Dir$("C:\yourfile.txt")) = 0 Then
    ' file does not exist, create it
Else
    ' file exists
End If

The Dir$() function will return a nullstring if the file does not exist.