>>3
これでしょ?
c.Copy(dirsystem&"\LOVE-LETTER-FOR-YOU.TXT.vbs")