Search results

Thanks to you and everyone for helping me with this, I have created a button and it errors at Set objRootDSE = GetObject("ldap://rootDSE") Run-time error -2147467259 (80004005) Automation error Unspecified error Not very descriptive is it? Code is: Dim objGroup As Object Dim...

Hi, This code was copied from another location (not this forum) and before I just copied and pasted it I wanted to understand what exactly it was doing and how to trigger it correctly. Private Sub Form_load() Public Sub TestCode(strDomain As String, strGroup As String) Dim objGroup As...

I cant seem to get the .visible function to work?? If I don't add brackets I get an error the remaining text does not appear to be part of the formula. And if I add the brackets it still doesn't like it? {Transaction_Detail.Notes}.visible=not isnull({Transaction_Detail.Notes}) Thanks

Thanks for the reply, and apologies for not being clear. What I mean is: Thanks

Hi, Im trying to work out how I show only fields which have text in them. For this I have a formula which works out if that field is true or false (contains text or not) and now Im trying to display the ones which show text only. I've managed to do this within the supress format but because...

Hi, Ive had a complete blank... Im trying to output my VBA code to a report but I cant for the life of me think how to do it. Here is my code: Dim strEmployeeName As String strEmployeeName = EnUsername DoCmd.RunSQL "SELECT StrConv(Replace([sUser],""."","" ""),3) AS Employee...

Got it... If I put the full path in it works fine. Told you Im new'ish :)

Hi Guys, recently and for no apparent reason I am starting to look at SQL queries and understand how they work (this is coming from writing VBA queries and using Access A LOT). Im creating a very basic SQL query as you can see and I can browse to the table which I am getting the error about...

Thanks yeah I managed to get it going - forgot to close this post.

Hi, I currently have 2 separate crystal reports which I would like to join as one. Can I create a Union query within crystal as I can within Access or is there a better method to achieve joining the two? Thanks

Hi, Ive almost got it working with a union query. What I did was remove the PO_Detail so any duplicates that weren't "actually" because they have different PO_Detail numbers are now just one entry. What I need to get around now is that I need to remove empty Material results as these are the...

In answer to this - it doesn't really matter as they are both valid results, its just the duplication which I would like to get rid of.

SO the fact ones got data in it and the other hasn't means that it'll treat them as "separate" records? I appreciate its difficult to assist without seeing the DB - surely there must be a way to pull records without duplication as they are all linked with PO detail? :( Theres a pint in it...

Im not sure each record is unique though - if you look at the image PO 4120 and 4109 and 3872 are all duplicates (all be it from separate query results)

Thanks for the quick reply, if I change the names to match and create a union query I get duplicate results. I think this is because in one table the material description is different to the material description of the other table so Access thinks that its two separate results. Here's my union...

Hi guys, Im trying to join two queries as I am unable to use just a single query but I cant use a union query as the query fields aren't exactly the same. Both queries have a PO_Detail field as every PO has a PO_Detail number assigned to it. 3 of the same records are in both query...

Got it working, Dim varSelection As Variant Dim lngID As Long If Me.Results_listbox.ItemsSelected.Count = 0 Then Exit Sub Else For Each varSelection In Me.Results_listbox.ItemsSelected lngID = Me.Results_listbox.Column(0, varSelection) DoCmd.RunSQL "Delete FROM Table1 WHERE Table1.ID = " &...

In these situations would you "generally" use a subform\table to hold the query values and then from that table delete from the main table? I can achieve that quite easily but the list box idea would be a nicer way of dealing with this.

Thanks for the reply, unfortunately I cant post the DB as it holds quite a lot of data and to clear it out to make it blank would take a while. I'll continue to investigate and see if I can work it out.

Thanks for the quick response. The bound column of the listbox is the ID field as here: Dim strSQL As String Dim strEmployee As String strEmployee = Me.SelectEmployee_Combo.Column(2) strSQL = "SELECT Table1.ID, table1.[Task Date], table1.Hours, table1.Activity, table1.Project...