Search results

This is a bit complicated so please stick with me! I have a form that I enter Supplier information into, in this case suppliers could be a hotel, or an activity site for example. It's just a table with supplier information. Because certain suppliers can provide services to multiple towns I...

I'm currently doing a large update to a split frontend / backend database. I've made a local copy to work on. I know changes to front end are easy, I can just over write the file on the client machines. However, what is the best method to update the existing tables. They have new data since...

Thinking some more about it, I'm not sure there is much need, everything works just fine and the changes I am making aren't huge. That said, I am working on a separate copy of the front and back ends of the database. I know I can just copy over the front end on user machines and everything...

Will converting an Access 2003 to 2007 database break anything? I know that's a bit general but are there any major pitfalls to be aware of?

Don't forget to change the names of my buttons etc! So remove the DLookup and Me!FULLACKBUTCLICK = Date

Oh..FFS how did i miss the double Me.Filter= Thanks guys! To add a third filter would I just use another instance of AND

Gave this a try... Private Sub ApplyAllFilterBut_Click() Dim FilterLocation As String Dim FilterType As String FilterLocation = Me.LocationFilter & "Tick" FilterType = "SupplierType =" & Me.TypeCombo.Column(0) Me.Filter = Me.Filter = FilterLocation & " And " & FilterType Me.FilterOn = True...

If I make a change one of my forms in order to save the record I have to double click the record bar on the left and then press escape before it will save. Has anyone come across similar behaviour and know the cause?

SO... would this work then : Private Sub FilterBothBut_Click() Dim FilterLocation As String Dim FilterType As String FilterType = "SupplierType =" & Me.TypeCombo.Column(0) FilterLocation = Me.LocationFilter & "Tick" Me.Filter = FilterLocation And FilterType Me.FilterOn = True End Sub

I've tried combination of this and I can't for the life of me to get it to work. Do you mean concatenate into one string OR change the Me.Filter = line?

Ok this is driving me bonkers. How do I combine these 2 onlick filters : Private Sub ApplyTypeFilterBut_Click() Dim FilterType As String FilterType = "SupplierType =" & Me.TypeCombo.Column(0) Me.Filter = FilterType Me.FilterOn = True End Sub Private Sub LocationFilterBut_Click() Dim...

I think you can do this using hidden colums in the drop down. As well as just the name have the other information you need in the columns. Then, after update of the dropdown use something like : Me.HotelName = Me.HotelCombo.Column(0)

Yes. There are some limits to the length of .body hence the reference to "stored text" for standard signature etc. Private Sub SendMail_Click() Dim myOlApp As Object Dim myEmail As Outlook.MailItem Dim myBody3 As String Set myOlApp = CreateObject("Outlook.Application") Set myEmail =...

Could someone help me with the syntax to combine filters? So on the click of one button 2 filters are applied to a form?

Oh, it does :) Hehehe

Ok...I've cheated a bit to get this to work. After update on the combo box I write the column value into a hidden text box (called CheatBox) and then run this code on button click : Dim FilterType As String FilterType = "SupplierType =" & Me.CheatBox Me.Filter = FilterType Me.FilterOn = True...

Hi there, I've been looking at this for hours and not getting anywhere fast. I have a form that I want to filter based on a combo box. The combo box filter contains only three options. Daytime Evening Daytime & Evening The only difference between this filter and others I have used is that...

Not to worry... Fixed it : Me.Parent.HotelDescription = Description :)

Well.. it does work a treat until I move the entire form into position on a tab. Then, when i use the drop down I get an error that says the form can't be found. Private Sub Combo2_AfterUpdate() ' Find the record that matches the control. Dim rs As Object Set rs =...

Worked a treat, thanks!