|
I've been trying to obtain the email header from messages in Outlook using VBA. I have done some investigation and found that in outlook they are stored separately and require use of the CDO library to get hold of the header. So, I used Tools-Reference to enable the CDO Win 2000 library, cdosys.dll and employed the code below - but on compiling in the Outlook VBA Editor it gives me errors in all references to that CDO library. Can anyone assist here? Many thanks
<br />
Public Function InternetHeaders() As String <br />
<br />
Dim objOutlook As Outlook.Application <br />
Dim objItem As Outlook.MailItem <br />
Dim objCDO As MAPI.Session <br />
Dim objMessage As MAPI.Message <br />
Dim objFields As MAPI.Fields <br />
Dim strID As String <br />
<br />
Const CdoPR_TRANSPORT_MESSAGE_HEADERS = &H7D001E <br />
<br />
On Error Resume Next <br />
<br />
' Instantiate an Outlook Application object.<br />
Set objOutlook = CreateObject("Outlook.Application") <br />
<br />
'Find the current email item and get its EntryID<br />
Set objItem = objOutlook.ActiveInspector.CurrentItem <br />
strID = objItem.EntryID <br />
<br />
'Then set up a CDO Session using a piggy-back login<br />
Set objCDO = CreateObject("MAPI.Session") <br />
objCDO.Logon "", "", False, False <br />
<br />
'Now get the item as a CDO Message<br />
Set objMessage = objCDO.GetMessage(strID) <br />
<br />
'Now get the headers from the message<br />
Set objFields = objMessage.Fields <br />
InternetHeaders = objFields.Item(CdoPR_TRANSPORT_MESSAGE_HEADERS).Value <br />
<br />
'Now that the headers are captured in a string you can do whatever you want with them<br />
objCDO.Logoff <br />
<br />
Set objFields = Nothing <br />
Set objMessage = Nothing <br />
Set objCDO = Nothing <br />
Set objItem = Nothing <br />
Set objOutlook = Nothing <br />
End Function <br />
u6ik
|
|
|
|
|
Okay. It looks like the issue is that in Outlook VBA with the CDO library referenced, I get the error 'Activex component can't create object'. The line that fails is:
Set CDOSession = CreateObject("MAPI.Session")
Any ideas?
u6ik
|
|
|
|
|
Problem solved. The CDO is not installed as standard in Outlook 2003! After an update all works fine.
u6ik
|
|
|
|
|
hi dear
i am problem in :-
How to display image in datagird randomly in asp.net(vb)
piyush
|
|
|
|
|
Normally, if I hear display Image randomly in asp.net, I think of an AdRotator. If you set up one of your columns in the datagrid as a template you should be able to add the adRotator control to it. I guess I am assuming you are working with Visual studio 2005 ASP.net 2.0. I don't think that control exists in VS 2003. Anyway, I hope that helps.
Ben
|
|
|
|
|
hi dear thanks for reply.
i know the way of iserting imagebox in datagrid tamplet but problem is isertin image in datagridimagebox (randomly)'.
Piyush Vardhan Singh
Programmer
TAS NewDelhi
9313077379
|
|
|
|
|
Hello,
Anyone please tell me How To hide Field on Crystal Report?
Thanx.
priya
|
|
|
|
|
Its simple,
just right click on that field & selec supress,
it will work
Thanks,
Ankur Bakliwal
|
|
|
|
|
Thanks Ankur. It works.
priya
|
|
|
|
|
WELCOME PRIYA
Thanks,
Ankur Bakliwal
|
|
|
|
|
Hello,
I am using 2 subreport which I have in the report footer and each subreport will display about 10 to 15 rows of data each.
SubReport1 is display above Subreport2. However the rows from subreport1 over lap into subreport2.
I would like subreport2 to continue after the last row is displayed in subreport1. Is there a way to do this
Thanks very much for any help
Steve
|
|
|
|
|
Hii,
I m doing right now somewhat same like you.
So i insert one more section in footer & have place my subreport there.
Now it looks fine but I dnt whether this is a good way. ...for time being it is ok.
If you get some other idea please let me know.
My mail id ->priya_p233@yahoomail.com
bye.
priya
|
|
|
|
|
Is it working fine now or not?
priya
|
|
|
|
|
Hi,
Is there any best scope for declaring ADO.NET connection in .net web service?
Which is the best? Is it in modules scope or in local scope?
Thx
|
|
|
|
|
GoodID wrote: Is there any best scope for declaring ADO.NET connection in .net web service?
Create the connection, execute the query, release the connection. Keep the scope as local as possible. You should not keep connections hanging around.
|
|
|
|
|
Hi Mackay,
Is the creation of connection object on every call of funtion in web service can decrease the process response (because the scope is local)?
what is consequencess if I put the connection object in module with Friend declaration?
Thx for you reply
|
|
|
|
|
GoodID wrote: Is the creation of connection object on every call of funtion in web service can decrease the process response (because the scope is local)?
No. Connections are pooled by .NET so you are not actually creating a new connection to the database. You are getting one from the pool.
GoodID wrote: what is consequencess if I put the connection object in module with Friend declaration?
Do not store connection object. Store the connection string only. Allow .NET to do the pooling for you.
|
|
|
|
|
isn't connection pooling is base on connection object or is it automatically?
because in my understanding the connection pool is base on connection object (using global variable)..
Thanks for your reply
|
|
|
|
|
GoodID wrote: isn't connection pooling is base on connection object or is it automatically?
because in my understanding the connection pool is base on connection object (using global variable)..
Connection pooling is based on the connection string. If you use the same connection string you will retrieve connections from the same pool. The pool is held internally by .NET and is automatic.
|
|
|
|
|
Hi Mackay,
I already search google about connection pooling and you are right
Thanks for your reply. I think i got the anwser
Best regards,
|
|
|
|
|
Hello,
I have a datagrid on one form and I would like to fill in my main form when I double click on any record in the datagrid.
How can I do that? I am using VB.NET.
thanks, Joseph
programmer
|
|
|
|
|
hi,
So simple ,
jst refer all controls name by using relative formname.
e.g.
if your main form's name is "MainForm" & the form having datagrid where you r going to take records, its name is "RecordForm".
then
refer datagrid by that form's name
e.g. RecordForm.datagrid
suppose u hav to fill one value from datagrid's 1st col & 1st row in textbox present on MainForm then write-> textbox1.text= RecordForm.datagrid.item(1,1).value.
priya
|
|
|
|
|
Do I need to do anything regarding double clicking any record on the datagrid?
thanks, Joseph
programmer
|
|
|
|
|
You write the code in procedure
Private Sub MyDatagrid1_RowHeaderMouseDoubleClick(...)
''write code of filling mainform Here
''u can refer to select items of datagrid by
Mainform1.textbox1=MyDatagrid1.item(0,e.rowindex).value
Mainform1.textbox2=MyDatagrid1.item(1,e.rowindex).value
.....
.
.
''Like this fill all items of mainform
end sub
As user clicks on rowheader of datagrid's specific cell ur code will be generated
if again any doubt , do ask.
I wnt to ask that , Is all of controls on mainform are textboxes?
priya
|
|
|
|
|
Hi,
thank you for your help. It is going good. I am almost done with my application except the one that I am asking.
yes. all the fields are textboxes on the main form. I am getting this error when I click on the one of the datagrid cells.
Unable to cast object of type 'System.String' to type 'System.Windows.Forms.TextBox'.
here is my code:
Private Sub FSSCallerRecordsDataGridView_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles FSSCallerRecordsDataGridView.CellContentClick
Form3.HospitalNumberTextBox = FSSCallerRecordsDataGridView.Item(5, e.RowIndex).Value
P.S. Form3 is the main form. And the reason I wrote Item(5) is that Hospital number on the datagrid is column number 5. (is it correct)
*****Is it necessary I can email you the project?
thanks, joseph
programmer
|
|
|
|