Excel vba
Outlook 2010 vba
I have the follwoing code coming from Excel with some parameters being used.
Just simply trying to move some emails from one folder in a profile to another folder in another profile.
It stopped working :
Dim objOutlook As Outlook.Application
Dim objNamespace As...
I have created an email in Access vba.
Are there methods to
Disable or hide "reply" and "reply to all" and "forward" in email from access vba..?
Thanks
David Powell
Outllok 2010
Since the security patch kills my vbscript and i cant get my company to remove it.
Is there a way to put a html hyperlink to a certain webpage directly on the Custom form ?
Thanks
david powell
Diane,
Thanks, but
That is my concern, I cant ask a multi-billion company to set "registry keys" on 7,000 machines.
and respectfully they will not install "powershell scripts".
Is Microsoft specifically, going to fix the issue.
Thanks
David Powell
Diane,
The security patch(s)(KB3203467, KB4011196), OFFICE 2010, on vbscript behind outlook custom forms, seems like a killer for any application in place. with out the"hack" fixes"Unistalling", "Manual Registry Fixes"...
Is microsoft truly aware of what this is doing ?
Maybe i'm being a...
I have a custom form and trying to create a textbox on the message page at open..
Sub Item_Open()
' Sets the name of page on the form (P.2)
Set MyFormPage = Item.GetInspector.ModifiedFormPages("Message")
Set MyControl = MyFormPage.Controls.Add("Forms.TextBox.4")
MyControl.Left = 20...
ok, I had to place the code on the outllok custom form itself and pull the data in from a sql connection to sql server. and then did this:
Set objControlu = objPage.Controls("ListBox2")
objControlu.ColumnCount = 4
objControlu.ColumnWidths = "30 pt;30 pt;30 pt;30 pt;30 pt"
j = 0
With objControlu...
This part is from a command button on the outlook custom form:
This is only loading one field
and i have the column count to 2
and column width 10 pt;10 pt
also,
trying this and setting my listbox accordingly:
It will only load one column.
j = 0
With objControlu
do
.AddItem
.List(j, 0) =...
also,
trying this and setting my listbox accordingly:
It will only load one column.
With objControlu
do
.AddItem
.List(j, 0) = rs1.Fields(0)
.List(j, 1) = rs1.Fields(1)
j = j + 1
rs1.MoveNext
loop until rs1.eof
End With
Do either of your attempts work if the listbox is in Access? NO
Still not working, but.
The Column Count for the Listbox..Should be 9 because i have nine fields in the query. ? as shown above.
and my column widths are ok ?
I know the array has data because i was running a small bit of code...
Here are my properties for the Listbox on the Custom Outlook form..
I actually only have 9 fields.
so the original post is incorrect with the column widths
Outlook 2010
Access 2010 vba
I have a custom form that contains a Listbox and i need to fill it from access vba code:
rsArray = rst.GetRows
Set lstDetailData = objItem.GetInspector.ModifiedFormPages("DsmEmail").Controls("lstDetailData")
lstDetailData.List = rsArray
This is not working...
this worked:
eBody = "I Have Reviewed and Approved the following pricing escalation." & "<br>" _
& "Please Review the Request and advise if you support the links below." & "<br>" _
& myForward.HTMLBody
Thanks for direction
dp
Diane,
Actually yes, i'm needing an extra line after:
myForward.HTMLBody = "This is Rejected" & myForward.htmlbody
Because I want it to read:
This is rejected
Blah blah blah blah
html stuff
Sub ChangeSubjectForward(Item)
Item.Subject = "Test"
Set myForward = Item.Forward
myForward.Recipients.Add "test@domain.com"
myForward.HTMLBody = "This is Rejected" & myForward.htmlbody
myForward.Send
End Sub
This seems to work
is there another way ?
Thanks
David Powell
This code is wiping out my original mail with text and html
I want to retain the original message and just add something at the top ?
add this : "This is Rejected"
Sub CommandButton6_click()
ChangeSubjectForward Item
End sub
Sub ChangeSubjectForward(Item)
Item.Subject = "Test"
Set...
I have a custom form, and a simple command button and trying to test out the vbScript?
Sub CommandButton1_Click
MsgBox "Hello World"
End Sub
and it will not work, even after publishing to "Organization Forms Library"
I double-checked to make sure it was not a "One Off" form also.
Thanks...
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.