This is the good way in your way ... but it's a bad way in my fill
Private Sub CreateNewOutputFolder(sFolderSpec As String)
If Not Exist(sFolderSpec) Then Mkdir sFolderSpec
Catch
'if problem try on the prec folder
CreateNewOutputFolder(File.Dir(sFolderSpec))
'Re Try the folder creation if all is good
Mkdir sFolderSpec
End
Because you can't manage correctly all the errors.
------------------------------------------------------------------------------
All of the data generated in your IT infrastructure is seriously valuable.
Why? It contains a definitive record of application performance, security
threats, fraudulent activity, and more. Splunk takes this data and makes
sense of it. IT sense. And common sense.
http://p.sf.net/sfu/splunk-d2d-c2
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
