I've done searches on the forum for this issue, but no one has gotten this specific.
I built a database with some VBA coding in Access 2000.
Then, I tried to run the database on Access 2002 and unfortunately, it does not work in two respects. I will try to be as detailed as I can. By the way, I need to be able to have the database Access 2002 compatible within a limited timeframe (otherwise I wouldn't be asking for help).
Deficiency #1 in Access 2002:
I wanted to have the mouse cursor turn into a hand when it was passed over a button.
So, I edited the properties of the (command) button's HyperLink Subaddress field to include either 1 space or the button's destination object (for example: "Form Switchboard").
In certain instances, I included some VB code to change destinations depending on the result of the button being pushed:
Me.BtnGenerate.HyperlinkSubAddress = "Report EP"
In Access 2002, it seems that this technique causes compatibility problems. When a button is pressed, the message "Can't Follow the Hyperlink... Please Verify the Destination." What gives? It worked in Access 2000.
So I got rid of the Hyperlink SubAddress from my buttons. Not a big deal, but if anyone has any suggestions... it would be apprediated.
Deficiency #2 in Access 2002:
I have a "switchboard" Form that uses the following code to open and run a report when a button is pressed. And after the report is run, the switchboard is automatically closed and a different (Print Dialog) Form is automatically opened.
Problem: When the switchboard form's Generate Button is pressed, the only thing that happens is the report "EP" opens... in DESIGN mode!! Why would it open in Design mode??? Obviously, from that point on, nothing else happens with the program.
Code:
FORM SWITCHBOARD:
Private Sub BtnGenerate_Click()
Me.BtnGenerate.HyperlinkSubAddress = "Report EP"
DoCmd.OpenReport "EP", acViewPreview, , ""
DoCmd.OpenForm "Print", acNormal, , , acFormPropertySettings, acWindowNormal, ""
End Sub
REPORT EP:
Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = Forms!Switchboard.LstTables.ItemData(varItem)
DoCmd.Close acForm, "Switchboard", acSaveNo
End Sub
FORM PRINT:
Private Sub BtnStartOver_Click()
DoCmd.Close acReport, "EP", acSaveNo
DoCmd.OpenForm "Switchboard", acNormal, , , acFormPropertySettings, acDialog, ""
End Sub
I built a database with some VBA coding in Access 2000.
Then, I tried to run the database on Access 2002 and unfortunately, it does not work in two respects. I will try to be as detailed as I can. By the way, I need to be able to have the database Access 2002 compatible within a limited timeframe (otherwise I wouldn't be asking for help).
Deficiency #1 in Access 2002:
I wanted to have the mouse cursor turn into a hand when it was passed over a button.
So, I edited the properties of the (command) button's HyperLink Subaddress field to include either 1 space or the button's destination object (for example: "Form Switchboard").
In certain instances, I included some VB code to change destinations depending on the result of the button being pushed:
Me.BtnGenerate.HyperlinkSubAddress = "Report EP"
In Access 2002, it seems that this technique causes compatibility problems. When a button is pressed, the message "Can't Follow the Hyperlink... Please Verify the Destination." What gives? It worked in Access 2000.
So I got rid of the Hyperlink SubAddress from my buttons. Not a big deal, but if anyone has any suggestions... it would be apprediated.
Deficiency #2 in Access 2002:
I have a "switchboard" Form that uses the following code to open and run a report when a button is pressed. And after the report is run, the switchboard is automatically closed and a different (Print Dialog) Form is automatically opened.
Problem: When the switchboard form's Generate Button is pressed, the only thing that happens is the report "EP" opens... in DESIGN mode!! Why would it open in Design mode??? Obviously, from that point on, nothing else happens with the program.
Code:
FORM SWITCHBOARD:
Private Sub BtnGenerate_Click()
Me.BtnGenerate.HyperlinkSubAddress = "Report EP"
DoCmd.OpenReport "EP", acViewPreview, , ""
DoCmd.OpenForm "Print", acNormal, , , acFormPropertySettings, acWindowNormal, ""
End Sub
REPORT EP:
Private Sub Report_Open(Cancel As Integer)
Me.RecordSource = Forms!Switchboard.LstTables.ItemData(varItem)
DoCmd.Close acForm, "Switchboard", acSaveNo
End Sub
FORM PRINT:
Private Sub BtnStartOver_Click()
DoCmd.Close acReport, "EP", acSaveNo
DoCmd.OpenForm "Switchboard", acNormal, , , acFormPropertySettings, acDialog, ""
End Sub
