Search results

to throw something else in the mix. I created a new form with just the list box and code in, it works fine! The form where the list is placed, it is on a tab control. I recreated the form from scratch and it still misbehaves. Could this be one of those access oddities?

Yes, it was how the code was set before this issue was discovered, now I just get it to tell me the value it thinks is there when you click it.

Datagopher: I have tried this but it still misbehaves. JANR: That post is for a different problem, their code was never set to access the values of the listbox correctly and they did not have the issue of selecting an item but loading the values of the previously selected item.

I have a strange listbox problem, I have simplified what I am doing so no red herrings are there. I have a form with an unbound listbox (multi select is set to None), there are 4 columns. For the click event I have MsgBox Me.Listbox.Column(0) I have 2 entries in the listbox (1 & 2), when I...

try sql = "select * from " & query_name(iQuery) & _ "where courier = '" & Courier(iCourier) & "' " & _ "and [Claim Type] in (""" & claim_type(iClaim_Type) & """) "

I usually use if Nz(me.textbox,"")="" then it covers both in 1 statement

thanks for all the ideas. yes the schema is unnormalized, all recordsets are closed and modules are very specific to the component parts. I am currently working through the database and replacing all d* functions with code that will use a recordset to get the value and then close the recordset...

unfortunatley not, watched the objects in the MSys tables but no values updated or changed. Have also tried DBEngine(0).Databases.Count but that does not return the table id database count.

think I should explain why I want to count these open databases. The application runs with no errors, but occasionally when users do things slightly differently it may cause the too many database errors. The reason I can't just trap the error is due to the error occuring running reports, if a...

the error that appears is a little misleading, it does not refer to physical mdb files, here's the easiest way I found someone explain it there are so many things which take up these table id's, tables, queries (table id's for each table referenced in the query), dlookups and other d* stuff...

yes each user has their own FE. all I really need to know is how I can tell how many databases are open at any time, from what I understand if you exceed 55 you receive the 'can not open any more databases' error.

here's the detail, and yes I know it should be SQL, that work is currently in progress. Split db FE/BE both compacted, FE is 120Mb, BE is 150Mb. The db has 486 tables, 2160 queries, 386 forms, 221 reports, 87 modules. Access 2003

I have currently been given an excessivley large database to optimise. It frequently encounters 'can not open any more databases' errors, most of which I have changed around, but there are places which I suspect may run into these issues later on. Is there any way that I can find out how many...

Perhaps I'm phrasing it wrong, but my searches have been fruitless. Can I check to see if a table exists in an SQL database from within MS Access?

The queries are run over a very large recordset and do take a while to run which is why I require the hourglass.

I have an annoying oddity with the hourglass and not sure why. I run the following code and the hourglass does not display, I commented the DoCmd.Hourglass False to see if the hourglass did come on at all and it does but only after frmPrintOptions is open. There are no hourglass statements on...

try setting these 2 values MSComm1.RThreshold = 1 MSComm1.SThreshold = 1

If NOT IsNull(ParticipantHeight) AND NOT IsNull(ParticipantWeight) Then Me.Requery End If

try If NOT IsNull(ParticipantHeight) Then me.requery end if or you could remove the dlookup from the control and replace the me.requery with ControlName = DLookUp("[BMICalculation]","qryBMICalculation","[ParticipantID]= " & Me.ParticipantID & ")

sorted, had a thought now create new record and delete old Dim appOutlook As Object Dim objCal As Object Dim objNS As Object Dim objAppt As Object Dim objColl As Object Dim i As Integer Dim tmp As String Set appOutlook = CreateObject("Outlook.Application") Set objNS =...