By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
429,480 Members | 755 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 429,480 IT Pros & Developers. It's quick & easy.

Access 97 to Access 2003 conversion problem !

P: n/a
I have just been asked to port an Access 97 app from an old Pentium 3
to a new Pentium Core-2-Duo PC.

On the new PC, Office 2003 is installed. On opening the database,
Access provided me with an option to convert the database which I did.

However, there are a couple of small issues. For one, there were a
couple of conversion errors which it stored in a conversion errors
table (saying it could not find the field "description").

Secondly, and this is my main problem ...

When I click on a button in the old Acc97 app it used to work fine,
however in Acc2003 it says "The command or action 'SaveRecord' isn't
available now". Here is the sub where it occurs:

Private Sub Cash_RV_Preview_Click()
On Error GoTo Err_Cash_RV_Preview_Click

[RVHAMT] = [Receipt Voucher Sub Form].[Form]![PAYABLE AMT]
[RVHDIS] = [Receipt Voucher Sub Form].[Form]![TOTAL DISCOUNT]

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, ,
acMenuVer70

Dim stDocName As String

stDocName = "Receipt Voucher Printing Cash"
DoCmd.OpenReport stDocName, acPreview

Exit_Cash_RV_Preview_Click:
Exit Sub

Err_Cash_RV_Preview_Click:
MsgBox Err.Description
Resume Exit_Cash_RV_Preview_Click

End Sub


On checking the Menu Bar I saw the action "Save Record Shift+Enter"
is grayed out & not available in the Acc2003 app. However, when
checking it under Access 97 on the other PC, the option Save Record is
available.

Could someone please throw some light on this & guide me as to how to
proceed further with such errors ?

Thx & Best Rgds,
Prakash

Sep 8 '08 #1
Share this Question
Share on Google+
3 Replies


P: n/a
If there is no field named 'description', this is a form of corruption. Try
a compact/repair of the old database in Access 97. If that doesn't work, try
creating a new (blank) database, and importing everything.

In place of the SaveRecord line, try:
If Me.Dirty Then Me.Dirty = False
That should work in both versions.
If it doesn't what are RVHAMT and RVHDIS? If they are fields in the form's
RecordSource but not text boxes on the form, create text boxes for them and
see if that solves the problem. (Visible = No if you don't want to see
them.)

--
Allen Browne - Microsoft MVP. Perth, Western Australia
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

<pr*************@gmail.comwrote in message
news:89**********************************@k7g2000h sd.googlegroups.com...
>I have just been asked to port an Access 97 app from an old Pentium 3
to a new Pentium Core-2-Duo PC.

On the new PC, Office 2003 is installed. On opening the database,
Access provided me with an option to convert the database which I did.

However, there are a couple of small issues. For one, there were a
couple of conversion errors which it stored in a conversion errors
table (saying it could not find the field "description").

Secondly, and this is my main problem ...

When I click on a button in the old Acc97 app it used to work fine,
however in Acc2003 it says "The command or action 'SaveRecord' isn't
available now". Here is the sub where it occurs:

Private Sub Cash_RV_Preview_Click()
On Error GoTo Err_Cash_RV_Preview_Click

[RVHAMT] = [Receipt Voucher Sub Form].[Form]![PAYABLE AMT]
[RVHDIS] = [Receipt Voucher Sub Form].[Form]![TOTAL DISCOUNT]

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, ,
acMenuVer70

Dim stDocName As String

stDocName = "Receipt Voucher Printing Cash"
DoCmd.OpenReport stDocName, acPreview

Exit_Cash_RV_Preview_Click:
Exit Sub

Err_Cash_RV_Preview_Click:
MsgBox Err.Description
Resume Exit_Cash_RV_Preview_Click

End Sub


On checking the Menu Bar I saw the action "Save Record Shift+Enter"
is grayed out & not available in the Acc2003 app. However, when
checking it under Access 97 on the other PC, the option Save Record is
available.

Could someone please throw some light on this & guide me as to how to
proceed further with such errors ?

Thx & Best Rgds,
Prakash
Sep 8 '08 #2

P: n/a
Hi Allen ! Thx for such a swift response.

1) Your solution: If Me.Dirty Then Me.Dirty = False worked
absolutely fine !!

2) RVHAMT and RVHDIS are hidden controls on the form. The Record
Source of the Form is a Query which is based on 4 tables.

3) The conversion errors table consists of the foll:
----------------- -------------------
-----------------------
Object Type Object Name Error Description
----------------- -------------------
-----------------------
Table MSysObjects -1017: Could not find field
'Description'.
I have checked all the 50 tables & there seems to be no field with the
name "Description". However, there is one table having a field called
"Desc". Perhaps that was renamed by someone along the way ? I guess
you'll have a much better understanding of this.

I hope I'm ok so far, or is there anything else I need to worry
about ?

This app belongs to a Video Library so I'll make this change (Dirty)
in place of the Save Action and see how things progress. If any
further errors crop up beyond my reach, I'll post them here.

In the meanwhile if you feel I need to watch out for anything based on
the information I've given, please do let me know.

Thx & Best Rgds,
Prakash.

On Sep 8, 8:20*pm, "Allen Browne" <AllenBro...@SeeSig.Invalidwrote:
If there is no field named 'description', this is a form of corruption. Try
a compact/repair of the old database in Access 97. If that doesn't work, try
creating a new (blank) database, and importing everything.

In place of the SaveRecord line, try:
* * If Me.Dirty Then Me.Dirty = False
That should work in both versions.
If it doesn't what are RVHAMT and RVHDIS? If they are fields in the form's
RecordSource but not text boxes on the form, create text boxes for them and
see if that solves the problem. (Visible = No if you don't want to see
them.)

--
Allen Browne - Microsoft MVP. *Perth, Western Australia
Tips for Access users -http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

<prakashwadhw...@gmail.comwrote in message

news:89**********************************@k7g2000h sd.googlegroups.com...
I have just been asked to port an Access 97 app from an old Pentium 3
to a new Pentium Core-2-Duo PC.
On the new PC, Office 2003 is installed. On opening the database,
Access provided me with an option to convert the database which I did.
However, there are a couple of small issues. For one, there were a
couple of conversion errors which it stored in a conversion errors
table (saying it could not find the field "description").
Secondly, and this is my main problem ...
When I click on a button in the old Acc97 app it used to work fine,
however in Acc2003 it says "The command or action 'SaveRecord' isn't
available now". Here is the sub where it occurs:
Private Sub Cash_RV_Preview_Click()
On Error GoTo Err_Cash_RV_Preview_Click
* *[RVHAMT] = [Receipt Voucher Sub Form].[Form]![PAYABLE AMT]
* *[RVHDIS] = [Receipt Voucher Sub Form].[Form]![TOTAL DISCOUNT]
* *DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, ,
acMenuVer70
* *Dim stDocName As String
* *stDocName = "Receipt Voucher Printing Cash"
* *DoCmd.OpenReport stDocName, acPreview
Exit_Cash_RV_Preview_Click:
* *Exit Sub
Err_Cash_RV_Preview_Click:
* *MsgBox Err.Description
* *Resume Exit_Cash_RV_Preview_Click
End Sub
On checking the Menu Bar I saw the action "Save Record *Shift+Enter"
is grayed out & not available in the Acc2003 app. However, when
checking it under Access 97 on the other PC, the option Save Record is
available.
Could someone please throw some light on this & guide me as to how to
proceed further with such errors ?
Thx & Best Rgds,
Prakash
Sep 8 '08 #3

P: n/a
Great. You have it sorted.

Can I suggest making sure that Name AutoCorrect is turned off in the new
A2003 database. As for why, see:
Failures caused by Name Auto-Correct
at:
http://allenbrowne.com/bug-03.html

--
Allen Browne - Microsoft MVP. Perth, Western Australia
Tips for Access users - http://allenbrowne.com/tips.html
Reply to group, rather than allenbrowne at mvps dot org.

<pr*************@gmail.comwrote in message
news:3f**********************************@e53g2000 hsa.googlegroups.com...
Hi Allen ! Thx for such a swift response.

1) Your solution: If Me.Dirty Then Me.Dirty = False worked
absolutely fine !!

2) RVHAMT and RVHDIS are hidden controls on the form. The Record
Source of the Form is a Query which is based on 4 tables.

3) The conversion errors table consists of the foll:
----------------- -------------------
-----------------------
Object Type Object Name Error Description
----------------- -------------------
-----------------------
Table MSysObjects -1017: Could not find field
'Description'.
I have checked all the 50 tables & there seems to be no field with the
name "Description". However, there is one table having a field called
"Desc". Perhaps that was renamed by someone along the way ? I guess
you'll have a much better understanding of this.

I hope I'm ok so far, or is there anything else I need to worry
about ?

This app belongs to a Video Library so I'll make this change (Dirty)
in place of the Save Action and see how things progress. If any
further errors crop up beyond my reach, I'll post them here.

In the meanwhile if you feel I need to watch out for anything based on
the information I've given, please do let me know.

Thx & Best Rgds,
Prakash.

Sep 9 '08 #4

This discussion thread is closed

Replies have been disabled for this discussion.