You can contact me via mail. You can also subscribe to a newsletter, if you want to be informed about new versions.


You can contact me with a mail to Any feedback will be appreciated.

If you can reproduce a bug only with a particular database, please consider to enclose the DB (only structure, no data) to simplify bug hunting. Here a procedure for that purpose.

1. Make a copy
2. Delete the data in your copy (!) by hand or paste this code into a module and run it

Sub DeleteAllData()
Dim td As TableDef  'needs a reference to the DAO library
Dim rel As Relation

'--- first delete all relationships to avoid error when
'--- deleting data in the wrong order
For Each rel In CurrentDb.Relations
CurrentDb.Relations.Delete rel.Name
Next rel

'--- now delete the data in tables
For Each td In CurrentDb.TableDefs
'--- only for local, non-system tables
If td.Connect = "" And (td.Attributes And dbSystemObject) = 0 Then
CurrentDb.Execute "DELETE * FROM [" & td.Name & "]", dbFailOnError
End If
Next td
End Sub

3. Compact and repair the DB
4. Zip the DB

Newsletter (new releases only)

If you would like to be notified about new versions, you can subscribe to a newsletter by sending a mail to Of course I will not disclose your email-address to any third party, and you can unsubscribe at any time.