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!

  • Congratulations Mike Lewis 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: *

  1. KevinMoore

    Can I create an option group that allows multiple selections?

    I'm assuming that you're using a third table to link between the two (called OrgTGtbl), right? Make sure that in that table both of the fields (ORGID and TGID) are set as "Number" (Long Integer) and not autonumber. I would also make the primary key for that table the whole record...
  2. KevinMoore

    Can I create an option group that allows multiple selections?

    It seems to me that you need a change at a structural level. Since you have a many-to-many relationship between Organizations and TargetGroups. I would create another table called something like "OrganizationTargetGroups" with 2 fields, ORGID (or whatever your key to the org table...
  3. KevinMoore

    Immediate Data Update

    It won't work in the form's AfterUpdate event procedure because its not called until after the record has been updated. To the best of my knowledge, it would have to be in the AfterUpdate event procedure of every field that you would want to be immediately changed in the DB. Another option...
  4. KevinMoore

    Avoiding Errors in Error Handling

    I've dealt with that exact same problem around transactions and error trapping and have ended up using Boolean flag variables (I know, a pain). If db, qdf, rst, etc. are local variables (i.e. Dim'd within the procedure), they will automatically be closed and killed when you exit the procedure...
  5. KevinMoore

    error number 3420?

    Yes :-) - it attempts to set a reference to the Admins group that the current user belongs to. If they don't belong, it generates an error as there will be no "Admins" Group in the "Groups" collection of the "User" object. The reference (i.e. grp) isn't used for...
  6. KevinMoore

    Crosstab not finding records because of timestamp

    How about creating a query based on the table with the timestamps and using it in your crosstab? In the new query, include all the fields from the base table and add "DateOnlyVersionOfTimeStamp: DateValue(TimeStamp)". Use this query instead of the underlying table and link to the new...
  7. KevinMoore

    Match Query

    Hi Andy- I read your post over a couple of times and now think I know what you're looking for. Here's what I'm assuming: You want a query returning vacancy records and any volunteer records that might qualify for the vacancy. For a vacancy with an AgeID of 1 (meaning any), you want all...
  8. KevinMoore

    Problems with Right and Left Function

    Hi jnicks- I believe that both Dir() and GetFullPathName actually read the directory structure on disk looking for the file, which might compare negatively, time wise, to string machinations in RAM. They also require the file specified to actually exist, which I'm uncertain fits in with...
  9. KevinMoore

    error number 3420?

    I hate those errors. My guess is that it's getting hung up calling the CurrentUser function inside of your loop. You might try setting a string to CurrentUser and using it for the compare. Also, I think (not sure) that raising errors in a form's open event will send the error back to the...
  10. KevinMoore

    sum function not working: need HELP

    Your query looks good to me. I'm not sure what you mean when you say the first number. How about trying: cumRoyalty2 = DSum("sumRoyalty","Royalty") Kevin :-)
  11. KevinMoore

    Need Help with Form Filtering

    How about trying: Private Sub cboAssignedTo_AfterUpdate() Me.Filter = "AssignedTo Like """ & cboAssignedTo & """" Me.FilterOn = True End Sub This assumes that AR_Jcvl is the record source for the form. If it isn't, you just want to make sure that...
  12. KevinMoore

    Problems with Right and Left Function

    How about using the FileSystemObject ... its got lots of properties to break up file specifications, like so: Dim fso As Object Set fso = CreateObject("Scripting.FileSystemObject") strBackEnd = fso.GetBaseName(Me.txtFileToOpen.Value) This also handles the objectionable case of a...

Part and Inventory Search

Back
Top