Office: Datenbank Dokumentation

Helfe beim Thema Datenbank Dokumentation in Microsoft Access Hilfe um das Problem gemeinsam zu lösen; Hallo, Kann mir jemand eine Quelle nennen, wo ich Informationen bekommen kann, wie man eine Access-Datenbank am besten dokumentiert (am besten mit... Dieses Thema im Forum "Microsoft Access Hilfe" wurde erstellt von User, 20. Oktober 2003.

Seite 1 von 4

USER

User

Datenbank Dokumentation

Hallo,

Kann mir jemand eine Quelle nennen, wo ich Informationen bekommen kann, wie man eine Access-Datenbank am besten dokumentiert (am besten mit Beispiel).

Die Dokumentation soll sowohl die Bedienung als auch den Aufbau und die Struktur der Datenbank abdecken.

Den Tip mit dem eingebauten Dokumentierer brauch ich übrigens nicht - dessen Qualität habe ich schon ausprobiert...

:)

User, 20. Oktober 2003

#1
SCHNOLLI

schnolli

Hallo Gast,

schau mal hier EICDocu.

HTH

schnolli, 22. Oktober 2003

#2
CHIEF10

Chief10

Hi,

also bei mir läuft des Tool net so richtig....Ich krieg ne Fehlermeldung und es wird abgebrochen!!!

Chief10, 22. Oktober 2003

#3
SCHNOLLI

schnolli

Datenbank Dokumentation

... also bei mir läufts einwandfrei. Hast Du auch die benötigten Verweise gesetzt?

schnolli, 22. Oktober 2003

#4
USER

User

... ähh, dumme Frage, wie lad ich das Tool denn runter?

Ein peinlich berührter Mattes *sos

User, 22. Oktober 2003

#5
SCHNOLLI

schnolli

Hi Mattes,

klicke auf EICDocu, somit kommst Du zur Beschreibung, danach siehst Du oben rechts Beispiel, dort draufklicken- fertig.

schnolli, 22. Oktober 2003

#6
CHIEF10

Chief10

Hi,

@ Mattes
du musst auf Beispiel gehen!

@ schnolli
hab alle Verweise!

hier tritt der Fehler auf....
Code:

Private Sub DocSingleFormReport(pobjWord As Object, _
ByVal pDoc As DAO.Document, _
ByVal pfDocForm As Boolean, _
ByVal pfOnProcs As Boolean)
'// =====================================================
'// Methode | Einzelnes Formular bzw. Bericht
'// | dokumentieren
'// -----------------------------------------------------
'// Parameter | pobjWord - aktuelle Word-Instanz
'// | pDoc - aktuelles Word-Dokument
'// | pfDocForm - Formular?
'// | pfOnProcs - Nur Prozeduren?
'// -----------------------------------------------------
'// Erstellt | Manuela Kulpa - Okt, 2002
'// | EDV Innovation & Consulting - Dormagen
'// =====================================================

On Error GoTo HandleErr
Dim sTmpFilename As String
Dim sTmp As String
Dim objFrm As Object
Dim prp As Property
Dim ctl As Control
Dim objWordDoc As Object
Dim objWordSel As Object

' Ermitteln des aktiven Word-Dokuments
Set objWordDoc = pobjWord.ActiveDocument
Set objWordSel = pobjWord.Selection

FormShowItem IIf(pfDocForm, "Formulare", "Berichte") & _
" dokumentieren", pDoc.Name

' Temporären Dateinamen erstellen
sTmpFilename = MakeTempFileName("TXT")
' Wenn eine Datei unter dem temporären
' Namen exisitiert, löschen!
On Error Resume Next
Kill sTmpFilename
On Error GoTo HandleErr

If pfDocForm Then
' für Formulare
' Bildschirmfoto des Formulars einfügen
pobjWord.Visible = False
' Formular fotografieren, Bild in die
' Zwischenablage kopieren
CaptureForm pDoc.Name
pobjWord.Visible = True

' Zwischenablage einfügen
With pobjWord.Selection
.Collapse Direction:=wdCollapseEnd
.InsertParagraphAfter
.InsertParagraphAfter
.Collapse Direction:=wdCollapseEnd
.Paste
.Collapse Direction:=wdCollapseEnd
.InsertParagraphAfter
.InsertParagraphAfter
.Collapse Direction:=wdCollapseEnd
End With
' Formular verborgen öffnen
DoCmd.OpenForm pDoc.Name, View:=acViewDesign, _
WindowMode:=acHidden
Set objFrm = Forms(pDoc.Name)
If objFrm.HasModule Then
' Wenn Formular-Klassenmodul vorhanden
sTmp = "Form_" & pDoc.Name
' Ausgabe in temporäre Datei
DoCmd.OutputTo acModule, sTmp, _
acFormatTXT, sTmpFilename, False
' Temporäre Datei in Word öffnen
Set objWordDoc = pobjWord.Documents.Open( _
FileName:=Chr(34) & _
sTmpFilename & Chr(34))
Else
' Wenn kein Klassenmodul vorhanden,
' leeres Dokument öffnen
Set objWordDoc = pobjWord.Documents.Add()
End If
Else
' für Berichte
DoCmd.OpenReport pDoc.Name, View:=acViewDesign, WindowMode :=acHidden
Set objFrm = Reports(pDoc.Name)
If objFrm.HasModule Then
' Wenn Bericht-Klassenmodul vorhanden
sTmp = "Report_" & pDoc.Name
' Ausgabe in temporäre Datei
DoCmd.OutputTo acModule, sTmp, _
acFormatTXT, sTmpFilename, False
' Temporäre Datei in Word öffnen
Set objWordDoc = pobjWord.Documents.Open( _
FileName:=Chr(34) & _
sTmpFilename & Chr(34))
Else
' Wenn kein Klassenmodul vorhanden,
' leeres Dokument öffnen
Set objWordDoc = pobjWord.Documents.Add()
End If
End If
' Titel des Fensters mit der temporären Datei merken
msModulFenster = pobjWord.ActiveWindow.Caption
' Umschalten zur Dokumentation
pobjWord.Windows(msFenster).Activate

pobjWord.ScreenUpdating = False

' Einfügen einer Textmarke, hier werden später die
' allgemeinen Prozeduren des Klassenmoduls eingefügt
pobjWord.ActiveDocument.Bookmarks.Add "Modul"
objWordSel.InsertParagraphAfter

' Formular-/Berichteigenschaften ausgeben
For Each prp In objFrm.Properties
On Error Resume Next
If Not IsNull(prp.Value) And prp.Value "0" _
And prp.Value "" Then
On Error GoTo HandleErr
If Left(prp.Name, 2) = "On" Then
' Für Erreignisprozeduren VBA-Code umkopieren
If prp.Value = "[Ereignisprozedur]" Or _
prp.Value = "[Event Procedure]" Then
If pfDocForm Then
FindSub pobjWord, "Form", prp.Name
Else
FindSub pobjWord, "Report", prp.Name
End If
End If
End If
End If
Next
' Alle Steuerelemente ausgeben
For Each ctl In objFrm.Controls
With objWordSel
.InsertAfter "Control: "
.Font.Bold = False
.InsertAfter ctl.Name
.Collapse Direction:=wdCollapseEnd
.InsertAfter " (" & TypeOfControl(ctl.ControlType) & ")"
.InsertParagraphAfter
.Font.Bold = False
.Collapse Direction:=wdCollapseEnd
End With
For Each prp In ctl.Properties
sTmp = "%"
On Error Resume Next
sTmp = prp.Value
On Error GoTo 0
If sTmp "%" And sTmp "0" And sTmp "" Then
If prp.Name = "ControlSource" Then
objWordSel.InsertAfter Chr(9) & prp.Name & _
" = " & prp.Value & vbCrLf
End If
If pfOnProcs Then
On Error Resume Next
If prp.Name = "DefaultValue" Or _
prp.Name = "BoundColumn" Or _
prp.Name = "Columncount" Or _
prp.Name = "RowSource" Or _
(prp.Name = "Locked" And _
prp.Value = "True") Or _
(prp.Name = "Visible" And _
prp.Value = "False") Or _
(prp.Name = "Enabled" And _
prp.Value = "False") Then
sTmp = FormatPropertyValue(prp)
objWordSel.InsertAfter Chr(9) & _
prp.Name & " = " & sTmp & vbCrLf
End If
On Error GoTo HandleErr
End If
If Left(prp.Name, 2) = "On" Then
' für Ereignisprozeduren VBA-Code umkopieren
If sTmp = "[Ereignisprozedur]" Or _
sTmp = "[Event Procedure]" Then
FindSub pobjWord, ctl.EventProcPrefix, prp.Name
End If
End If
End If
Next
Next
objWordSel.Collapse Direction:=wdCollapseEnd

' Allgemeinen Code des Klassenmoduls umkopieren
Modul pobjWord

objWordSel.Collapse Direction:=wdCollapseEnd

objWordSel.InsertParagraphAfter
objWordSel.InsertParagraphAfter

DoCmd.Close IIf(pfDocForm, acForm, acReport), _
pDoc.Name, acSaveNo

pobjWord.ScreenUpdating = True

' Temporäre Datei löschen
On Error Resume Next
Kill sTmpFilename
On Error GoTo 0

HandleExit:
Exit Sub

HandleErr:
If Not pobjWord Is Nothing Then
pobjWord.ScreenUpdating = True
End If
Set pobjWord = Nothing
Select Case Err.Number
Case Else
MsgBox "EICDocu-Fehler: " & Err.Number & ": " & _
Err.Description, vbCritical, _
"basEicDocu.DocSingleFormReport"
End Select
Resume HandleExit
End Sub
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Chief10, 22. Oktober 2003

#7
HEINI

heini

Datenbank Dokumentation

Hi Leutz,

beim mir hängt´s an gleicher Stelle wie beim Cheffe (*biggrin.gif*)...

heini, 22. Oktober 2003

#8
SCHNOLLI

schnolli

Hi Leute,

wenn ich z.B. nur Tabellen dokumentieren lassen will, funzt es einwandfrei, aber wenn ich Komplett anklicke, hängt er bei mir an gleicher stelle, dass gleiche gilt für Berichte *eek.gif*

Bin jetzt doch etwas überrascht *boah

schnolli, 22. Oktober 2003

#9
ARNE DIECKMANN

Arne Dieckmann

Ich habe das Teil nicht runtergeladen. Mein Vorschlag: Nehmt doch einfach mal WindowMode raus {gibt es beim Öffnen eines Berichtes als Argument doch gar nicht *confused.gif*}.

aus
Code:

DoCmd.OpenReport pDoc.Name, View:=acViewDesign, WindowMode :=acHidden
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

macht also:
Code:

DoCmd.OpenReport pDoc.Name, View:=acViewDesign
Klicke in dieses Feld, um es in vollständiger Größe anzuzeigen.

Arne Dieckmann, 22. Oktober 2003

#10
HEINI

heini

\@ Arne: *knuddel
Jetzt funktioniert es.

@all:
Nicht wundern wenn ein paar viele Wordokumente aufgehen *wink.gif*

heini, 22. Oktober 2003

#11
CHIEF10

Chief10

\@ Arne
Super! *top

Chief10, 22. Oktober 2003

#12
USER

User

Datenbank Dokumentation

... bei mir läuft es so wie runtergeladen (AXP). Ich bin begeistert! Man sieht welche Schaltffläche welche Prozedur etc auslöst. Mit ein paar eigenen Screenshots wird da ein Super Handbuch draus.

Sowas hab ich lange gesucht, aber Götzfried war zu teuer.

Danke Manuela!

Mattes

User, 22. Oktober 2003

#13
SCHNOLLI

schnolli

\@Arne,

so funktioniert es bei mir auch komplett *cool.gif*

Danke *hands

schnolli, 22. Oktober 2003

#14
OXYGIZER94

oxygizer94

Also, ich hab das Add-In auch runtergeladen. Die Verweise habe ich auch eingestellt, aber wenn ich es Hinzufügen möchte erhalte ich die Fehlermeldung: "Beim Hinzufügen zur Registrierung ist ein Fehler aufgetreten!"
Muss ich sonst noch was einstellen?

oxygizer94, 22. Oktober 2003

#15

(Du musst angemeldet oder registriert sein, um eine Antwort erstellen zu können.)

Seite 1 von 4

Thema:

Datenbank Dokumentation

Die Seite wird geladen...

Datenbank Dokumentation - Similar Threads - Datenbank Dokumentation
Datenbank bleibt gesperrt - laccdb wird nicht gelöscht
in Microsoft Access Hilfe
Datenbank bleibt gesperrt - laccdb wird nicht gelöscht: Hallo zusammen, ich betreue eine Datenbank mit getrenntem Back- und Frontend, die in einem Firmennetzwerk auf dem Netzlaufwerk liegt. Ich entwickle sie lokal weiter, ohne vor Ort zu sein, wobei...
LostFocus der Datenbank?
in Microsoft Access Hilfe
LostFocus der Datenbank?: Moin, gibt es das LostFocus-Event auch für die Datenbank, z.B. wenn man vom Formular zu Minesweeper wechselt? Oder entzieht Windows dem verlassenen Task sämtliche Aufmerksamkeit? Gruß Doming
Problem Datenstruktur Mitglieds-Datenbank
in Microsoft Access Hilfe
Problem Datenstruktur Mitglieds-Datenbank: Hallo Leute, Ich habe eine Frage zu einer Vereins-Mitglieder-Datenbank, die ich erstelle. Die Vereinsmitglieder sind in einer Tabelle erfasst, also Nachname, Vorname, usw. Und es gibt einen...
Auslesen Windowsbenutzer in einer Datenbank
in Microsoft Access Hilfe
Auslesen Windowsbenutzer in einer Datenbank: Hallo zusammen, wie kann ich auslesen, welcher Windows Benutzer gerade aktuell in einer Datenbank ist? Geht das? Danke Matthias
Datenbank "Ausfahrtenerfassung" Rudern
in Microsoft Access Hilfe
Datenbank "Ausfahrtenerfassung" Rudern: Guten Abend zusammen Ich habe mich entschlossen unsere Papierversion der der Ausfahrtenerfassung unseres Ruderclubs zu aktualisieren. Ich habe also zwei neue Tabellen erstellt. T_FAHRTENBUCH und...
Einfache Datenbank zum Suchen und Öffnen von Dokumentdateien
in Microsoft Access Hilfe
Einfache Datenbank zum Suchen und Öffnen von Dokumentdateien: Hallo Office-Gemeinde, ich bin komplett neu hier, Newbie im Bereich Access-Datenbanken, und möchte mich an einem kleinen Projekt versuchen - in der Hoffnung, dass das so überhaupt realisierbar...
Datenbank Abfrage - einzelne Datensätze löschen
in Microsoft Access Hilfe
Datenbank Abfrage - einzelne Datensätze löschen: Hey ihr Lieben, ich habe eine Abfrage erstellt, die ich dann automatisiert in Excel habe. Nun ist es aber so, dass in dieser Abfrage 2-3 Datensätze enthalten sind, die sich mehr oder weniger...

Anmelden oder registrieren

Suche

Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.

Akzeptieren Weitere Informationen...

Information ausblenden