doscommando onder drukknop

[JEPEDEWE]

Is het mogelijk om doscommando's onder een menu-knop te zetten???
kwestie van backups op die manier te maken
Merci
JP

 

[OctaFish]

Je kunt een SHELL commando laten uitvoeren. Daarmee kun je externe programma's starten.

 

[JEPEDEWE]

als ik onder de drukknop schrijf:

Shell "copy c:\Kine\data.mdb C:\"

krijg ik de melding dat hij het bestand niet vindt....
raar

JP

 

[OctaFish]

Ah, je wilt helemaal geen dos commando starten, je wilt alleen een bestand kopiëren? Daar heeft VBA een eigen commando voor, dus daarvoor hoef je geen rare fratsen uit te halen.

Uit de help:
Voorbeeld van de instructie FileCopy
Dit voorbeeld maakt gebruik van de instructie FileCopy om het ene bestand naar het andere te kopiëren. In dit voorbeeld wordt ervan uitgegaan dat BRONBSTD een bestand is dat gegevens bevat.

Dim SourceFile, DestinationFile
SourceFile = "BRONBSTD"    ' Define source filename.
DestinationFile = "BRONBSTD"    ' Define target filename.
Filecopy SourceFile, DestinationFile    ' Copy source to target.

 

[dnties]

Even als aanvulling: gewoon copy als Shell commando uitvoeren gaat niet werken.
Wat (bijv.) wel zou kunnen werken (niet zelf getest) is: Shell "cmd.exe /c copy c:\Kine\data.mdb C:\"

Tijs.

 

[JEPEDEWE]

Ah, je wilt helemaal geen dos commando starten, je wilt alleen een bestand kopiëren? Daar heeft VBA een eigen commando voor, dus daarvoor hoef je geen rare fratsen uit te halen.

Uit de help:
Voorbeeld van de instructie FileCopy
Dit voorbeeld maakt gebruik van de instructie FileCopy om het ene bestand naar het andere te kopiëren. In dit voorbeeld wordt ervan uitgegaan dat BRONBSTD een bestand is dat gegevens bevat.

Dim SourceFile, DestinationFile
SourceFile = "BRONBSTD"    ' Define source filename.
DestinationFile = "BRONBSTD"    ' Define target filename.
Filecopy SourceFile, DestinationFile    ' Copy source to target.

Ik schreef:

    Dim SourceFile, Destinationfile
    SourceFile = "c:\Kine\data.mdb"
    Destinationfile = "c:\"
    FileCopy SourceFile, Destinationfile

en kreeg:

Fout 76 tijdens uitvoering
Kan het pad niet vinden

c:\Kine\data.mdb..... bestaat echt wel

JP

 

[OctaFish]

Je bronbestand zal best bestaan. Je Doelbestand daarentegen niet. Je gebruikt daar alleen de naam van de schijf.

 

[JEPEDEWE]

Maar ik wil de naam gewoon niet veranderen!

 

[OctaFish]

Dan doe je dat niet.... Er staat ook nergens dat dat moet

    SourceFile = "c:\Kine\data.mdb"
    Destinationfile = "c:\data.mdb"
    FileCopy SourceFile, Destinationfile

 

[JEPEDEWE]

ik maakte die knop aan bij het startmenu
als ik de code gebruik die je me aangeeft krijg ik
fout75
toegangsfout bij pad of bestand
dus.... nog niets
doemme
JP

 

[OctaFish]

ik heb 'm zo uitgeprobeerd met een knop, en bij mij werkt 't. Al moet ik er bij zeggen dat ik een db kopieer die niet geopend is, dus wellicht zit de lock in de weg. Als ik de huidige db kopieer, krijg ik Error 70. Kortom: iets anders verzinnen...