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 Chriss Miller 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. MikeGeitner

    Calling soundex function is SQL

    Remou, Thanks for the help. The table had a couple of last name fields that were empty. That was causing the trouble, like you said it would. I filled them in and now it works. Cheers, Mike
  2. MikeGeitner

    Calling soundex function is SQL

    Hello, I've been playing around with a soundex function that I found in this forum that compares the last name in a textbox with those in a table. So, in the BeforeUpdate event I put the following, but I get "Error 3464 - Data mismatch in criteria expression". Any help is appreciated, as...
  3. MikeGeitner

    Loop through comboboxes, check for duplicate values

    Thanks, I'll try it out!
  4. MikeGeitner

    Output quotes if theres a blank field

    I'm using the TransferText method to create a .csv file from the results of a query. If there are any empty fields in the table there has to be double-quotes between the commas in that .csv file. Anybody know how I can add the quotes in the query? The file has to look like this...
  5. MikeGeitner

    Loop through comboboxes, check for duplicate values

    Well, it works pretty good except "#DELETED" shows up in the combobox list once you've selected an item. That is, using Fneily's temptable method. Any thoughts?
  6. MikeGeitner

    Loop through comboboxes, check for duplicate values

    Thanks for your help and I know it's confusing. This is only useful because the training software isn't easy to work with. When the form opens, SQL updates all the POS (spot) fields in tblRiders to "0". There are 8 comboboxes on the form, each one representing a spot, or resistance trainer #...
  7. MikeGeitner

    Loop through comboboxes, check for duplicate values

    The table looks like your example, with a name field and a spot field, among others. The form changes the value in the spot field when that rider sets his bike up in a different position. When you click the command button, it updates the table and outputs a .csv file from a query that the...
  8. MikeGeitner

    Loop through comboboxes, check for duplicate values

    Hello, I have eight comboboxes on an unbound form. You can select person's names to assign them spots in an indoor cycling training facility. These names come from "tblRiders". You might not assign all the spots, but you shouldn't be able to assign more than one spot to the same person. Is...
  9. MikeGeitner

    Stopping a Report From Closing

    But maybe use the report's close event.
  10. MikeGeitner

    Stopping a Report From Closing

    This might help: thread705-1181598
  11. MikeGeitner

    Excel Macro to go to first cell in last row?

    Also, adapted from faq707-2112 Sub FindUsedRange() Dim FirstRow As Long Dim LastCol As Long ' Find the FIRST real row FirstRow = ActiveSheet.Cells.Find(What:="*", _ SearchDirection:=xlNext, _ SearchOrder:=xlByRows).Row ' Find the LAST real...
  12. MikeGeitner

    Searching and creating worksheets

    If there isn't a sheet named "username_temp", it's trying to add one on each loop. On the second time around, it fails. This might work: Private Sub Workbook_Open() Dim CurrentUser Dim WS As Worksheet Dim TempName As String Dim wsBoo As Boolean wsBoo = False CurrentUser =...
  13. MikeGeitner

    Open a database with username/password supplied

    Here's one of mine, thanks to this forum. See the Form_Load event. Maybe this will help. Option Compare Database Option Explicit Dim db As DAO.Database Dim strConnection As String Dim ws As Workspace Private Sub Form_Load() Set ws = DBEngine.Workspaces(0) Let strConnection = "ODBC;DSN="...
  14. MikeGeitner

    Find all occurences of a value

    Here's something I used to find the occurances of yellow highlighted cells. I've changed it to count cells that have a value of 1, which might work for you with some changes. It goes through all the sheets in the workbook and counts within the range of cells. Public Sub CountYellow3() Dim WS...
  15. MikeGeitner

    Stopping the escape key from being pressed twice

    Maybe you can do a saveRecord when they hit the esc key. Then the form won't be dirty and the second hit of esc won't do anything. I haven't tried it, though.
  16. MikeGeitner

    Stopping the escape key from being pressed twice

    I just tried adding our area code to the input mask like this: !"(414)"000\-0000;0;# When you tab to the phone number textbox the input mask shows with our area code. Then, if I don't add any more digits to it and tab past it, the box clears itself. Would that work?
  17. MikeGeitner

    Increment a text number

    PHV, I couldn't get the Val to work, now I see why. It's the qoutes............. Nice.
  18. MikeGeitner

    Increment a text number

    This works, but I'm sure it could be much better: Dim strYearPat, strTrain, strNumb As String strYearPat = Year(Now) & "PAT" strTrain = Nz(DMax("[TrainNo]", "tblTrainNo", "Left(TrainNo,4)=Year(Now())"), Year(Now) & "PAT" & 0) strNumb = Mid(strTrain, 8) + 1 Me!TrainNo = strYearPat & strNumb
  19. MikeGeitner

    Increment a text number

    I can't get it work either. It won't add 1 to any record over 2007PAT9, so the highest train number I get is 2007PAT10 which will keep repeating. I think when it looks for the "DMax" of the "Mid" starting at the eighth character, it stops at "9", the highest number and keeps adding 1 to that...
  20. MikeGeitner

    Restricting Users from using database

    I just tried in the "on open" event of a form that loads on startup. It works, but I'd personally go with what crowley16 suggests.

Part and Inventory Search

Back
Top