Try

str= left$(Filename & space(20),20) & date

this'll work as long as no file names are greater than 20 characters, if not turn the 20's into 30s or something



Hope this helps