Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: bikerted
  • Order by date
  1. bikerted

    Alter DataEntry property in open form

    Ken, That now works, and of course it shows that I should have read the help files more carefully. Thank you so much for taking the trouble to explain it to me. I've learnt something new - again thanks to Tek-Tips and a very patient contributor. Thank you, Ted.
  2. bikerted

    Alter DataEntry property in open form

    Thanks Ken, I have read this through before, but your highlighting and attention to detail has helped me understand it better, which makes me wonder whether (by way of contradicting all I've just said)why the following didn't prevent edits after opening the form: Application.Echo False...
  3. bikerted

    Alter DataEntry property in open form

    Ken, Thanks for your reply. Actually, it's (you've guessed it) slightly more complicated than that. My form creates "Favourite" entries to be entered on my main form in one touch to save the laborius re-entering of the same data, so I have on it a means to look up and edit existing Favourites...
  4. bikerted

    Alter DataEntry property in open form

    Hi Everyone, This is perhaps a slightly different take on the mouse scroll problem, which I'm aware that there are many links FAQs and what have you. My Favouritesfrm is based on a query, and to create new Favourites I click a button containing the following (not elegant nevertheless it works...
  5. bikerted

    "Filtering" default settings on a form

    Well PH, No surprise, it works, only I was able to close rcptofficefrm - I have the query running from Combo172, which is on the ReceiptInput form. It's perfect - sorry to have got you so embroiled in my confusion. I hope to write my own SQL when I obtain a brain. Thanks a million, Ted
  6. bikerted

    "Filtering" default settings on a form

    PH, The query works fine in selecting the parameter but I can't stop this error 3061 when using the query name in the ORDER BY part of the procedure, because, if the Receipts table is referred to here then the default values will be those in the overall table and not the queried/filtered part...
  7. bikerted

    "Filtering" default settings on a form

    PHV, This is the SQL: SELECT Receipts.receiptlocationID, Receipts.ReceiptID, Receipts.[Payee ID], Receipts.ServiceUserID, Receipts.ServiceDate1, Receipts.ServiceDate2, Receipts.Book, Receipts.Receipt, Receipts.ReceiptDate, Receipts.AccountingDate, Receipts.ProjDeptID, Receipts.LocationSuffixID...
  8. bikerted

    "Filtering" default settings on a form

    PHV, They're all the same fields as in Receipts table (on which I had based this form). The only difference is that I decided to base the form on a parameter query which queries the Receipts table based on receiptlocationID, because now I have three sets of default data to present the three...
  9. bikerted

    "Filtering" default settings on a form

    Thanks Aceman, I've tried your suggestion as follows: Private Sub Form_Current() Dim db As DAO.Database, rst As DAO.Recordset, SQL As String If Me.NewRecord Then Set db = CurrentDb SQL = "SELECT TOP 1 [receiptlocationID], Book, Receipt, ReceiptDate, ProjDeptID, LocationSuffixID, AccountID " & _...
  10. bikerted

    "Filtering" default settings on a form

    I have used the following code (thanks to a tek-tips contributor) very successfuly, but now wish to enable it for multi-users according to the value receiptlocationID: Private Sub Form_Current() Dim db As DAO.Database, rst As DAO.Recordset, SQL As String If Me.NewRecord Then Set db = CurrentDb...
  11. bikerted

    Improve If then else statement for form open button

    Your issue wasn't complex enough for such techniqueGuess I deserved that too. My problem , is that it's all complex to me - though slowly becoming clearer and that's thanks to you and other patient contributors on this site. Thanks for your time tonight. Ted.
  12. bikerted

    Improve If then else statement for form open button

    Guess I deserved that! I take it that that boflg, once declared, can be used to "flag" true or false statements. Bit long-winded perhaps, is that why you changed your mind or would this be preferred in certain procedures - or none of the above? Ted
  13. bikerted

    Improve If then else statement for form open button

    That show's where I'm at right now, I was willing to be believe it meant something! Thanks again for your guidance. Ted [ponder]
  14. bikerted

    Improve If then else statement for form open button

    Spot on as usual PHV! Don't know what a flag is in this connection, but I think I understand these statements better now. I had tried out the if-not-blank case at the beginning before, but didn't use the two End Ifs, I thought Else was required - if that makes sense? Anyway, thanks for your...
  15. bikerted

    Improve If then else statement for form open button

    The following procedure for my button closes the present form and opens another if no data is in [Payee ID] or, if it's not blank, opens a message box with 'Yes' to close this/open other form and 'No' to go back to the [Payee ID] control: Private Sub Label79_Click() Dim stDocName As String...
  16. bikerted

    Error 3061 help with syntax error please

    Hi All, The following code for repeating values in one of my forms has served me well, but now it throws up the "too few parameters expected 1" error: Private Sub Form_Current() Dim db As DAO.Database, rst As DAO.Recordset, SQL As String If Me.NewRecord Then Set db = CurrentDb SQL = "SELECT TOP...
  17. bikerted

    Procedure for closing form containing blank/null required fields

    Sorry to labour this one, but if anyone has an idea how to crack the above I should be most grateful. The procedure (with my untrained eye) looks perfectly adequate - especially coming from a top tipster, but will not prevent form closure with blank fields for all but the first control in the...
  18. bikerted

    Procedure for closing form containing blank/null required fields

    PHV, Thanks for your reply. That procedure worked fine for the first field and then only once (I was able to close the form on the second click of the close button), and not at all on the remaining fields. I tinkered a little by substituting ElseIf, with the same result. Any ideas? Ted.
  19. bikerted

    Procedure for closing form containing blank/null required fields

    I'm unsure if I sent this already but my thread history tells me I failed to send. However, could someone assist with an effective way of doing the above. I have looked through FAQ's, searched through this site and looked on Microsoft's help site, but stil I'm confused. The following procedure...
  20. bikerted

    Double-click Yes/No button?

    That's great PHV. I deleted the line Me!Text36.SetFocus because an error message came up indicating that one couldn't set focus on this control. No matter, because it automatically focuses on the preferred control. So many, many thanks once again for your time and effort. Ted.

Part and Inventory Search

Back
Top