Find Form And Stlinkcriteria

Sep 22, 2004

I have made two forms which I use to find particular records on another form and one works and the other doesn't. I can't figure out why one works and the other doesn't.

The working code is:
Private Sub Project_List_DblClick(Cancel As Integer)
On Error GoTo Err_Project_List_DblClick
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Project Details Form"

stLinkCriteria = "[Project No]=" & "'" & Me![Project List] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "Project List", acSaveNo
Exit_Project_List_DblClick:
Exit Sub
Err_Project_List_DblClick:
MsgBox Err.Description
Resume Exit_Project_List_DblClick

End Sub

[Project No] is the primary key in the Project Details. Also, it's the bound to column in the [Project List] list box.

The non-working code is:
Private Sub Assessment_List_DblClick(Cancel As Integer)
On Error GoTo Err_Assessment_List_DblClick
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Site Assessment Details"
stLinkCriteria = "[Assessment ID]=" & "'" & Me![Assessment List] & "'"

DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "Site Assessment List", acSaveNo
Exit_Assessment_List_DblClick:
Exit Sub
Err_Assessment_List_DblClick:
MsgBox Err.Description
Resume Exit_Assessment_List_DblClick

End Sub

[Assessment ID] is the primary key in the Site Assessment Details and the bound to column in the [Assessment List] list box. One difference between the two is that the Assessment ID is a column of 0" width in the list box of Assessment List and a hidden text box in Assessment Details. Assessment ID is a autonumber field. I've tried to make the column have a width and show the ID on the details form and it hasn't seemed to make any difference.

Any ideas about what the key difference is?

Thanks

View Replies


ADVERTISEMENT

StLinkcriteria

Feb 2, 2006

Hi,

I am using the following syntax to link one form to another.

Private Sub btnOpenPractice_Click()
On Error GoTo Err_btnOpenPractice_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "PRACTICE"

stLinkCriteria = "[PracticeName]=" & "'" & Me![GroupName] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

GroupName field in the current form links to PracticeName field in the Practice form. The syntax works fine and it does open the Practice form. But when the Practice Name has a quote in it such as "Frank's Practice", it gives me an error "Syntax error (missing operator) in query expression '[PracticeName]='Frank's Practice",

I don't what that means or how to fix it. Can anyone provide me with some guidance on this. Thanks.

View 14 Replies View Related

StLinkCriteria

Dec 14, 2006

I can't seem to combine these to one button. I need to open a form based on the values in two fields.

Seperatly they work, when i try to combine them using the AND function it comes up with the error data mismatch.

Private Sub cmdEvidenceSummary_Click()
On Error GoTo Err_cmdEvidenceSummary_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "F_EvidenceSummary"

stLinkCriteria = "[Unit]=" & Me![Unit]

DoCmd.OpenForm stDocName, , , stLinkCriteria


Exit_cmdEvidenceSummary_Click:
Exit Sub

Err_cmdEvidenceSummary_Click:
MsgBox Err.Description
Resume Exit_cmdEvidenceSummary_Click

End Sub


Private Sub Command28_Click()
On Error GoTo Err_Command28_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "F_EvidenceSummary"

stLinkCriteria = "[Identifier]=" & Me![Candidate]
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command28_Click:
Exit Sub

Err_Command28_Click:
MsgBox Err.Description
Resume Exit_Command28_Click

End Sub

Any advice?

this is what i have but with the error

Private Sub cmdEvidenceSummary_Click()
On Error GoTo Err_cmdEvidenceSummary_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "F_EvidenceSummary"

stLinkCriteria = "[Identifier]=" & Me![Candidate] And "[Unit]=" & Me![Unit]

DoCmd.OpenForm stDocName, , , stLinkCriteria


Exit_cmdEvidenceSummary_Click:
Exit Sub

Err_cmdEvidenceSummary_Click:
MsgBox Err.Description
Resume Exit_cmdEvidenceSummary_Click

End Sub

View 3 Replies View Related

StLinkCriteria

Dec 28, 2004

In solution i have a button (see code). I moved the database and, of course, get an error. "Ogiltig sökväg, 'G:osv. osv'." Swedish for "No valid path".

Where do i change the path, since it´s not set in the script?

PHP Code:Private Sub Kommandoknap25_Click() On Error GoTo Err_Kommandoknap25_Click     Dim stDocName As String     Dim stLinkCriteria As String     stDocName = "ny kundebank"     DoCmd.OpenForm stDocName, , , stLinkCriteria Exit_Kommandoknap25_Click:     Exit Sub Err_Kommandoknap25_Click:     MsgBox Err.Description     Resume Exit_Kommandoknap25_Click     End Sub 


Rgds
thomas

View 1 Replies View Related

StLinkCriteria And Subforms

Dec 17, 2006

Hi

I have a form(Enquiry) which contains a subform(site) which are locked to prevent data being changed.

When a button is clicked I would like to open the currently viewed customer's details and site details in another form called: EDITEnquiry which is not locked.

I have managed to do this using one field(CustomerID) but am having trouble using two fields. - One being on the subform.

The code bellow provides me with the following error message:
Syntax error (missing operator) in query expression '[CustomerID]=2 And [Address] = 123 Site Road'.

Private Sub Edit_Click()
On Error GoTo Err_Edit_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "EDITEnquiry"

stLinkCriteria = "[CustomerID]=" & Me![CustomerID] & " And [Address] = " & Me!EnquirySiteSubform![Address]

DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Edit_Click:
Exit Sub

Err_Edit_Click:
MsgBox Err.Description
Resume Exit_Edit_Click

End Sub

Thanks in advance

View 14 Replies View Related

StLinkCriteria Problems

Mar 1, 2007

Can someone please tell me what is wrong with this code? I'm using a "Search" form to open a specific record in another form. Right now, I'm getting errors about data mismatch.

Also, I have no comprehension of the quotation marks and apostrophe usage in code. Would someone please enlighten me? Thank you, thank you, thank you!!! Here's the code.


Private Sub Command2_Click()
Dim frmName As String
Dim stLinkCriteria As Integer

frmName = "frmMainCustomerPage"
stLinkCriteria = "[Customer ID] ='" & "Me![Customer ID Search]'"

DoCmd.OpenForm frmName, acNormal, , , stLinkCriteria

Exit_Command2_Click:
Exit Sub

Err_Command2_Click:
MsgBox Err.Description
Resume Exit_Command2_Click

End Sub

Thanks again!
KellyJo

View 6 Replies View Related

Unable To Find Form That Is There

Jul 17, 2005

The main form in my database is giving me an error message to say "The form name is misspelled or refers to a form that doesn't exist" when I try to open it, despite the fact that I can see it there. If I try to change its name it says "save operation failed". Does anyone have any idea what this could be before I recreate the form?

Thanks very much for any help.

View 2 Replies View Related

Find Out If A Form Has A Subform

Nov 12, 2005

hello,
I am on my module, in a public function. This function is called by the onactivate of some forms, which send their form.name to the function.

I would like this public function to find out if the form has a subform(s), and if so, the subform(s) name. So simple, so hard (for me)

thanks in advance

View 2 Replies View Related

Find Function In Form

Mar 28, 2006

I am trying to add a find button to the form. But I keep getting an error saying "Error accessing file. Network connection may have been lost" I have a feeling it has something to do with the Event Procedure. Any thoughts?

View 2 Replies View Related

Error Can't Find Form.

Jul 26, 2006

Why is this telling me it can not find the form?

Private Sub booleanInScope_Click()
[booleanInScope] = Forms![subfrmCoordinatorApproval]![txtID]
End Sub

The form is in the forms and I can open it in form view

View 1 Replies View Related

Find A Field In A Form

Aug 28, 2006

I am trying to locate a field in the form. The field is existing in the Tab Order list. But when I use the tab to locate the field in design or run mod, the tab never jump to that particular field.

Can anyone tell me how I can locate the field (in order to change the properties of this field)?

View 1 Replies View Related

Find Record + SINGLE FORM

Mar 30, 2006

Is it possible to create text box for search for records if I use SINGLE FORM?
i try but without effect :(

pls see my database (I want to use for record "Title")

Thanks

View 2 Replies View Related

General :: Access Cannot Find Form

Aug 17, 2012

I have a continuous subform (BooksFullSubCC) that is located on a tab in the main form (BooksFull). In BooksFullSubCC, there is a text box in the footer that sums up all the amounts of credit card charges to make a total with =Sum([Amount]). For some reason, I cannot pass the value from the text box to VBA or another text box on the main form because Access "cannot find the form".Here's the code

Code:
Private Sub TabCtl93_Change()
Dim Amount As Currency
Amount = Nz(CCur(Forms!BooksFullSubCC!CCchargesTotal))
Me!CCFees = Amount * 0.015
End Sub

Its really simple - Access should take the amount from the text box (CCchargesTotal) on the subform and then put it the result of some simple math into a text box on the other form.When I try and change tabs to initiate the code, i get "Run-time error '2450':Microsoft Access cannot find the referenced form 'BooksFullSubCC'."

I've checked the spelling, rewritten the code, everything. I even tried to make a text box on the main form with control source =[Forms]![Books FullSub CC]![CCchargesTotal] but that didnt work either...

View 5 Replies View Related

Can't Find Macro '.' Access 2k Form Error

Feb 21, 2006

Greetings - some help required please:

I have an intermittent error occurring on an Access 2k form giving the error
message "cant find the macro '.'" although there are no macros on the form.
After much trawling around I believe this may be due to a space being
mis-keyed into one of the event properties of one of the form’s controls but
I have looked at each to no avail.
My question is therefore two fold:

1. If this is due to a space being keyed how do I, in code, step through
each control and it's events looking for it?, or,
2. If it's not a space what else could it be.

The form opens and works Ok most of the time, the db compacts and repairs and compiles to an MDE and the error appears to not be linked to any one control or event but seems to be triggered more often than not if move from the tab order through use of the mouse.

Ideally I don’t want to redo the form or copy the database objects into a new db as there are too many.

Any help gratefully received.

NB This query was originally posted to the vba section without much success apart from a rebuild suggestion gratefully received from WayneRyan. I thought this was a vba error but may be a macro issue, a form error or could be a general problem so apologies if this is not the correct forum, if incorrectly placed Moderators please feel free to move it


Thanks


Kevin

View 1 Replies View Related

Find Table And Field For A Form Control

Jan 7, 2008

Given the firmname and textbox name is it possible to programmically get the fieldname and table name where the data for that control is held.

I can use .controlsource and .recordsource

But is possible that .controlsouce is an alias of the actual fieldname.

Similarly the recordsource could be a query, from that I want to get the actual table, complicated say if two tables in the query had a field with the same name (even if only one was referenced)

Thanks.

View 3 Replies View Related

Append Query Cannot Find Values In Form

May 15, 2005

i am trying to create an append query that gets 2 values from one table and a 3rd value from a form.

It gets the values from the table fine but always gives me a popup asking for the value from the form.

I have used the criteria build... and selected the loaded form and the field value that I am looking for. I have also made sure that there is a value in the field on the form.

is there a reason why the query will not grab the number in the forms field? or am I jsut not doing this right.

I have done this many times on a combo box and it works fine. It is jsut not working for a field that is typed in
Can anyone help me?

View 5 Replies View Related

To Find Out Maximum From The Records Entered By The Form

Jul 27, 2005

Hi People,
I am working on a database related application in which the user enters the data from the form and it is stored in 3 related tables in DB.

This is what I want to do,

If IsNull(Me.Q1_2005) = True Or Me.Q1_2005 = "" Then
rs!January2005 = Me.Jan_05
rs!February2005 = Me.Feb_05
rs!March2005 = Me.Mar_05
If parametername = "time" then
rs!Q12005 = DMax([Me.Jan_05], [Me.Feb_05], [Me.Mar-05])
else
rs!Q12005 = DMin([Me.Jan_05], [Me.Feb_05], [Me.Mar-05])
End If

If user enters monthly data of Jan'05, Feb'05 and Mar'05, but he is not entering quarterly data of 2005 Q1. So I need to update Q1 data in that record, that has a condition. If the parameter name is time then I want maximum of the three month data assigned to Q1 record in DB table else I want minimum of those three text box values assigned to Q1 record in DB table.

Please help me with this kind of conditional statement.

Rushit..

View 1 Replies View Related

Weird Access Behaviour (can't Find Form)

Jan 21, 2006

Ok here is the deal

You start to type with a smile on your face
Form_MyForm. <-- from that point (literaly) you usualy have a list of things you can do with that form.

All i wanted to do is a requery but i have no list...and even if i type myself Form_MyForm.requery .. this will not work cause it says that it cant find the dang form.

I have tried renaming the form, let someone else type the name for me, copy&paste ..nothing work, when i get to the point...it never gives me a list of things i can do with that form.

what is the deal here..anyone ?

Wow that felt good only to talk about it

View 3 Replies View Related

Form To Find Record And Move To Another Table

Oct 11, 2004

I'm trying to make a form with a single text box that will search for the contents of the text box in a table. Once it finds a match, it moves the record into another table. Anyone know how to do this?

View 4 Replies View Related

General :: Button On A Form To Find A Certain Record?

Aug 23, 2012

I have a form [Invoice] with a subform [Orderssubform1] in it and they are both linked with the field 'CustomerID' using a parent and child relationship. I have also established that relationship in the tables too. Using a combo box [Combo0], the user can select a customer from the form and then enter details about the invoice in the subform. They then click 'Generate Invoice' and it creates a report for them. This all works fine.

The problem arises when I want the customer to locate a certain invoice using a button. I would like the customer to be able to click a button on the form which would then bring up a box asking them to enter the invoice number [InvoiceNo] and it would then locate that invoice so they can generate it as a report again. The user can find the customer themselves using the combo box, I just want the record related to that customer to be found using the button.

View 14 Replies View Related

Forms :: Find Data Using Field In Form

Jul 19, 2013

I have a form that is bound to a query. The user inputs their id in a text box and the form should find the corresponding record with 5 different pieces of data displayed in separate text boxes. There is at any given time only one record set per id. The query has in the EmpID the criteria: [Forms]![frmProdStopEntryNew]![EmpID] to reference back the EmpID as the filter.

On the form, after the employee enters their ID, the afterupdate should pull-up the record that corresponds to that id. The code for the afterupate is:

Code:
Private Sub Emp_ID_AfterUpdate()
Me.Filter = "EmpID = '" & Me.Emp_ID & "'"
DoCmd.RunCommand acCmdApplyFilterSort
Me.StopTime = Now()
ReasonID.SetFocus
End Sub

I also have a form load to go to a new record just so that the form is blank when the user enters it.

Code:
Private Sub Form_Load()
On Error GoTo Form_Load_Err
DoCmd.SetWarnings False
DoCmd.GoToRecord , "", acNewRec
Form_Load_Exit:
Exit Sub
Form_Load_Err:
MsgBox Error$
Resume Form_Load_Exit
End Sub

The problem I'm experience is that the query to find the record has a 50/50 hit and miss success rate. I think this is because the form load gets activated each time the query is refreshed afterupdate. And the form load has the new record syntax so it sort of nullifies it each time. How do I fix that?

View 8 Replies View Related

How To Find Record On Form Based On Multiple Queries

Jun 23, 2006

I currently have a form to manage inventory. On the left side of the form, I have a list box that shows all of the items in the database and finds the record on the form based on the selection.

I would like to have toggle boxes or something underneath the list box that when clicked will sort the box by vendor and item and another that when clicked will sort the list by part number and then select the record on the form based on the selection at that time.

I have no idea how to accomplish this...can anyone help?

View 1 Replies View Related

Modules & VBA :: Function To Find Null Values For Each Form

Apr 10, 2015

I have a form with couple of textboxes bound to a table. When the user opens the form to enter records, i want to write a function that would go through the textboxes to check whether the textboxes are left NULL. Now i can write code on button click for each form, but i was wondering if its possible to write a function that could be called for each form that i have to check for null values.

View 7 Replies View Related

Queries :: Dropdown Box - Find Records Based On A Form

Jul 16, 2014

I have a form with a dropdown box that shows the 'Group by' records in a table.

For example the form shows "Art_6". My table has many records (could be 1000's) that start "Art_6".

I want a macro/query to find all records that start "Art_6" and delete them.

How to find only those that start as described.

View 13 Replies View Related

Reports :: Find PaperSize Value Of Printer For A Specific Form

Apr 17, 2013

I have a custom form setup for 1up 1.5inch labels on the print server. We are printing these on Okidata Printers using an Epson driver.

I want to know how you can find the specific printersize number value for a form called "1_5upLabels" which is a custom form.

I am not looking to do this manually in the page setup for the report but to programmatically so that it's dynamic.

Is there a way I can loop through the forms for this printer and check for the form name?

View 1 Replies View Related

Forms :: Using Split Form With Datasheet - Find Not Working

Nov 9, 2013

I'm using a split form with the datasheet on the left.

When I use the 'Find' in the Navigation buttons at the bottom of the form, it refuse to find text in a particular text box.

The text box is a memo field and is enabled.

Example:

I have text in the memo field which is a title of an episode - "The Outcast."

When I start typing "the" it finds this text in the memo field. But when I type the entire title it the finds the text in another field. ie "out."

I've tried the 3 different Search setting in options. When I use the Find command from the ribbon it work ok as long as I select the text box to search in first.

View 1 Replies View Related







Copyrights 2005-15 www.BigResource.com, All rights reserved