Search results

Try this: SrtFld:String(7 - Len(Format(Val([House/FlatNumber]))),48) & Format(Val([House/FlatNumber])) & [House/FlatNumber] Add "SrtFld" to your query and sort on that field. Note: Whats the maximum number of total characters allowed in House/FlatNumber? That's the number that should replace...

Looking back over the posts, I think you're missing a function call in the query. txtVal shoulld be: Mid([House/FlatNumber],IIf(Val([House/FlatNumber])=0,1,Nz(Len(Val([House/FlatNumber]))+1,1))) and not: IIf(Val([House/FlatNumber])=0,1,Nz(Len(Val([House/FlatNumber]))+1,1)) That's why txtval...

Why not just: SELECT Temp2.Field1 FROM Temp2 ORDER BY Val([Field1]), Temp2.Field1;

I believe you're seeing a null value propagate through your expression. Try: Items in Stock: Sum(-Nz(Newstockpart1.Quantity,0)+Nz(Items.ItemStock,0)+Nz(NewAcqPart1.Quantity,0))

Try: Forms![Processing]![Order Processing].SetFocus DoCmd.GotoRecord ,,acNext I leave it to you to check for a new record or EOF...

Is the subform control name on your main form = "MySubForm"? Yes. hth,

Me.subPlanetItems.SourceObject = "qryInPlanetNotInWIMS" would be used to change the form object, not the query behind the form. You need to change the Record Source of the sub form. Try this code: Dim frm as Form Set frm = Me!subPlanetItems.Form With frm frm.RecordSource =...

Just before your code writes to the subform, try: Forms![SuppierOrderCreateNew]![subformControlName].SetFocus DoCmd.GotoRecord ,,acNewRec

Open the mainform in design view. Click on the subform control to select it. Look in the Properties list for the name of the subform control. That's the name that needs to go in: Forms![SuppierOrderCreateNew]![subformControlName].Form![productNumber] = 10

Is "SupplierOrderCreateNewSubForm" the name of the subform control on form "SuppierOrderCreateNew"?

Assuming you are not trying to call the DateDiff function in the IIF statement, while you can combine it into one statement: =IIf(IsNull([Bleh]),IIf([fldDateDiff]<7,"",IIf([fldDateDiff]<14,"7 Day Warning",IIf([fldDateDiff]<27,"14 Day Warning","28 Day Warning")))) I think a better solution is...

Dim ctl As Control For Each ctl In Me.Section(acHeader).Controls If ctl.ControlType = acComboBox Then Debug.Print ctl.Name 'or do other stuff..... End If Next ctl hth,

Have you tried setting the format property for the query field?

A million records? Ooof!! This may not be fast... Function fncFindUC() Dim str as String, Result as String Dim I as Integer, J as Integer, CharCode as Integer str = "{sectl}SECTION I<qa>\nPREFLIGHT (05-20-10)\" For I = 1 to Len(str) 'replace all LC characters in str with sp " " CharCode...

Have the query the form is bound to pass the two field values to a custom function and check the return value against criteria in the query. Your form query would have a WHERE statement that looks something like: WHERE (((fncMyFunction([tblMyTable]![MyField1],[tblMyTable]![MyField2]))=True))...

Dim rs As DAO.Recordset Set rs = Me.RecordsetClone rs.FindFirst "EmpName = " & Me.OutList & '"' Me.Bookmark = rs.Bookmark

How about this: Public Function QueryValues(ByVal VPScore As String, ByVal Spenditure As Long) As String QueryValues = "Decline" On Error GoTo Err_QueryValues If VPScore = "RB5" Then Select Case Spenditure Case Is <= 32 QueryValues = "200" End...

Instead of choosing a table from the drop down list in the Row Source property for the combo box in form design view, open the query builder for the combobox by clicking on (...), show your table, pick your table fields, sort according to your requirements. hth,

I would definitely use a custom function instead of nested Iif statements. Query speed not withstanding, your logic flow alone using Iif statements - while probably possible - does not at all lend itself to the next user specified change. A query formats columns, not rows. So I think you might...

Use the openargs argument of the DoCmd.OpenForm method to pass to the form that's being opened the form name that's doing the opening. From either the edit_product or product_enquiry forms, this goes in the on click events for the command buttons that open the search form. DoCmd.OpenForm...