Top-Themen

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Komprimieren einer kennwortgeschützten Access-Datenbank

Frage Entwicklung Visual Studio

Mitglied: lobo0108

lobo0108 (Level 1) - Jetzt verbinden

13.11.2012 um 22:33 Uhr, 4677 Aufrufe, 4 Kommentare

Hallo Access-/VBS-Freaks,

Ich suche eine Lösung für ein (für mich) fast unlösbares Problem unter Access 2002. In einer Access-Datenbank wurde ein Datenbank-Kennwort definiert. Es handelt sich hierbei um einen Verwaltungsclient für den Austausch mit dem externen WebServer, welcher eine Datenbank vorhält, welche sich nachts mit dem Artikelstamm unseres ERP-Systems synchronisiert. Aufgrund der Synchronisierung bläht sich das Volumen der Access-Datenbank nach 3-4 Tagen derart auf, dass die automatisierte Übertragung der Daten auf den Webserver nicht mehr möglich ist. Die Datenbank ist mit einem Kennwort versehen.

Ich suche eine Möglichkeit, wie ich die Datenbank über VBS nach 2-3 Tagen automatisiert über Batch bzw. VB-Script auf ein erträgliches Niveau reduzieren kann. Bisher ging das nur manuell. Wir wollen folgenden Source verwenden:

Dim DBProvider, DBName, DBPwd

DBProvider = "Microsoft.Jet.OLEDB.4.0" ' Access 2000
DBName="D:\temp\eidamo1.mdb" ' Datenbankname
DBPwd="test" ' Datenbankpasswort

Call DBKomprimieren (DBProvider,DBName)

Public Sub DBKomprimieren(DBProvider,DBName)
Dim JRO, FSO

Set FSO = CreateObject("Scripting.FileSystemObject")

Set JRO = CreateObject("JRO.JetEngine")
Dim tDBName
tDBName = "t" & DBName
If FSO.FileExists(tDBName)=TRUE Then FSO.DeleteFile(tDBName)

Call JRO.CompactDatabase( _
"Provider=" & DBProvider & ";Jet OLEDB:Database Password=" & DBPwd & ";Data Source=" & DBName, _
"Provider=" & DBProvider & ";Jet OLEDB:Database Password=" & DBPwd & ";Data Source=" & tDBName _
& ";Jet OLEDB:Engine Type=5")

Set JRO = Nothing

FSO.DeleteFile(DBName)

Call FSO.MoveFile(tDBName,DBName)

End Sub


Das funktioniert jedoch nicht - wer kann mir helfen??


Gruß

Markus
Mitglied: Xaero1982
13.11.2012, aktualisiert um 23:39 Uhr
Nabend,

benutze bitte die code Tags

Ansonsten sollte das auch eine einfache Batch hinbekommen...
http://office.microsoft.com/de-de/access-help/befehlszeilenswitches-fur ...

"Funktioniert nicht" ist leider auch keine Fehlerbeschreibung ...

Gruß
Bitte warten ..
Mitglied: lobo0108
14.11.2012 um 02:24 Uhr
Hallo Xaero1982,

bevor ich das mit dem beigefügten Script versuchen wollte, habe ich das mit diversen cmd-Befehlen bereits hinter mir. Der von Dir verwendete Link verweisst auf eine Access2007-Datenbank. Funktioniert jedoch auch unter Bezug auf eine mdb nicht, weil der Parameter \pwd nur in Kombination mit \user funkioniert, und sich darüber hinaus auf die User-Rechte und nicht auf ein DBKennwort bezieht. Ich habe in dieser Kombination bisher keine Möglichkeit gefunden, eine kennwortgeschützte DB über cmd zu öffnen. Die \pwd- Syntax funktioniert nicht. Als einzigster User ist in dieser Datenbank Administrator angelegt. Der Aufruf mit \user Administrator \pwd test geht ins Leere, weil es sich um ein DB-Kennwort handelt. Das funktioniert auch über den Batch-Aufruf über Access2007 genauso wenig!

Der einzigste mir bekannte Lösungsansatz verweist auf eines Aufruf über VB oder VBS. Einzig an der Ausführung scheitert es! Noch ein Hinweis: Ich führe das auf einem Win7-32 - Testsystem aus, während das Echtsystem unter WinXP-32 läuft.

Gruß

Markus
Bitte warten ..
Mitglied: Xaero1982
14.11.2012 um 11:32 Uhr
Hi Markus,

ok das ist natürlich ungünstig. Ich habe nur leider keine Access 2002 DB mit der ich irgendwas testen könnte.

Und deine Fehlerbeschreibung zum VBscript... was genau geht denn nicht? Fehlermeldung? Öffnet er es nicht? etc.

Gruß
Bitte warten ..
Mitglied: lobo0108
14.11.2012 um 13:51 Uhr
Hi Xaero1982,

das kannst Du mit jeder Access-Version nachstellen. Weise einfach über Extras/Sicherheit einer Datenbank ein Kennwort zu (die Datenbank muss zuvor excl. geöffnet werden). Mir war es nicht möglich über ein Script diese Datenbank mit Übergabe dieses Passworts wieder zu öffnen. Ich kann das Datenbank-Kennwort nicht einfach löschen, weil die WebShop-Verwaltung darauf zugreift und wahrscheinlich dieses Passwort prüft.

Für mich wäre es durchaus vorstellbar über Script das Datenbankkennwort zu löschen, dann die Datenbank komprieren und anschliesend das Datenbankkennwort wieder neu zu setzen; das stellt für mich jedoch keine optimale Lösung dar.

Und das VBS-Script funktioniert gar nicht - es geht kein Fenster auf, keine Fehlermeldung erscheint und die Datenbank ist noch genauso groß wie vorher.

Gruss
Bitte warten ..
Ähnliche Inhalte
VB for Applications
Laufzeitfehler 3734 Datenbank komprimieren funktioniert nicht
gelöst Frage von QwertzuiopueVB for Applications3 Kommentare

Moin zusammen, ich bekomme leider immer die Fehlermeldung "Die Datenbank wurde vom Benutzer 'bbbbbbb' auf Computer 'blabla' in einen ...

Microsoft Office
Datenzugriff auf Kennwortgeschützte Excel
gelöst Frage von Florian86Microsoft Office10 Kommentare

Hallo, ich möchte mit Sverweis usw. auf eine Kennwortgeschützte Datei verweisen und mir Daten für User ziehen welche keinen ...

Microsoft Office
Access-Datenbank zur Dokumentation von AGDLP
gelöst Frage von perpendicularMicrosoft Office5 Kommentare

Hallo Leute! Wie der Titel bereits aussagt möchte ich eine Datenbank (Access 2010) erstellen, um die Dokumentation unserer AGDLP-Struktur ...

Datenbanken
Zwei Access Datenbanken zusammenführen
Frage von geocastDatenbanken5 Kommentare

Hallo Zusammen Ich habe hier zwei Accessdatenbanken von einer internen Betriebssoftware. Vom Aufbau her sind sie Identisch, nur eben ...

Neue Wissensbeiträge
Microsoft Office

Office 2010 Starter erneut auf einer frischen Windows-Version installieren

Tipp von Lochkartenstanzer vor 1 TagMicrosoft Office9 Kommentare

Moin, vor ein paar Tagen schlug bei mir ein Kunde auf, der sein Widnows 7 geschrottet und es inklusive ...

Datenbanken

Upgrade MongoDB 3.4 auf 3.6

Erfahrungsbericht von Frank vor 1 TagDatenbanken

Seit kurzem gibt es das 3.6 Update für die MongoDB: Sicherheit, das Sortieren, Aggregation und auch die Performance wurde ...

SAN, NAS, DAS

Backdoor Zugang und Upload-Bug in vielen Western Digital MyCloud Geräten

Information von Frank vor 1 TagSAN, NAS, DAS2 Kommentare

James Bercegay von der Firma Gulftech hat die Fehler an Western Digital gemeldet und das Unternehmen stellt bereits ein ...

Microsoft Office

Outlook 2016 - Beim Weiterleiten keine PDF Anhänge mehr - KB4011626 entfernen

Erfahrungsbericht von Deepsys vor 1 TagMicrosoft Office3 Kommentare

Wenn ihr feststellt das ihr beim Weiterleiten von E-Mails keine PDF Anhänge mehr versendent, dann dankt Microsoft. Diese tolle ...

Heiß diskutierte Inhalte
Netzwerke
NTFS-Berechtigung
Frage von Daoudi1973Netzwerke23 Kommentare

Hallo zusammen und frohes neues Jahr (Sorry, ich bin spät dran) Meine Frage: 1- Ich habe einen Ordner im ...

Drucker und Scanner
Gesucht DIN A3 Drucker
Frage von NebellichtDrucker und Scanner15 Kommentare

Hallo, ich möchte einen neuen DIN A3 Drucker kaufen. Um ab und zu, ca. 1 mal die Woche Farbausdrucke ...

iOS
Einladung vom iphone kalender
Frage von jensgebkeniOS15 Kommentare

Hallo Gemeinschaft, folgendes Problem - immer wenn ich von meinem Iphone einen Termin einztrage und diesem Termin Teilnehmer zuweise, ...

Windows Netzwerk
Drucker isolieren in Windows Domäne
gelöst Frage von lcer00Windows Netzwerk14 Kommentare

Hallo zusammen, habe eine Windows-AD (2012R2) in der es einen Druckerserver gibt. Mittlerweile verliere ich das Vertrauen in die ...