Any way to recover a deleted module?

[Dorian]

I inadvertently deleted a module. I can see from the mdb file size that it
probably still exists somewhere (I have not done compact). Is there any way
to recover it? I have no back up since I just newly coded it.
-- Dorian
"Give someone a fish and they eat for a day; teach someone to fish and they
eat for a lifetime".

 

[Jerry Whittle]

I have some doubts that you'll be able to. You might try this:

http://www.demtron.com/blog/post/2008/10/12/Export-Modules-to-Text-Files-in-Microsoft-Access.aspx

 

[Larry Linson]

I inadvertently deleted a module. I can see from
the mdb file size that it probably still exists somewhere
(I have not done compact). Is there any way to recover
it? I have no back up since I just newly coded it.

Immediately make a copy, and save the original, if you haven't already done
that.

If nothing else works, there are data recovery services who may be able to
help you. Peter Miller, of PKSolutions.com, has an outstanding reputation.
At one time, I know he offered free evaluation and estimates, but don't know
if that is still the case. It may turn out that re-creating the module would
be more cost-effective, depending on its size and complexity.

Larry Linson
Microsoft Office Access MVP

 

[Dorian]

Good try but following code displayed zero modules.
i = 0
For Each accObj In CurrentProject.AllModules
i = i + 1
Call WriteOutModules(accObj.Name, True)
Next
MsgBox "Found " & i & " modules", , "CreateModuleFiles"
-- Dorian
"Give someone a fish and they eat for a day; teach someone to fish and they
eat for a lifetime".