Address Book/Global Address List & Visual Basic 6 Part II (AddressEntry)

Visual Basic


  • 1. MarshalByRef
    Sorry wrong Group ;) "Ale K." < XXXX@XXXXX.COM > wrote in message news: XXXX@XXXXX.COM ... > Hi, i'm new on the world of remoting and i was wondering, what to do if i > want to remote an object that already inherits from another class??? > > Thanks. > Alex. > >
  • 2. VB doesn't evaulate the right value
    You probably need to replace it with (note the brackets). >For Row = 1 To grid.Rows - 1 > If IsNumeric(grid.Cell(flexcpText, Row, 3)) Then subtotDebit = >Round(subtotDebit, 2) + Round(CSng(grid.Cell(flexcpText, Row, 3)), 2) > If IsNumeric(grid.Cell(flexcpText, Row, 4)) Then subtotCredit = >Round(subtotCredit, 2) + Round(CSng(grid.Cell(flexcpText, Row, 4)), 2) >Next Row > >If (subtotDebit = subtotCredit) And (subtotDebit = totalAmount) Then > DO_A >Else > DO_B >Endif >-------------------------------------------------- > > >In some cases where subtotDebit=subtotCredit and subtotDebit =totalAmount >the program moves to DO_B instead of the expected DO_A. While debugging in >these cases, the values that are displayed at the IF.....row exactly match >to each other, such as > >subtotDebit =123.45 >subtotCredit =123.45 >totalAmount =123.45 > >However, the debugger jumps to DO_B. How can I solve this, since the >debugger doesn't show that it performs good. > >Oscar > > >. >
  • 3. return file opened by program
    Andrew Faust wrote: > > "Geert Annys" < XXXX@XXXXX.COM > wrote in message news:tEn7b.6893$ XXXX@XXXXX.COM ... > > Hi, > > > > is there a simple way to return the file currently opened by a program. > > for example : what mp3-file is opened by MusicMatch Jukebox ? > > No. To my knowledge what you ask isn't even possible, unless the > program your are checking has provided some sort of API for > retrieving that information. Other than indirectly searching for a file that <may> (or may not) be locked...certainly not a foolproof answer by any stretch of the imagination.
  • 4. Printer Selection In win 2000 versus Win '98
    The following code works as expected when running on a win '98 system but not at all when running on a Win 2000 system. Dim PrtName as Printer For Each PrtName In Printers If PrtName.DeviceName = "Receipt" Then Set Printer = PrtName Exit For End If Next In Win '98, any printer.print statements will now print to the printer named 'Receipt' in the printers folder. However, in Win '2000, not only will nothing print, but when attempting to print a test page from the printer properties dialog, the printer will not print the test page. Before trying to select the printer through the above code the printer test page would print. Does anyone know why there is a difference between the two operating systems and what the fix would be for the problem? Thank you for your input Bill

Address Book/Global Address List & Visual Basic 6 Part II (AddressEntry)

Postby Eric Fortin » Thu, 19 Feb 2004 22:31:37 GMT

I found my answer installing the Exchange SDK.  I could not get CDO.dll to
load from my Outlook install, and I figured it out via the Object Browser.


When I do AddressEntry.Address, I get something other than an email

It's on a different computer, but, from not very good memory, it's something
/o[organization]/[someparameter]/[user alias]

When I look at email address on the email address tab in outlook its got 3

[another non email]

Is there any way to get the actual email address.  I know it's there
somewhere (in bet one of the fields) but I cannot find it.

If I query the Contacts, I get the correct email from AddressEntry.Address

Eric Fortin
Cell: 303.748.9885

Similar Threads:

1.Extract specific email addresses from outlook global address book

I need to update a database with the new email addresses. The global
address book has about four email addresses for each person that I
want in my database. I have some sample code that extracts email
addresses out of a distribution list and puts it into a word document.
I am not sure as to how to get the correct email address out of the
address book and put it into some sort of table. Any help will be

2.information From Global Address Book into list box.

I am new in this. I have to get the Information from the GAL  into the listbox. First i would need to find the User name from the GAL. then which i would need to get the information(phone number, address, alias, department) of the selected name output into the listbox of the UserForm. 
I manage only to get the userName into the combolist. But Can anyone how can i use the selected name to extract out the details of the selected name from the combolist?

Public Sub Import_Contacts()

Set olApp = New Outlook.Application
Set olNamespace = olApp.GetNamespace("MAPI")
Set olAddressList = olNamespace.AddressLists("Global Address List")

narCNT = olAddressList.AddressEntries.count

redim strarray(narCNT+1)

For Each olAB In olAddressList.AddressEntries

comboList1.addItem (strArray(i))
do events

next olAB

set olApp = nothing
End Sub

3.getting the AddressEntry object to update for a Personal Address Book

What I am trying to do is a write a vbscript that will, on userl login,
update any Personal Address Books they may have with the updated entry
in the Global Address List.  Currently, I am developing this in VB6 and
I'll port it over to vbscript when I'm done.

The script looks something like

    Set colAddressLists = oMAPI.AddressLists
    Set colGALAddressEntries = colAddressLists("Global Address

    For Each objAddressList In colAddressLists
        if objAddressEntry.type = Case OlDisplayType.olUser
            Set objGALAddress =
			objAddressEntry.Type = objGALAddress.Type
			objAddressEntry.Address = objGALAddress.Address
			objAddressEntry.Update True, True
        End If
	Next objAddressList

The problem is, that this only updates the address in the PAB if it
happens to be an SMTP type.  There doesn't seem to be any visible
properties that allow you to set the property to X.400, SMTP, etc..,
and I don't know how to force the entry to get updated.

Any ideas?  I'm really stuck on this, and i know the answer lies in my
poor grasp of the MAPI object model.  I should add that I am tryingn to
run this on a machine with Outlook 2003 installed, but I will have to
factor it for Outlook 2000.  Any help will be most sincerely
apprecieated, so thankt in advance.

--Peter j. Shaw

{sorry, I posted this also on microsoft.public.outlook.contacts as a
separate thread, but wasn't sure if that was the best place to ask}

4.Creating address list personal distribution lists with visual basic

I am unable to create a vbasic tool to add a address 
entry from the global address book to an address list 
entry that is a distribution list.  I don't receive an 
error but neither do changes or additions show.  This 
makes me think I am seeing a security feature.  Any ideas?

5.Outlook, Address Book (Outlook w/Exchange Server), and Visual Basic 6, Help Pls


I'm trying to create a VB6 application where the user can press a button and
the Outlook (2002) Address Book pops up with all the Global addresses.
Then, after  the user selects the desired people in the address book
(usually a single person), I'd like to retrieve:

(Full) Name
Email Address
Phone Number
Pager Number

for each person selected and then populate some text boxes on a form.

Is this possible, and if so, how?

TIA, and Special Thanks again to anyone who can help out.


6. Access to Outlook's Address book via Visual Basic

7. [Outlook] [Visual Basic] Address book

8. Outlook, Address Book (Outlook w/Exchange Server), and Visual Basic 6, Help Pls

Return to Visual Basic


Who is online

Users browsing this forum: No registered users and 15 guest