1) the last patches of outlook have a new protection system which asks to the user before sending mail.
You can try to use a solution already foun in following threads on this web site:
Thread605-570702
Thread707-529363
Thread605-384826
Thread68-468379
There is a third part object that allow...
It is quite simple: you have put the the code
strRpt = "rptDonorLetter"
strRecipientEmail = rst.Fields("EmailAddress")
strLetter = Forms![frmLetter]![Letter]
only out of the loop.
you have to puti it after
Do Until rst.EOF
Doing so you can solve your problem.
But...
On line help specifies that you cannot modify topvalues property through vba code.
But you can use a tmp table filling via VBA with the top n records of the query result (the form could show the tmp table contents).
Probably this is because Outlook 2000 has been restricted to not allow automated sending.
You can find solutions into these threads
Thread605-570702
Thread707-529363
Thread605-384826
Thread68-468379
The following code opens an acces db (the path is c:\x.mdb) and runs a macro called "xmac" (you can use docmd.openquery to launch the queries)
On Error Resume Next
Dim SysObj As Object
Set SysObj = GetObject("c:\SiadAus.mdb")
If Err.Number <> 0 Then
msgbox...
after you have updated the first subform, you have to requery the second subform.
In the event afterupdate of the first you have to put this code
Private Sub Form_AfterUpdate()
Parent.SecondSubFormName.Requeryì
End Sub
You must replace "SecondSubFormName" with the nema of te...
Access shows always a record with default values (even if you specify default values in the table properties) tha looks like a new record. But thi is not a new inserted record so you can't save changes.
You should simulate the menu item "records/add" and then save it or you can put on...
Probably the problem is that you put the primary key fields in the main form so you have to fill first these fields and only then you can write on subform keys.
Try with onclick event of the tab control
Follow this example:
You have a tab ctrl with 2 pages called t1 and t2
In the first page you must put a txt ctrl named txt1
In the event onclick of t2 put this code
Private Sub t2_Click()
If IsNull(Me.txt1) Then
Me.t1.SetFocus...
Probably the problem is connectet to the refernce to DAO 3.6 library (in the references libraries).
By default access 2000 an 2002 does not use this library.
Try to look for this library in the list of references and control if the relative box in checked.
Then "uncheck" the activex...
Try with the event before update of the text box
Use this code sample (in the example the text box name is "c").
Private Sub c_BeforeUpdate(Cancel As Integer)
Dim i As Integer, flag As String
Cancel = 0
For i = 1 To Len(Me.c)
flag = Mid(Me.c, i, 1)
If flag <> "-"...
I've always used vba to send mail from lists with outloo 2000.
Now, my company uses xp and Outlook asks me the permission to send every mail: i've tried to change the level of protection with no results.
What is the problem?
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.