Passing an ID number to acGoTo (newbie)

[Peter Tenk]

Hi
I've never really worked with VBScript - I'm an old-fashioned HTML guy - but I thought I'd have a go because I wanted to do something REALLY SIMPLE in my Access 2000 database. This is a plea for help, days later, having trawled the Internet repeatedly and experimented as much as I dare looking for anything that will work.

I have a form called Communications (I now know it shoulda been frm_Communicati ons!). In it there is a combo box called Abbreviation. This refers to the Row Source: qry_Union_Abbre viations to get a list of abbreviations, along with ID number and Full name, from a Table called Communications (yep, shoulda been tbl_Communicati ons!).

The query concerned has one bound column, and the field ID is the first one, and is indexed and a primary key (in the form "Unions" which I'm wanting to call).

Anyway - the "simple task" I set myself was to put a little button beside this combo box which, when clicked on, would refer to the data in the Combo box and then open another form and go to the record whose value was that named in the Combo box.

Here's the code I have used for my On_Click Event Procedure:

Private Sub Union_more_Clic k()
intGlobalVariab le = [Union Abbreviation]
DoCmd.OpenForm "Unions"
DoCmd.GoToRecor d , , acGoTo, intGlobalVariab le
End Sub

intGlobalVariab le is defined as an Integer in a module called Module1. which also contains strGlobalVariab le, defined as a string.

On click I get error number 2498 - "an expression you entered is the wrong data type for one of the arguments".

In debugging I see the acGoTo value is "4" (seems to be always 4, no matter which record I start from) while the intGlobalVariab le is the text string in the combo box.

If I use strGlobalVariab le it makes no difference.

I have to say I've tried everything I've been able to find in forums, and the experience has got me interested in VBScript, but I know for sure ain't gonna solve this one on my own. Any suggestions you can offer will help preserve my sanity.

PS If it's any help the following code DOES open the right form, and go to the right record:

Private Sub Union_more_Clic k()
DoCmd.OpenForm "Unions"
DoCmd.GoToRecor d , , acGoTo, 7
End Sub

I think I just need to find a way to pass an ID number to acGoTo. But I'll let you be the judge of that.

[Peter Tenk]

Hi
I'm trying to set up a button which will go to a string value in another form. Too simple, you say?

I have a form called Communications. In it there is a combo box called Abbreviation. This refers to the Row Source: qry_Union_Abbre viations to extract a short name, along with the ID number, from a Table.

The query has one bound column, the field ID is the first one, and it is indexed and a primary key (in the form "Unions" which I'm wanting to call).

So the simple beginner's task I set myself was to put a little button beside this combo box which, when clicked, would refer to the data in the Combo box and then open up the other form and go to the record whose value was that named in the Combo box.

Here's the code I have used for my On_Click Event Procedure:

Private Sub Union_more_Clic k()
intGlobalVariab le = [Union Abbreviation]
DoCmd.OpenForm "Unions"
DoCmd.GoToRecor d , , acGoTo, intGlobalVariab le
End Sub

On click I get error number 2498 - "an expression you entered is the wrong data type for one of the arguments".

In debugging I see the acGoTo value is "4" (seems to be always 4, no matter which record I start from) while the intGlobalVariab le is the text string in the combo box.

If I use strGlobalVariab le it makes no difference.

I've tried everything I've been able to find in forums, and the experience has been great, though frustrating. But I know for sure ain't gonna solve this one on my own. Any suggestions you can offer will help preserve my sanity.

PS If it's any help I'm using Access 2000 and the following code DOES open the right form, and go to the specified record (ie 7):

Private Sub Union_more_Clic k()
DoCmd.OpenForm "Unions"
DoCmd.GoToRecor d , , acGoTo, 7
End Sub

I think I just need to find a way to pass an ID number to acGoTo. But I'll let you be the judge of that.

[ADezii]

Hi
I'm trying to set up a button which will go to a string value in another form. Too simple, you say?

I have a form called Communications. In it there is a combo box called Abbreviation. This refers to the Row Source: qry_Union_Abbre viations to extract a short name, along with the ID number, from a Table.

The query has one bound column, the field ID is the first one, and it is indexed and a primary key (in the form "Unions" which I'm wanting to call).

So the simple beginner's task I set myself was to put a little button beside this combo box which, when clicked, would refer to the data in the Combo box and then open up the other form and go to the record whose value was that named in the Combo box.

Here's the code I have used for my On_Click Event Procedure:

Private Sub Union_more_Clic k()
intGlobalVariab le = [Union Abbreviation]
DoCmd.OpenForm "Unions"
DoCmd.GoToRecor d , , acGoTo, intGlobalVariab le
End Sub

On click I get error number 2498 - "an expression you entered is the wrong data type for one of the arguments".

In debugging I see the acGoTo value is "4" (seems to be always 4, no matter which record I start from) while the intGlobalVariab le is the text string in the combo box.

If I use strGlobalVariab le it makes no difference.

I've tried everything I've been able to find in forums, and the experience has been great, though frustrating. But I know for sure ain't gonna solve this one on my own. Any suggestions you can offer will help preserve my sanity.

PS If it's any help I'm using Access 2000 and the following code DOES open the right form, and go to the specified record (ie 7):

Private Sub Union_more_Clic k()
DoCmd.OpenForm "Unions"
DoCmd.GoToRecor d , , acGoTo, 7
End Sub

I think I just need to find a way to pass an ID number to acGoTo. But I'll let you be the judge of that.

DoCmd.OpenForm "Unions", acNormal, , "[ID] = " & Me![Abbreviation], acFormEdit, acWindowNormal

[MMcCarthy]

Try something like this instead.

Private Sub Union_more_Click()
Dim strCriteria As String
   strCriteria = "[ID]=" & Me!Union_more 
   DoCmd.OpenForm "Unions", , , strCriteria
 
End Sub
 

[Peter Tenk]

Thanks very much for this, but no luck. I'm perplexed by the result. The error message said that it could not find a field by the name of Abbreviation. I double checked the Control Source. No typos. There IS a field called Abbreviation in the form called Unions.

Does your suggestion rely on some underlying relationship or link between the two forms?

[Peter Tenk]

Thanks for this, but I'm afraid it didn't work. On debugging the final strCriteria contains an empty value (if that's the right term). The field name [ID] is definitely right, so I don't get why. However it's also worth noting that the ID value in the Unions form will be different to the ID value in the form we start from (which is called Communications) .

Wince. Any suggestions?

[ADezii]

Thanks very much for this, but no luck. I'm perplexed by the result. The error message said that it could not find a field by the name of Abbreviation. I double checked the Control Source. No typos. There IS a field called Abbreviation in the form called Unions.

Does your suggestion rely on some underlying relationship or link between the two forms?

I based the code on:

In it there is a combo box called Abbreviation.

It seems as though your Combo Box may not be named Abbreviation at all. I am not referring to the 'Control Source' for the Combo Box but the 'Name' of the Combo Box. They probably are not the same. To obtain the Name of the Combo Box: Form Design View ==> right click on the Combo Box ==> Properties ==> All Tab ==> 1st item is Name. Substitute it for Abbreviation in the line of code.

[missinglinq]

Please do not double post on the forum! It potentially wastes the time of the very people you're asking for help! The person responding on one post has no way of knowing what's been suggested to you on the other post, and whether or not the suggestion helped! You have mmccarthy and adezii both trying to help you, but neither is aware that the other has already made, essentially, the same suggestion, which isn't working!

If, after a reasonable time, you have not received help, you may move yur original post back up to the head of the queue, where it's likely to receive more attention, by simply posting a reply with the message "Bump!"

[MMcCarthy]

Please do not double post on the forum! It potentially wastes the time of the very people you're asking for help! The person responding on one post has no way of knowing what's been suggested to you on the other post, and whether or not the suggestion helped! You have mmccarthy and adezii both trying to help you, but neither is aware that the other has already made, essentially, the same suggestion, which isn't working!

If, after a reasonable time, you have not received help, you may move yur original post back up to the head of the queue, where it's likely to receive more attention, by simply posting a reply with the message "Bump!"

I have merged both of these threads. Thanks Linq.

Mary

[MMcCarthy]

Thanks for this, but I'm afraid it didn't work. On debugging the final strCriteria contains an empty value (if that's the right term). The field name [ID] is definitely right, so I don't get why. However it's also worth noting that the ID value in the Unions form will be different to the ID value in the form we start from (which is called Communications) .

Wince. Any suggestions?

In the form Unions what is the control name of the textbox which has the ID field?

Are you trying to open a record to the ID which matches the selected record in the combobox?

What field is the combobox bound to?