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 SkipVought 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. MichHart

    Multiple Database Connection

    I am programming in VB 6, connecting through ADO to ACCESS 2000. I am lost with regard to your suggestion. Sorry!! MichHart " Never regret yesterday because it cannot be changed; Instead make sure today does not become a regret of tomorrow."
  2. MichHart

    Multiple Database Connection

    I have a program that will be accessing data from over 200 tables in 4 Access Databases. How do I retrieve data from tables from more than one database at a time?? I am running a select statement that requires data from tables from more than one database how can it be done?? Thanks for any...
  3. MichHart

    runtime error 3021

    Hi zemp: Actually I got a syntax error with your above suggestion, but I have discovered that it only happens with the field in the table is empty. I had thought that the vbnullstring would cover that. Any suggestions is greatly appreciated. Thanks MichHart " Never regret yesterday...
  4. MichHart

    runtime error 3021

    Hi everyone I have a series of sql statements that are being executed when a name is selected from a list. These sql statements take the field from the record and apply it to the list in the combo box that the statement is being written on. I hope that makes sense. The program executes the...
  5. MichHart

    Hi everyone: I have this select

    Hi everyone: I have this select statement that is joining 3 tables, but it is telling me I have a syntax error in the join? Anyone pick out what is wrong with this?? Set rs = db.Execute("SELECT Leagues.[Index], Leagues.[ShortName] FROM Leagues INNER JOIN (Leagues INNER JOIN [Teams] ON...
  6. MichHart

    LARGE Query, need suggestions

    Hi everyone: I am sort of new to this SQL stuff so I am hoping someone can lead me in the right direction with this: I have a form that has several choices that a user can make to filter the master table by Name. On this form there are 2 sets of option buttons (3 choices each) 3 checkboxes, 8...
  7. MichHart

    SQL Select giving Error

    Thank you so much, it was starting to drive me crazy!!! lol Sometimes a second set of eyes is all you need! Thanks MichHart " Never regret yesterday because it cannot be changed; Instead make sure today does not become a regret of tomorrow."
  8. MichHart

    Specifying Defaults in an SQL statement

    Hi Heathco: Try this: "SELECT Funds.Date, Funds.Trak FROM Funds WHERE (((Funds.Date) Between DateValue([Enter Begin Date]) And DateValue([Enter End Date]) AND ((Funds.Account)="IRA")) ORDER BY Funds.Date;" I hope this is helpful MichHart " Never regret yesterday...
  9. MichHart

    SQL Select giving Error

    Hi eveyrone: I have this Select statement that is giving me an error "missing ).], or item in query expression" Here is the statement: Set rs = db.Execute("SELECT * " & " FROM DraftDetails WHERE DraftDetails.[Player] IN (SELECT Players.[Index]" & " from...
  10. MichHart

    Good Morning everyone: I am crea

    Thanks Matt, I will make that adjustment. MichHart " Never regret yesterday because it cannot be changed; Instead make sure today does not become a regret of tomorrow."
  11. MichHart

    Good Morning everyone: I am crea

    Hi everyone: Matt I have figured out the problem. In this line of each of my recordsets Set rs = db.Execute(("SELECT Teams.[Index], Teams.[LongName], Players.[ColCommit] " & " FROM Teams, Players WHERE Players.[ColCommit] = Teams.Index"), db, adCmdText) I had to remove...
  12. MichHart

    Good Morning everyone: I am crea

    Matt I hope you are still viewing this thread. I have a question that concerns all the recordsets that I am setting up.. Should I be closing each one and setting rs to nothing each time or should I do it after all are completed.?? Or is there a better way to do it. The program is now booting...
  13. MichHart

    Good Morning everyone: I am crea

    Ok thanks Matt for all your help. I will take a look at all these suggestions today. Thanks again for all the help. MichHart " Never regret yesterday because it cannot be changed; Instead make sure today does not become a regret of tomorrow."
  14. MichHart

    Good Morning everyone: I am crea

    Hi, well this is what the debug gave me Last Name: 'Hart' First Name: 'Michelle' SQL: select * from Players where FirstName = 'Michelle' and LastName = 'Hart' Then when it moved to line: rs.movefirst the program kicked me out. Sorry to be a nag, but I have to figure this out. MichHart...
  15. MichHart

    Good Morning everyone: I am crea

    ok i stepped through it, and it is returning a value. I am getting a name. I will run it again and see what happens. MichHart " Never regret yesterday because it cannot be changed; Instead make sure today does not become a regret of tomorrow."
  16. MichHart

    Good Morning everyone: I am crea

    I am going to step into it again and go through it line for line MichHart " Never regret yesterday because it cannot be changed; Instead make sure today does not become a regret of tomorrow."
  17. MichHart

    Good Morning everyone: I am crea

    Hi Matt: Ok I tried that, and it did nothing but boot me out again! MichHart " Never regret yesterday because it cannot be changed; Instead make sure today does not become a regret of tomorrow."
  18. MichHart

    Good Morning everyone: I am crea

    Yes I have checked all the fields names for correct spelling I am stumped here! I have walked through the program three times now and it keeps booting me out as soon as it tries to execute the line in my above message. I know its something to do with the SQL statement or the spacepos...
  19. MichHart

    Good Morning everyone: I am crea

    Hi again!! spacepos = InStr(lstPlayers.Text, " ")'(The spacepos is 8)' Set rs = db.Execute(("select * from Players where " & "FirstName = " & "'" & Left(lstPlayers, spacepos - 1) & "'" & " and " & "LastName = " &...
  20. MichHart

    Good Morning everyone: I am crea

    Ok I went through the program step for step and the point at which I am kicked out is here: spacepos = InStr(lstPlayers.Text, " ") Set rs = db.Execute(("select * from Players where " & "FirstName = " & "'" & Left(lstPlayers, spacepos - 1) &...

Part and Inventory Search

Back
Top