access 2000 with outlook 2003 ?

[GaryPanic]

Guys i have built a reporting d/base thats works fine with access/outlook2000
does what I want, however the user is working on office 2003(no access installed ) so I installed access 2000- great I can see the d/b now and pushed my buttons to get the reports to email outand - it installs outlook 2000- (which I don't want- i want it to use the outlook version already installed ) is this do-able ?

code below is what i am using

any pointers would be appricated (oh and the codes not mine - big thanks to whoever i pinched it off)


Private Sub Command13_Click()

Dim EmailApp, NameSpace, EmailSend As Object

Set EmailApp = CreateObject("Outlook.Application")
Set NameSpace = EmailApp.GetNamespace("MAPI")
Set EmailSend = EmailApp.CreateItem(0)

EmailSend.To = [Forms]![claimsreporter]![text8]
EmailSend.Subject = "Claims Report for" & " " & [Forms]![claimsreporter]![Text3]

EmailSend.Attachments.Add "C:\temp\cancellation.xls"
EmailSend.Display

Set EmailApp = Nothing
Set NameSpace = Nothing
Set EmailSend = Nothing



End Sub

 

[odin1701]

I'm not sure why it wouldn't work, but I have never tried this.

If for some reason you cannot get it to work, you can use a command-line email tool:

http://www.beyondlogic.org/solutions/cmdlinemail/cmdlinemail.htm

You can create attachments and such with this one as well. Works well - I use it, and the nice thing is that it doesn't matter what version of outlook or anything you have.

 

[GaryPanic]

had a look at your link, and this might of worked - problem is my reports and who they go to vary example

ContractA 2005 goes to Asmith@; GIJones@, FredAstair@ etc
ContractA 2006 goes to Barnie@; BigEars@
contract A 2007 goes
contract B2005 someone else
etc

now there will be a mixture of people and upto 3 sub reports that have to be filters in(I have does this already - my version has all of the contacts in a table tied to the right contract and subsection- works fine on 2000access/2000outlook...

 

[odin1701]

I don't see why it wouldn't work.

Just take this: [Forms]![claimsreporter]![text8]

And put the value of the control in a variable.

Here's an example of where I use Bmail:

strEmail = Me!frmSubTicketQueueEmpInfo!txtEmail.Value
strTicket = txtTicketNumber.Value
                                                                                                                                                            
strCommand = "S:\scripts\bmail.exe -s emailserver.com -t " & strEmail & " -f replyto@emailserver.com -h -a " & Chr(34) & "Your Ticket Number: " & strTicket & Chr(34) & " -b " & Chr(34) & "This ticket has been completed and is now closed." & Chr(34)
        
Shell (strCommand)

 

[GaryPanic]

I'll trash this one around and let you know ..(big thanks in advance )

 

[odin1701]

No problem - maybe someone will be able to give you some advice on getting the older Access to place nice with the newer Outlook - but if that doesn't work at least this can be used in its place.

There is more info on that site on a tool used to create attachments and such.