سلام
مشکلی که بعضی ها گفته بودن پیام Restore failed for Server '...'. میده علتش یه بخش اشتباه در کد restore که sub zero نوشته.
باید به جای .Database = DataBaseName.bak بنویسیم .Database = DBName