Search results

I have tried this but it still don't work I got this before the combo box info: Private Sub Combo12_AfterUpdate() On Error GoTo Combo12_Err Dim rs As Object Me.refresh Set rs = Me.Recordset.Clone rs.FindFirst "[Contactname] = '" & Me![Combo12] & "'" Me.Bookmark =...

I have a main Form called Customer and a subform which is called Contacts. now when I select a contact for a customer it works fine, but when I change the customer and goto select a contact the combo box doe's not refresh to reflect the change of customer code. If I put a button on the screen...

Yes my friend, you have to copy it manualy you can't try to do it with windows running. reboot the PC, hold down F8 select "Command prompt safe mode" I think it's option 5. then have the file on a floppy disc. type the following line: copy a:*.dll c:\windows\system when prompted to overwrite...

I have a report that exports into Word as RTF format. within the report is the customers email address, how can I cut the address from the text and make word open it's Email mode and paste the email address in there and send using a macro? thanks Mike

I had almost the same error, this could be a virus, have you checked your system with Norton? even if there is no virus maybe you should copy a new Kernal32.dll into you windows\system directory. hope this helps Mike

Anyone know how to send a report in an email as the main body not as an attachment? I can only seem to send it as an attchment my code is: DoCmd.SendObject acSendReport, "QuotationEMail", acFormatHTML, Me.Email2, , , "Honda Connectors Quotation", "Please find attached quotation:", True...

I have counted the chars, seems to only display 255 in the report like a text field? must be a way to display as memo 65535?

Any one know how to setup a button to call the spell checker? and fix it to just check one memo field? Thank you Mike

Here Jill this is what you want to put in there: Dim looptimes, count As Integer looptimes = InputBox("Enter a number of prints") For count = 1 To looptimes DoCmd.OpenReport "MyReportName", acNormal, "" Next count Regards Mike

Thank you Graham, I thought about that and have done it but still don't work any other ideas? Thanks Mike

I want a text box on my quotation for additional text, I have added a field in my quotation table, and in my form, I have set this as Memo, I can type lots of text in it When I view my Quotation report only half the text is displayed? how can I get around this? Thank you

Yes that is what I have done, but to select that contact, I have a pull down box as in the code above, the problem is it shows all the contacts for every customer, can't get it to just display those for CODE=Customer Code Mike

Hello, I have a problem with a combo box, it just looks up contact names, but I can't get it to filter out only the contacts that relate to the customer code. Private Sub Combo12_AfterUpdate() 'Find the record that matches the control. Dim rs As Object 'stLinkCriteria = "[Code]="...

You could just make a software delay loop inside the funtion e.g. Sub MyDelayMacro For iCount = 1 to 999999 Next iCount End Sub or maybe better for you: Sub MyMainMacro() ' Pause for 15 seconds. Application.OnTime When:=Now + TimeValue("00:00:15"), _ Name:="MyDelayMacro" End...

Thank you Rich, but the problem is I want to use the command: DoCmd.SendObject acSendReport, "QuotationEMail", , Me.[Emailaddress], , , "Honda Connectors Ltd.", , True and I don't know how to do it? I want it to email a report which is controlled by giving the quote number to the report...

Can anyone help me with this: In Access I can still use the toolbox to put a command button on the the report, but when you try to press it in view mode the display switches to print preview as it does in report preview mode How can I get the button to work, all it will do is email that...

Thank you Harry but I do have this in there but it will not open the report still for any other customer other than the first one? DoCmd.SendObject acSendReport, "QuotationEMail", acFormatRTF, Me.Emailaddress, , , "Quotation", "Please find attached quotation:", True This works fine for the...

I have a problem with emailing a report, if I want to view a report quotation I use the code: Private Sub Preview_Click() On Error GoTo Err_Preview_Click DoCmd.Save acForm, "Quotation" DoCmd.OpenReport "QuotationEMail", acPreview, "", "

I guess our clients can accept HTML, I assume they all use Outlook. Yes I do have access to our domain server www.hondaconnectors.co.uk no page there at the moment (next project). My logos are names bsi.bmp and honda.bmp Many thanks Mike

In your employees folder call a field picture or something like that set it's datatype to OLEobject. then simply fill in the table with the path name for each picture. I have a small example database for you. I can email you it. Let me know how you get on? Mike