COMPACTER UNE BASE DE DONNÉES ACCESS PROTÉGÉE PAR UN MOT DE PASSE

Signaler
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
-
Messages postés
235
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
16 mai 2011
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/5449-compacter-une-base-de-donnees-access-protegee-par-un-mot-de-passe

Messages postés
235
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
16 mai 2011
2
Je confirme que l'utilisation de la compression via le Jet Engine sur une base Access 97 corrompt la base et devient illisible par la suite via access...
Messages postés
235
Date d'inscription
lundi 16 décembre 2002
Statut
Membre
Dernière intervention
16 mai 2011
2
Si l'on veut que le compactage soit effectuer dans le même répertoire que celui où se trouve la base, il suffit de faire cela à la ligne 43:

sShortName = oFSO.GetParentFolderName(sLocalDatabase) & "" & oFSO.GetBaseName(sLocalDatabase)


Pour Patate, si c'est tout à fait possible, le fso ici sert surtout à la manipulation des fichiers, tu peux utiliser les fonctions vb de base come filecopy, kill, etc...
Messages postés
2075
Date d'inscription
mercredi 21 août 2002
Statut
Contributeur
Dernière intervention
16 mars 2020
2
c possible une version sans FSO ? parce que serieusement FSO ...
Messages postés
8
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
26 novembre 2004

Salut les gars, désolé j'ai corrigé quelques bug et ajouté le projet avec la MDB
Messages postés
201
Date d'inscription
jeudi 26 février 2004
Statut
Membre
Dernière intervention
30 juin 2008

Messages postés
1
Date d'inscription
jeudi 19 août 2004
Statut
Membre
Dernière intervention
23 novembre 2004

Salut

j'ai le meme probleme que dlecliar, le format de la base compactée n'est pas reconnu lorsque je veut l'ouvrir.

si quelqu'un a la solution je suis preneur.

Merci
Messages postés
201
Date d'inscription
jeudi 26 février 2004
Statut
Membre
Dernière intervention
30 juin 2008

slt. sais tu a tt hasard comment creer une base access avec un PASSWORD? merci.

salutations.
Messages postés
2
Date d'inscription
mardi 1 juillet 2003
Statut
Membre
Dernière intervention
28 juillet 2004

Salut...

c'est ok à la compression, sauf que lorsque je souhaite ouvrir cette base à travers MS-ACCESS... ACCESS signale que le "format de base de données n'est pas reconnu"
Sais-tu ce qui provoque ça? As tu eu le même problème???

As tu une solution pour ça?!!!

A+ David
Messages postés
116
Date d'inscription
mercredi 5 juin 2002
Statut
Membre
Dernière intervention
17 septembre 2008

Je confirme cela fonctionne avec la version 2002.

Mais il y a un oublis:
La variable sDatabase n'est pas déclaré alors soit vous ajouter:
Dim sDatabase As String
sDatabase = sLocalDatabase
Soit vous remplacez la variable: sDatabase par LocalDatabase.

Un second petit la creation dela nouvelle DB ce fait sur la racine du disque et non dans le même répertoire.

A part cela c'est impecable...Merci

a+
Olivier
Messages postés
8
Date d'inscription
mardi 17 décembre 2002
Statut
Membre
Dernière intervention
26 novembre 2004

Salut Jack,
Le code fonctionne parfaitement sur 97/2000/2002
a+
Jo
Messages postés
14008
Date d'inscription
samedi 29 décembre 2001
Statut
Modérateur
Dernière intervention
28 août 2015
68
Salut. Peux-tu nous préciser quel type de Access : 97 ou 2000 ?
(parce que je pense que 97 ne le permet pas)
Merci