Você configurou o usuário q faz o restore como um Disk Administrator desse banco de dados? Mani
--- Em delphi-br@yahoogrupos.com.br, "Gleidison S. Bertolini" <[EMAIL PROTECTED]> escreveu > > está com a extensão .bak e no query analyser funciona normalmente, só que eu fiz de um jeito que parou de dar o erro mas tb não restaura.. > > QPadrao.Close; > QPadrao.Sql.Clear; > QPadrao.Sql.Text:= 'USE [Master] RESTORE DATABASE ['+BancoDados+'] FROM DISK = '''+DiretorioComBarra (DirectoryRestore.Directory)+EdtRestore.Text+''''; > QPadrao.ExecSQL; > > Demora um tempo, parece que restaurou mas não restaurou.. > > > Gleidison > ----- Original Message ----- > From: Gabriel Filho > To: delphi-br@yahoogrupos.com.br > Sent: Friday, October 06, 2006 10:38 AM > Subject: Re: [delphi-br] Restore Dadabase Sql Server pelo Delphi > > > Aconselho vc executar esse restore em algum utiitário de query, tipo query > analizer ou qualquer coisa do tipo, > pra ver o q pode estar ocorrendo. > > Em 06/10/06, Vanessa Merces <[EMAIL PROTECTED]> escreveu: > > > > Sim... esta certo ... > > Eu só tiraria o [ ] mas acho que não muda nada... > > Ah verifique a extensão do arquivo.. tem que estar .bak... > > Posso ate estar falando besteira mas acho q só restaura com esse tipo de > > arquivo.... > > > > Bjus > > Vanessa > > -----Mensagem original----- > > De: delphi-br@yahoogrupos.com.br [mailto:delphi- [EMAIL PROTECTED] > > nome de Gleidison S. Bertolini > > Enviada em: quinta-feira, 5 de outubro de 2006 19:07 > > Para: Grupo Delphi > > Assunto: [delphi-br] Restore Dadabase Sql Server pelo Delphi > > > > > > Pessoal, estou tentando resutaurar uma base em sql pelo delphi, usando > > ADO > > mas fala que está em uso. Eu desconectei o banco, conectei com "Master" > > mesmo assim não deu... > > > > FrmPrincipal.AdoPrincipal.Connected:= False; > > FrmPrincipal.AdoPrincipal.ConnectionString:= > > 'Provider=SQLOLEDB.1;Password=kairos;Persist Security Info=True;User > > ID=kairos;Initial Catalog=master;Data Source='+Servidor; > > FrmPrincipal.AdoPrincipal.Connected:= True; > > > > QPadrao.Close; > > QPadrao.Sql.Clear; > > QPadrao.Sql.Text:= 'RESTORE DATABASE ['+BancoDados+'] FROM DISK = > > '''+DirectoryRestore.Directory+'\'+EdtRestore.Text+''''; > > Try > > QPadrao.ExecSQL; > > Except > > > > > > Se alguém pode me ajudar eu agradeço. > > > > Gleidison > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > [As partes desta mensagem que não continham texto foram removidas] > -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> <*> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages <*> Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
