Tel: 0203-2814763

 
Home


Access-Entwickler
Referenzen


Access-Forum
Access-Downloads
Access-Suchmaschine
knowhow.mdb
Artikel
Access-Links
Access-Codebeispiele
Access-FAQ
Access-Lernvideos
Verschiedenes
Autoren-Login

 

newsletter
Kontakt/Impressum
Haftungsausschluß
English

 

 

Neue Version der Tools.mdb


Volker Raschke hat eine leicht überarbeitete Version seiner MS Access Beispieldatenbank Tools.mdb zur Verfügung gestellt.



Zum Download geht es über die Download-Rubrik.

 

Neu und geändert in dieser Version:

(D8) Feld Info In einem Formular Übersicht der angesprochenen Felder zeigen (In Einzelanzeige)
Call M_G_DokuAbf("AF_Arbeitsplan", False, True)
DoCmd.OpenForm "FO_Tools_FeldInfo"
' Beispiel für Tabelle
'Call M_G_DokuTab("TB_I_STARTIKEL", False, True)
'DoCmd.OpenForm "FO_Tools_FeldInfo"

(A8 A4) Double Summen Rätsel ergänzt um Rechenrätsel in M_G_FormatZ

(A8 A4) Double Summen Rätsel

(A8 A3) Einfache Hilfe-Meldungen für Anwendungen, für welche die in B1 gezeigte Form zu aufwändig ist

(C7) Function M_G_ExcelImp Korrektur Berechnung ZAnz
  For Z = 1 To ZE Step ZBlock
     ZB = Z + ZBlock - 1
     ZAnz = ZBlock
     If ZB > ZE Then
'        ZAnz = ZBlock - (ZB - ZE) + 1 ' Falsch !!
        ZAnz = ZBlock - (ZB - ZE)  ' 10.2.2011
        ZB = ZE
     End If

(A8 A2) Zugriff mit SoundEx (Länderkennzeichen)

Trennung zwischen M_P_PwMSG und M_P_PwMSG_W, damit M_P_PwMSG ohne M_Y_Kr übernommen werden kann.

Beim Komprimieren korrigiert:
If CInt(SysCmd(acSysCmdAccessVer))    SendKeysEx "%xdk" 'komprimieren bei Single User Access 97 / 2000
Else
   SendKeysEx "%xmk" 'komprimieren bei höher Access 2000
End If
Vorher habe ich mit CurrentDb.Version gearbeitet, allerdings liefert das die Jet Version der MDB.
Diese Korrektur auch in A4 (Umgebungsvariablen)

(F2) von verschiedenen MDBs das letze Änderungsdatum von 3 Objekten zeigen

 

 

zurück

 

 

 

______________________