Hello Igor,

I have not tried this in VB but I am using the following function
in VFP 5.0/6.0 for getting unique file name.
just try them.
SYS(3) may return a non-unique name
SUBSTR(SYS(2015), 3, 10) to create unique, legal eight character file name.

Amol