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!

Recent content by KyleS

  1. KyleS

    Use record selecter on query to open a form

    Probably something like this: Private Sub Detail_DblClick(Cancel As Integer) Dim strFormName As String strFormName = "The Name Of Your Form Goes Here" DoCmd.OpenForm strFormName, , , "Put your where clause here" End Sub Where you replace "Put your where clause here" with...
  2. KyleS

    Simple Cascading Combo Box

    What error are you getting? Is the secongd combo box not requerying, or is it giving the wrong info...? Kyle
  3. KyleS

    Split database causes error

    Fox, The easier way would be with the absolute path, but there is another way. Absolute path: Dim dbs As DAO.Database Dim strFilePath As String strFilePath = "C:\Program Files\Microsoft Office" & _ "\Office\Samples\Northwind.mdb" Set dbs =...
  4. KyleS

    Split database causes error

    Fox, glad we could help you! For further clarification, the reason dbOpenTable won't work on linked tables is because it's trying to open a tabledef type of object. Tabledefs are only stored for local tables, so in this case, to open it with dbOpenTable you would first have to set you...
  5. KyleS

    Split database causes error

    Fox, Very sorry about mistyping the Dynaset as Dynamic. Anyway, why not use the .FindNext method of your new Dynaset recordset? It's actually easier than setting the .Index and then using .Seek Kyle
  6. KyleS

    Split database causes error

    Fox, Try switching ...dbOpenTable) to ...dbOpenDynamic) My Dao knowledge isn't what it used to be (any reason you're not using ADO?) Kyle
  7. KyleS

    Split database causes error

    the code you've given is trying to open "tbl_Temp" within the current dB. Is the table linked to the front end? If not tDAO won't know where to look for the table Kyle
  8. KyleS

    YTD Running Total by Month

    Attempt to clarify: m1/y1 m2/y1 m3/y1 ... m12/y1 m1/y2 m2/y2 m3/y2 ... m12/y2 With each record being the sales totals for the previous 12 months? (by customer, of course) and the 2 years are the two yars prior to the current month, so if run today the query would give the rolling year summs...
  9. KyleS

    Linked SQL Server tables ask for password every time

    Wow, I'm just all kinds of stupid today... I spent all that time looking for the checkbox anywhere bu there. Thx for the quick answer PHV. Kyle
  10. KyleS

    Linked SQL Server tables ask for password every time

    Thanks for the reply PHV. Maybe I'm missing something (I've always used pass-through or DAO/ADO to connect tables so sadly most of the DSN stuff is new to me). When I go to File-->Get External Data--> Link Tables, then select ODBC Data Sources I get the standard "Select Data Source" window...
  11. KyleS

    Linked SQL Server tables ask for password every time

    Well, it's been a while but I've got a question I just can't answer (even with searching this site, Google and msdn) I have an Access 97 dB (well, about 30 dBs actually) that I didn't write (pretty standard story really) which is connected via DSN to an AS400. That link works great. I need to...
  12. KyleS

    Need Help querying range within range using MIN & MAX

    Hi, The Min/Max functions work far differently in JetSQL than they do in Excel, so give this query a run SELECT Switch([ProjStartDate]<[RptEndDate] And...
  13. KyleS

    Eenable a Textbox via Chechbox

    HTH soup! Kyle
  14. KyleS

    Append a line to a text file with partial ComputerName (VBScript)

    Try this thread Tek-tips Kyle
  15. KyleS

    Eenable a Textbox via Chechbox

    What you've got there looks like it should work (I got it to) but try this instead: Private Sub Check28_BeforeUpdate(Cancel As Integer) If Me.Check28= True Then Me.txtStartDate.Enabled = True Else Me.txtStartDate.Enabled = False End If End Sub Just to...
See more

Part and Inventory Search

Back
Top