MS Access is not responding, Send Report or Don't Send Report

  • Thread starter Thread starter FA
  • Start date Start date
F

FA

Hi Friends,
I have built an application on MS Access with the SQL Server on the
back end. It has 15 forms and 25 Linked tables with SQL Server.
Everything seems to be running fine except one form which has a combo
box and a subform. Combo box is used to populate data in the subform.
When i make one time selection it works fine, but when i constantly
select different record from the combo box , Microsoft Access error (MS
Access is not responding )occurs ("Send Report or Don't Send Report").
It is so scary because everything is already been built and i dont know
why its doing this.

Can someone help me out please.

Moe
 
FA said:
Hi Friends,
I have built an application on MS Access with the SQL Server on the
back end. It has 15 forms and 25 Linked tables with SQL Server.
Everything seems to be running fine except one form which has a combo
box and a subform. Combo box is used to populate data in the subform.
When i make one time selection it works fine, but when i constantly
select different record from the combo box , Microsoft Access error (MS
Access is not responding )occurs ("Send Report or Don't Send Report").
It is so scary because everything is already been built and i dont know
why its doing this.

I can only imagine that when you "constantly select different records", you
are doing it faster than the Subform data can be retrieved and that Access
"locks up" waiting for one, or more, I/O operations to complete. Don't
select another until the previous one completes its display in the Subform
and see if that helps.

Larry Linson
Microsoft Access MVP
 
Thanks, but sometimes it does it on the first time when i go to that
form and choose one record from combo box (which is populating all the
fields in the subform). It just happend now when i open my DB and
retest all the controls and forms, its saying Microsoft Access has
encountered an error and its not responding. Sorry for the
incovinience, send report or dont send report.


Please help me, all my work will go to waste if this problem doesnt
resolve.

Thanks

Moe
 
Thanks, but sometimes it does it on the first time when i go to that
form and choose one record from combo box (which is populating all the
fields in the subform). It just happend now when i open my DB and
retest all the controls and forms, its saying Microsoft Access has
encountered an error and its not responding. Sorry for the
incovinience, send report or dont send report.


Please help me, all my work will go to waste if this problem doesnt
resolve.

Thanks

Moe
 
FA said:
Thanks, but sometimes it does it on the first time when i go to that
form and choose one record from combo box (which is populating all the
fields in the subform). It just happend now when i open my DB and
retest all the controls and forms, its saying Microsoft Access has
encountered an error and its not responding. Sorry for the
incovinience, send report or dont send report.


Please help me, all my work will go to waste if this problem doesnt
resolve.

Remote debugging is difficult at best; with only a high level description,
it is impossible.

Before I even suggest additional detail that we need,

(1) you need to validate that you have all the applicable service packs and
updates for the version of Access you are using.

(2) You need to tell us

(a) what version of Access you are using,
(b) whether you are using an Access MDB/MDE with ODBC linked tables in MS
SQL Server or an Access ADP/ADE with OLEDB links to SQL Server,
(c) whether you generated the ComboBox to find a record using the Combo Box
wizard, or whether you wrote the code yourself.

Just so you'll know, "Access is not responding" and "Access has encountered
an error and must close" are NOT the same error.

If I had an "Access has encountered an error and must close" error that was
repeatable, I would assume that I had (1) a corrupted installation of Access
or (2) a corrupted database.

Steps to deal with a corrupted installation:

1. get the Install CD and try to repair
2. if that doesn't work, UNINSTALL, get the sofdtware from Microsoft's web
site to clean out all traces of an Office install and run it, then
3. reinstall Office / Access

Steps to deal with a corrupted installation:

1. Google for Allen Browne's detailed description of /DECOMPILE
2. If that doesn't work, Google for a description of how to SaveAsText
a. Save all Objects in your MDB as Text
b. use Load from Text to create a new MDB

If neither of the above improve the situation, then I'd break down and call
Microsoft Tech Support.

Larry Linson
Microsoft Access MVP
 
Thanks Larry here are the info that might help in understanding the
problem.
(a) what version of Access you are using ------------ MS Access 2003
b) whether you are using an Access MDB/MDE with ODBC linked tables in
MS
SQL Server --------------- YES
c) whether you generated the ComboBox to find a record using the Combo
Box
wizard, or whether you wrote the code yourself. Following is the code
of my Combo Box AfterUpdate Event
Dim rs As Object
Dim frmFinding As Form_frmFinding
Set rs = Me.Recordset.Clone
rs.FindFirst "[FINDG_STD_ID] = " & Str(Nz(Me![Combo48], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark

[Form_frmFinding]![PLCY1] = DLookup("[PLCY1]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY2] = DLookup("[PLCY2]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY3] = DLookup("[PLCY3]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY4] = DLookup("[PLCY4]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY5] = DLookup("[PLCY5]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY6] = DLookup("[PLCY6]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY7] = DLookup("[PLCY7]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY8] = DLookup("[PLCY8]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY9] = DLookup("[PLCY9]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL1] = DLookup("[URL1]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL2] = DLookup("[URL2]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL3] = DLookup("[URL3]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL4] = DLookup("[URL4]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL5] = DLookup("[URL5]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL6] = DLookup("[URL6]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL7] = DLookup("[URL7]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL8] = DLookup("[URL8]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL9] = DLookup("[URL9]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG1] = DLookup("[CATG1]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG2] = DLookup("[CATG2]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG3] = DLookup("[CATG3]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG4] = DLookup("[CATG4]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG5] = DLookup("[CATG5]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG6] = DLookup("[CATG6]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG7] = DLookup("[CATG7]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG8] = DLookup("[CATG8]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG9] = DLookup("[CATG9]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)

FootNotes:
Form Name = frmNewFinding(Master) , Table Name = STD_FINDG, PK =
FINDG_STD_ID (The data in this table is static)
SubForm Name = frmFinding(Child), Table Name = FINDG, PK = FINDG_NO, FK
= FINDG_STD_ID (The data is not static instead the data is coming from
Table (STD_FINDG) and saving into Table (FINDG).

Linked Fields:
FINDG_STD_ID;FINDG_NME;OWASP_CLS;SANS_TOP10;CVE_NO;RSK_GUIDE;STD_RSK;STD_IMPC;STD_LIKLIHOOD;SMRY;CMNT;RCMN;RSK_DESC;SYS_ID
I know i have too many linked fields but thats the only way its
working, if i just put FINDG_STD_ID as linked field, it doesnt populate
the rest of the fields.

The exact wording of the error is "Microsoft Access has encountered a
Problem, sorry for inconinience, Repair Database, Send Report or Dont
Send Report" This is a little popup form that apears.

I hope this information would help you finding the right solution for
me.
 
When you get that message, you haven't just got a small logic error --
Access has, indeed, encountered an internal problem from which it cannot
reasonably recover. Sending a Report doesn't "put you in the queue for a
quick patch from Microsoft", but will help them solidify the problem for the
future. And, I fear that "general tips and hints" are not going to resolve
the problem, but "y'never know"...

You appear to properly locate a record in the RecordSource, and move to that
Record by setting the Form's Bookmark. I am wondering why you then have to
set the value of so many Controls on the Form with DLookup statements... are
these Controls not bound to the corresponding Field in the RecordSource?

No, I don't understand all the LinkingFields -- are you using these in the
LinkMasterFields and LinkChildFields of a Subform Control?

It appears to me that you are using identical names for Controls and the
Fields they display -- that can be confusing to Access when it is executing.
I suggest you rename the Text Boxes that have identical names to the Field,
by prefixing the Field Name with "txt", List Boxes with "lst" and Combo
Boxes with "cbo".

I'd "Dim rs as DAO.Recordset" not the generic "object". And, in what you
post, I don't see where you used the "frmFinding" that you Dimmed
immediately following -- what is the purpose of "Dim frmFinding as
Form_frmFinding"? If you are trying to create a new instance of the Form,
you need to use "New". Depending on your intent and use, I might suggest
revising that definition, too.

Have you used Office Update to assure that you have, at least, the latest
SP/SR for Access and the Jet Engine? Have you used Microsoft Update or
Windows Update to assure that your OS is updated?

Larry Linson
Microsoft Access MVP

FA said:
Thanks Larry here are the info that might help in understanding the
problem.
(a) what version of Access you are using ------------ MS Access 2003
b) whether you are using an Access MDB/MDE with ODBC linked tables in
MS
SQL Server --------------- YES
c) whether you generated the ComboBox to find a record using the Combo
Box
wizard, or whether you wrote the code yourself. Following is the code
of my Combo Box AfterUpdate Event
Dim rs As Object
Dim frmFinding As Form_frmFinding
Set rs = Me.Recordset.Clone
rs.FindFirst "[FINDG_STD_ID] = " & Str(Nz(Me![Combo48], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark

[Form_frmFinding]![PLCY1] = DLookup("[PLCY1]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY2] = DLookup("[PLCY2]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY3] = DLookup("[PLCY3]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY4] = DLookup("[PLCY4]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY5] = DLookup("[PLCY5]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY6] = DLookup("[PLCY6]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY7] = DLookup("[PLCY7]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY8] = DLookup("[PLCY8]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![PLCY9] = DLookup("[PLCY9]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL1] = DLookup("[URL1]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL2] = DLookup("[URL2]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL3] = DLookup("[URL3]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL4] = DLookup("[URL4]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL5] = DLookup("[URL5]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL6] = DLookup("[URL6]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL7] = DLookup("[URL7]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL8] = DLookup("[URL8]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![URL9] = DLookup("[URL9]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG1] = DLookup("[CATG1]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG2] = DLookup("[CATG2]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG3] = DLookup("[CATG3]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG4] = DLookup("[CATG4]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG5] = DLookup("[CATG5]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG6] = DLookup("[CATG6]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG7] = DLookup("[CATG7]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG8] = DLookup("[CATG8]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)
[Form_frmFinding]![CATG9] = DLookup("[CATG9]", "dbo_STD_FINDG",
"[FINDG_STD_ID] = " & Me.Combo48)

FootNotes:
Form Name = frmNewFinding(Master) , Table Name = STD_FINDG, PK =
FINDG_STD_ID (The data in this table is static)
SubForm Name = frmFinding(Child), Table Name = FINDG, PK = FINDG_NO, FK
= FINDG_STD_ID (The data is not static instead the data is coming from
Table (STD_FINDG) and saving into Table (FINDG).

Linked Fields:
FINDG_STD_ID;FINDG_NME;OWASP_CLS;SANS_TOP10;CVE_NO;RSK_GUIDE;STD_RSK;STD_IMPC;STD_LIKLIHOOD;SMRY;CMNT;RCMN;RSK_DESC;SYS_ID
I know i have too many linked fields but thats the only way its
working, if i just put FINDG_STD_ID as linked field, it doesnt populate
the rest of the fields.

The exact wording of the error is "Microsoft Access has encountered a
Problem, sorry for inconinience, Repair Database, Send Report or Dont
Send Report" This is a little popup form that apears.

I hope this information would help you finding the right solution for
me.
 
Ok now i am really confused. We can do one thing, i can explain the
functionality that the form requires and you can suggest me the better
way of doing it.
Following is the description.

Tables:
1) SYS_INFO (PK - SYS_ID_CODE)
2) FINDG (PK - FINDG_NO, FK - SYS_ID_CODE, FK - FINDG_STD_ID)
3) STD_FINDG ( PK - FINDG_STD_ID)

Forms:
1) frmSystem (SYS_INFO)
2) frmNewFINDG (STD_FINDG)
3) subform of frmNewFINDG frmFINDG (FINDG)

Here is the senario
- frmSystem will take all the system information and then a tester will
run a test and there store all the findings into finding table via
subform frmFINDG

- frmNewFINDG which is based on table STD_FINDG that has a default data
for each finding name. All the fields in Table STD_FINDG and Table
FINDG are same. STD_FINDG is providing the data to FINDG table which
will be stored for every SYS_ID_CODE.
- I made a frmNewFINDG that has a combo boc for FINDG_NME, so a tester
can select their desired finding name and all the data should populate
into subform frmFINDG and then save into table FINDG for every
SYS_ID_CODE. One SYS_ID_CODE can have many FINDG_NO.
- for that reason i created the codes mentioned in above message. I had
to link all the fields in the subform property window but since the
fields are too many there was not enough space to add more. That was
the reason i have the above code for the rest of the field. Following
is the list of the field that i have on both FINDG and STD_FINDG
tables. I want to prepopulate the fields data in subform frmFINDG.
FINDG_NME
SMRY
COMNT
RSKDESC
STD_RSK
STD_IMPC
STD_LIKLI
OWASP_CLS
SANS_TOP10
CVE_NO
RSK_GUIDE
PLCY1, PLCY2, PLCY3, PLCY4, PLCY5, PLCY6, PLCY7, PLCY8, PLCY9
URL1, URL2, URL3, URL4, URL5, URL6, URL7, URL8, URL9

All of the above fields are present in both tables except STD_FINDG has
the default data and table FINDG is taking the data and saving it for
each SYS_ID_CODE.

I request you to help me out to resolve my problem. If you have any
suggestion in mind please let me know so i can follow that.

Thanks alot for your help Larry

Moe
 
Back
Top