access 2003 sp3

[guy rulkin]

Hi,



I use access 2003 sp2 with source safe. Some little bugs but it works fine.



Having just upgraded to Office 2003 SP3, impossible to create a new database
from the source safe project. Many messages during the import of many forms
(? error during importing, can't find record, ...) and finally access crashs



With an old database, each time i try to open some form in form view or in
design view, access crashs every time



Faulting application msaccess.exe, version 11.0.8166.0, stamp 46437912,
faulting module msaccess.exe, version 11.0.8166.0, stamp 46437912, debug? 0,
fault address 0x0014f122.



Event id : 1000, source: microsoft office



Any idee?

 

[Paul Shapiro]

I just tried creating a db from SourceSafe 2005 with Access 2003 SP 3
running on WinXP SP2.

First error message is "The search key was not found in any record." Then an
error that one particular form could not be imported from sourcesafe.

I don't know if this is related, but a few months ago I had a client using
Access 2007 with a db I built in Access 2003. There were strange corruption
problems with several forms when the db was created from a sourcesafe
project. In that case the resolution was to make sure every form was opened
in Access 2003 before the db was ever used in Access 2007. The only reasons
I think it could be related are a) SP3 incorporates some of the security
settings from 2007 and b) it was sourcesafe-specific.

If you have a machine running Access 2003 pre-SP3, you could try opening the
db on that machine and opening every form. Then see if it works on the
machine with SP3. I used this routine to automate the process.

Public Function FormsOpenAndCloseAll() As Boolean
'Open ALL forms in the current project. _
This is intended to be run when the code db has been created from
SourceSafe. _
Access 2007 sometimes finds a form created in A2003 to be corrupt. _
One way to prevent this problem is to open the forms in A2003, _
AFTER the db has had sourcecode control removed.
On Error GoTo ErrorHandler
Dim frm As AccessObject 'Temporary form

Dim fSuccess As Boolean 'Have we been successful?
Dim strFormName As String 'Name of the current form

'Open and close each form
For Each frm In CurrentProject.AllForms
strFormName = frm.Name
Select Case strFormName
Case "frmTableOfContents", "frmAbstractDialogModeDupSub"
'Don't open these forms because they generate errors when used
this way.
Case Else
DoCmd.OpenForm FormName:=strFormName, View:=acNormal,
WindowMode:=acWindowNormal
Call pjsWait(lngMilliSecs:=250)
DoCmd.Close acForm, strFormName
End Select
Next frm

'Assume we succeeded if we get here.
fSuccess = True

ExitHandler:
On Error Resume Next
DoCmd.Close acForm, frm.Name
Set frm = Nothing
FormsOpenAndCloseAll = fSuccess
Exit Function

ErrorHandler:
'Notify user of error, if desired.
fSuccess = False
Resume ExitHandler
End Function