renomer une base de données Résolu

Question

bonjour,

j'ai compacter une base de données (BD1.mdb), le problème c'est que j'obtient une nouvelle base (BD2.mdb)

je veux supprimer BD1.mdb et renomer BD2.mdb en BD1.mdb

j'ai fais ceci 

Dim ff As Object
Set ff = CreateObject("Scripting.FileSystemObject")
DBEngine.CompactDatabase "c:\importation1.mdb", "c:\importation2.mdb"
Kill "c:\importation1.mdb"
ff.MoveFile "c:\importation2.mdb", importation1.mdb ' Renommage de la Base

mais j'ai un msg erreur " un objet est requis"

Renfield · Accepted Answer

normal, tu dis "déplace la base 'c:\importation2.mdb' et places là plutot ici : 'importation1.mdb' "

en gros, ta syntaxe est fausse, le deuxième parametre de MoveFile attend un chemine de fichier, pas simplement son nom...

Renfield
Admin CodeS-SourceS- MVP Visual Basic

jrivet · Answer

Salut,
Sinon essaie après avoir effectuer le Kill

Name "c:\importation2.mdb" As "c:\importation1.mdb"

@+: Ju£i?n
Pensez: Réponse acceptée

Renfield · Answer

ok avec jrivet.

pour info, manquait simplement des guillemets :

ff.MoveFile "c:\importation2.mdb", "importation1.mdb"

Renfield
Admin CodeS-SourceS- MVP Visual Basic

mannoula_2007 · Answer

salut à tous,

pour jrivet name.... as.. je fct pas, car dans mon code j'ai une odbc qui connecte sur une base name prend le nom de la base de l'odbc,

j'ai ajouter les " ", le msg d'erreur n'est plus mais le code ne fait pas de renommage

Si qlqun peut m'aider

Merci

cs_Exploreur · Answer

Salut,

Tu as sûrement oublié de cocher la bonne référence dans ton projet pour que l'erreur pointe sur DBEngine

A+
Exploreur

 Linux a un noyau, Windows un pépin

mannoula_2007 · Answer

THINK YOU VERY MATCH

Renomer une base de données

6 réponses

Votre réponse

Discussions similaires