مشکل در restore کردن

[kathy11ir]

سلام !
متشکرم . ولی نمی دانم دقیقا" کجا را جستجو کنم اگر ممکن است ، کد کامل restore کردن را برای من ارسال نمایید و یا راهنمایی کامل تری بکنید .

من دستورات زیر را جهت backup و restore کردن وارد کردم ولی..

backup
decodedate(date,year,mon,day);
edit1.Text:= INTTOSTR(year)+INTTOStr(mon)+inttostr(day) ;
name:='vb2'+ edit1.Text+'.bak';
path:=pathe+'\'+name;
x:='BACKUP DATABASE vb TO DISK='+ char(39)+ path + char(39);
DataModule141.ADOCommand1.Parameters.ParamValues['@SQLString']:=x;
DataModule141.ADOCommand1.Execute;
ShowMessage('پÔÊíÈÇ&#228 ;í ÇÒ ÈÇä˜ ÇØáÇÚÇÊ&#237 ; ÈÇ ãæÝÞíÊ ÇäÌÇ㠐ÑÏíÏ');

restore

DataModule141.ADOCommand1.Parameters.ParamValues['@SQLString']:='CREATE DATABASE vb2 ';
DataModule141.ADOCommand1.Execute;

ShowMessage(' پÇíÇå ÏÇÏå ãæÝÞíÊ ÂãíÒ ÓÇÎÊå ÔÏ');

DataModule141.ADOCommand1.Parameters.ParamValues['@SQLString']:='Use Master';
DataModule141.ADOCommand1.Execute;

pathe:=FileListBox8.FileName;
s:=pathe;
DataModule141.ADOCommand1.Parameters.ParamValues['@SQLString']:='RESTORE DATABASE vb2 FROM DISK='+char(39)+s+char(39);
DataModule141.ADOCommand1.Execute;

ShowMessage('ÝÇíá پÔÊíÈÇä ãæÝÞíÊ ÂãíÒ ÇÍíÇ ÔÏ');

بااین وجود باز هم خطای

the databaseto be restore was named "vb " .reissue the statement using the WITH
REPLACE option to overwrite the Mbackup database

را می دهد . لطفا" راهنمایی نمایید چطوری این مشکل را رفع کنم