CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede taio Novice
05. august 2006 - 19:07 Der er 7 kommentarer og
2 løsninger

VBA kode til komprimer og reparer database

Hej alle eksperter.

Jeg sidder med en database som tid får fejlrecord pga. strømafbrydelse til computeren. Derfor kunne jeg godt tænke mig at vide hvilken vba kode jeg skal bruge for at aktivere komprimer og reparer database i access2000 ? jeg har brugt "DBEngine.RepairDatabase" i access97 men den virker ikke her i access2000.

Hjælp

På forhånd tak

Taio
Avatar billede mugs Novice
05. august 2006 - 19:22 #1
Ikke afprøvet, men fundet ved at søge på eksperten med søgeordet "compact":

http://www.eksperten.dk/spm/223963
Avatar billede taio Novice
05. august 2006 - 19:41 #2
Er det muligt at jeg bare får den kode som skal bruges, jeg kan ikke finde ud af alle de opsætninger. ?
Avatar billede mugs Novice
05. august 2006 - 22:19 #3
Du kan ikke komprimere en db samtidig med, at du afspiller en VBA kode, og det er jo det du efterlyser. Du kan i stedet vælge databasefunkrioner > Komprimer og reparer db.

Evt. kan du lave en handling i Windows scheduler der komprimerer db på bestemte tidspunkter.
Avatar billede taio Novice
05. august 2006 - 23:44 #4
Jeg tror at du har misforstået mig, jeg vil komprimer og reparer en database fra en anden database. ALtså køre en vba kode fra db1 og komp. og rep. db2. Men det skal gøres via en funktione, makro eller vba, da den som skal udføre det, ikke kender til access.. Håber du forstår mig bedre nu.. :-)

På forhånt tak
Avatar billede fynbohans Nybegynder
06. august 2006 - 13:25 #5
Du kan bruge SHELL enten i VBA eller køre det samme som du bruger VBA i en bat-fil.
Den db der skal komprimeres skal køres fra komandolinjen. Parametrene kan du finde i
Hjælp.
Avatar billede Slettet bruger
06. august 2006 - 14:05 #6
start/kør

"sti til msaccess.exe" "sti til database" /repair
"sti til msaccess.exe" "sti til database" /compact
Avatar billede taio Novice
06. august 2006 - 22:16 #7
Er der slet ikke en som kan fortælle mig en kort kode i vba, hvor jeg repair database 1 fra database 2 ??

Jeg vil lave en form med en knap, som repair en lukket database, altså en ikke aktiv database....fra en helt anden database. Database 1 og 2...??

Hjælp
Avatar billede fynbohans Nybegynder
07. august 2006 - 08:35 #8
Du laver en knap i formularen og VedKlik skriver du

Private Sub KNAP_Click()

            Shell "C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE C:\Dokumenter\db2.mdb /compact" 
End Sub

Stien til Access finder du lettets ved i Kør at finde programmet (Browse) og kopiere herfra. Derefter tilføjer du den db, der skal komprimeres.
Avatar billede taio Novice
07. august 2006 - 09:09 #9
Efter som fynbohans kom med en løsning, som jeg kunne bruge, giver jeg ham point. Tak for hjælpen til i andre.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
find bestemt indehold i et felt Af gylling i Access 1 16/05/202421:25 17/05/202408:33
Fokus på element i Value List lavet i en combobox Af per2edb i Access 5 16/05/202412:10 16/05/202419:57
i En Access rapport Af pouls i Access 9 12/05/202421:43 13/05/202413:01
Combobox hvor jeg ønsker at code antal og bredde af kolonner Af per2edb i Access 3 30/04/202411:44 30/04/202415:16
Sletning af Field i all Records Af ingeman i Access 1 29/04/202406:09 29/04/202408:07
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 15:20 Geninstallation af Office 2019 Af ErikHg i Office & Kontorpakker
I dag 09:13 Antivirus til en Linux Mint computer? Af Polle i Linux
I går 15:30 signalforstærker til trådløs rutrer tænkes brugt til pc næt pc -og MÅSKE TV 4 m borte eller begge Af Novice-1 i Routere & Switches
I går 11:43 Hvilket styresystem på en gammel Pc ??? Af Jan Post i Andre styresystemer
I går 07:44 Virus advarsler - falske Af jdann i Backup- & Antivirus
White papers
Flere white papers »


Premium
Teaser billede
Her er de nye medlemmer af Statens It-råd: Skal vurdere it-projekter på over 15 millioner kroner
Læs mere »
Antallet af anmeldelser af ulovligt indhold på beskedtjenester stiger: Regeringen skubber ansvaret videre til EU og Belgien
Efter masser af kritik af store prisstigninger: VMware åbner for gratis licenser - ændrer i licens-strukturen
Seks store selskaber med på årets image-liste for første gang: Kæmper alle med lav kendskabsgrad
Se alle »
Computerworld
Teaser billede
Nyopdaget sårbarhed rammer næsten alle VPN'er: Gør dem usikre og nærmest ubrugelige
Læs mere »
Om under en uge går det løs: Pc’en bliver aldrig den samme igen
VPN-test fra virkeligheden: To tjenester som glimrer på hver deres måde
Test: Samsungs nyeste laptop er noget af det tætteste du kommer på en Windows-Macbook
Se alle »
CIO
Teaser billede
Nu begynder den største GDPR-retssag mod dansk myndighed nogensinde: Står over for million-bøde
Læs mere »
Sådan har Coop sagt farvel til mainframen - sparer et to-cifret millionbeløb årligt på licenser
Lukker it-systemerne ned i to uger på grund af implementering: Den bedste måde at sikre, at ingen data går tabt
Hundredevis af selskaber klager over Microsofts licens-policy: Vi er låst fast og bundet
Se alle »
Job & Karriere
Teaser billede
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Læs mere »
Medarbejderne fik udleveret badetøfler ved indflytningen: Kom med inden for i IBM Danmarks nye topmoderne hovedkontor
Så meget tjener dine kollegaer: Her er alle data fra Computerworlds store it-lønstatistik for 2024
Får du den løn, du fortjener? Få overblikket over hvor meget dine kolleger tjener hver måned
Se alle »
White paper
Teaser billede
Opdag fordelene ved cloud-baseret backup og recovery
Læs mere »
Det behøver ikke at gøre ondt: Sådan gør du livet lettere for kunder med multicloud
Sådan høster du forretningsfordelene ved Internet of Things
Nemmere overblik, styring og omkostningskontrol i dit multicloud-miljø
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »