Visual Basic :: Outlook User Profile

Creating An Outlook 97 User Profile Programmaticly
Can someone tell me how I could go about creating a Outlook User profile on a machine that has had Outlook just installed.

My objective is to place code in a vb logon script which would detected if a users has had outlook installed and indicate whether or not the Outlook user profile has been setup. I understand how to check for the existence of Outlook what I am looking for is what MAPI's are being called so that I can create the users profile programmaticly???

Any suggestions would be greatly appreciated

tcompe

User Profile
Hi,

i'm just wandering if there is an easy way to implement user profile on vb6. I use an sql server 2000 and my question is: wich way you use when need to implemente user profiles?

Create a table on the bd for users and then store in records user right for the app? or use sql server users?

thanks for all.

User Profile
Hi i need to get the datetime of an exe on the user desktop.

the code i wrote was

Text1.Text = FileDateTime(%userprofile%/Desktop/dan.exe)

But it tells me its wrong as the error i get is path not found. So to combat this is used another method.

Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Dim sBuffer As String
Dim lSize As Long

sBuffer = Space$(255)
lSize = Len(sBuffer)
Call GetUserName(sBuffer, lSize)
If lSize > 0 Then
Text10.Text = left$(sBuffer, lSize)
Else
Text10.Text = vbNullString
End If

Dim a As String
a = Text10.Text

'If Text9.Text = "" Then
'AttBox ("You Dont Have The Application")
'Exit Sub
'End If
'Else

Text1.Text = FileDateTime("C:Documents and Settings" + a + "Desktopdan.exe")

Now this works for computers where the profile name is just the username. however in a server envirnonment some user profile folder comes as peter.Domain Name instead of just the username.

Now in this case i get path not found error again.

Is there some better way to do this filedatetime function or an api code used to fin the profile path?

i would like if you can find something similar in this manner

FileDateTime(%userprofile%/Desktop/dan.exe)

cause i want to use this program i am creating for many network users

Please help required

User Profile HELP
Hi i need to get the datetime of an exe on the user desktop.

the code i wrote was

Text1.Text = FileDateTime(%userprofile%/Desktop/dan.exe)

But it tells me its wrong as the error i get is path not found. So to combat this is used another method.

Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Dim sBuffer As String
Dim lSize As Long

sBuffer = Space$(255)
lSize = Len(sBuffer)
Call GetUserName(sBuffer, lSize)
If lSize > 0 Then
Text10.Text = left$(sBuffer, lSize)
Else
Text10.Text = vbNullString
End If

Dim a As String
a = Text10.Text

'If Text9.Text = "" Then
'AttBox ("You Dont Have The Application")
'Exit Sub
'End If
'Else

Text1.Text = FileDateTime("C:Documents and Settings" + a + "Desktopdan.exe")

Now this works for computers where the profile name is just the username. however in a server envirnonment some user profile folder comes as peter.Domain Name instead of just the username.

Now in this case i get path not found error again.

Is there some better way to do this filedatetime function or an api code used to fin the profile path?

i would like if you can find something similar in this manner

FileDateTime(%userprofile%/Desktop/dan.exe)

cause i want to use this program i am creating for many network users

Please help required

MS Outlook - Which Profile Is Active?
Hi,

is it possible to determine which Outlook profile is currently active?
I know the reg key for default profile but i want to react on special profiles if selected...

thx

Stefan

Logon New Profile In Outlook
Send Email with changing Outlook Profiles:

I use MAPI.Session object and MAPI.Message object in order to send email with the option to change the from field by changing outlook profile.
In order to change Outlook Profile, I log with new profile. This operation is been done by MAPI.Session.logon function. This function receive ProfileName, ProfilePassword and ShowDialog parameters.
If ShowDialog is true, the user must enter profile name and profile password regardless ProfileName, ProfilePassword define in the logon function.
If ShowDialog is false, the logon been done by ProfileName, ProfilePassword.
In win32, there is a defect. The profilePassword parameter is ignored on all Win32 platforms.

I want to know if there is away to log to new profile without using ShowDialog=True in objSession.logon function. (I develop automatic application, without user interference)

example: objSession.Logon ProfileName:=name, ProfilePassword:=pass, ShowDialog:=False, NewSession:=True, nomail:=True

Note: I can't create smtp protocol, our company policy is : use written things (outlook), don't invent existing functionalty.

Outlook Profile Password
Greetings!

I have a problem with Outlook profile password. I have a PC with Outlook 2000 install on it and configure with different profile (already configure). I also use that PC to run scheduled process in the morning and want it to send me an email confirming the process.

I have the code that sent the email to work fine with one email account but because I use multiple profile, it ask me for the password.

This is my code:

Private Sub SendMail()
Dim objOutlook As Outlook.Application
Dim objOutlookName As Outlook.NameSpace
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient
Dim CallDescription As String

Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookName = objOutlook.GetNamespace("MAPI")
objOutlookName.Logoff
objOutlookName.Logon "user1", "user1", False, True

Set objOutlookMsg = objOutlook.CreateItem(olMailItem)

With objOutlookMsg
Set objOutlookRecip = .Recipients.Add("user2@company.com")
objOutlookRecip.Type = olTo

.Subject = "Updating completed successfully!"
.Body = "Great job. "
objOutlookRecip.Resolve
.Display
.Send
End With
objOutlookName.Logoff
Set objOutlook = Nothing
End Sub

With the ShowDisplay set to false I get this error message:

"Run-time error '-2044706811 (86204005)':
Cannot create e-mail message because a location to send and receive messages could not be found. To add a location, click the Tools menu, click Services, and then click the Delivery tab."

but if I set the ShowDisplay and enter the password manually, it works fine. I have also tried MAPI.

Does anyone have any ideal on how to fix this.

Your help is greatly appreciated.

Thanks,

Husky.

Retrieve Outlook Profile Name
I need to be able to get the name of the current profile name in
use by Outlook. For example if I have one profile called
"ProfileWork" and another called "ProfilePersonal" and I log into
Outlook using the "ProfilePersonal" profile, in one of my programs
I need to read a file which is created by the profile and named
from the profile name.

So if I dont know which profile (in case there are more than one
profiles for the user) is currently being used, I won't know which
file to open and my program data will be irrelevalent to the user's
profile.

I know its a long shot that someone may know, but it will really
help me.

Thanks in advance for any help or direction.

Setting Up Outlook Profile
Hello,
We are in the process of upgraded 10000 users from NT4 to W2k. Most of the user setup has been scripted for the techs. However, they still must configure Outlook manually for each user. Although it only takes a minute, x10000 users it is an added pain. It seems the profile info is stored in a .pip file which can't be accessed directly. I'm wondering if anyone knows a way to use maybe the MS dlls to modify the pip file. Thanks!
-C

Creating Outlook 97/98 Profile Thru VB?
How can I create a new Outlook 97/98 profile via VB. These computers have Outlook installed, may or may not have a profile already. I need to create a new profile. I will have the username, full name etc... I need it to be generic in the creation process. Thanks for any help

How To Get All The Profile Name From Microsoft Outlook?
Dear Members

In our project i have to get & show all the microsoft outlook profile names.
How to get all the profile name from Microsoft Outlook?

Thanks in advance
Rajesh

User Profile Folder
I have a folder (i.e : C:documents and settingsMADcat1990 )
how can I detect it in vb6?

User Profile And Password
Dear All
1I am writing exe application in VB . For distribution of such application what are security systems are available in VB ?
2How to read User ID and password defined to windows operating system (Win 98 ) by user using visual basic ? My aim is to read it and application will be executed for certain users only . Is it possible using Visual basic ?
Thanks indeed
Ameet

Adding A .pst File To An Outlook Profile
Does anyone know how to use VB or VBScript to add a .pst file to an Outlook profile? We are migrating thousands of users to a different Exchange system and I have most of what we need figured out but I haven't found a good way to tell Outlook where the .pst file is located. Has anyone ever done this sucessfully? I was hoping there would be a nice, neat registry entry but there doesn't seem to be.

Thanks,

Ken Franklin

Read/configure Outlook Profile
I think this question's been asked many a time before, but here goes...

We have Exchange Server 2000 and multiple Win 2K Pro PC's that access it. When I log into my computer I set up my Outlook's Microsoft Exchange Server profile through Control Panel/Mail, and when I start Outlook it goes right in. When someone else logs into my computer, they get the Setup wizard and they have to choose "Microsoft Exchange Server" and enter the server name.

Is there a way to write a program in VB that could execute with the NT login script, that would set up the user's profile? Thanks!

Win2k User Profile -Problem
HI.... Does anybody know how I could get the User profile which is currently log into a win2k box which is running the program. I need it to personalize a certain conection to my application.. thnx

How To Retrieve Fullname Of The User Profile
Hi

I want to know the user's full name of the system which he/she is using currently. By using the 'GetUserName' API i can able to get the username which is stored in the system but not the full name. Is there is any option to get the full name..?

I NEED TO RESET A USER'S PROFILE SETTINGS!
Ok.......We all know abt a user's profiles ettings....but I've changed the user desktop through the HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionExplorerUser Shell Folders key..........how do i get the registry to indicate that change? I mean I want the change to happen on the fly..Please help me!

[Edited by Doomoo on 06-09-2000 at 02:25 AM]

Use Win2000 User Profile To Log On On My Form
Hello friends,

I created a login form that needs to use users profile to log in to the software
just as i use my win 2000 user profile to log on to windows. i have two textboxes
(txtuserName and txtpassword) and one command button (cmdLogin).
I don't know how to connect my code to access Active Directory and pass the
necessary authentication just like windows.
Can somebody help me out?

Thanks.
Bisi

Retrieving Exchange User Profile
Does anyone know how to retrieve the user's profile from the Exchange Mail Server?

Thank you

Alternatice Outlook Profile Email From Excel
Hi Friends

I am using Microsoft Outlook 2000. I have SMTP Microsoft Exchange Server.

In my pc there are two profile has been created. One is belongs to me that is User1 and password test1, other one is common news letter that is User2 and password is test2. I want to send a mail at a particular time using user2 profile.
When I am sending mail in test time its asking a window to(a) start up profile and (b) asking to connect, offline or cancel. Then I say connect.. (c) it is asking password. so there are three steps are going.

Is there anyway to control the default setup through macro. Kindly help me in detail that I could use your knowledge..

thanks in advance..

Open Other Outlook Profile And Export Calendar
Hi all

I have developed a new system which uses information from a number of different people's outlook calendars. At the moment I am having to go into each profile and manually export their calendars into an individual excel spreadsheet for each of them.

This works fine apart from the fact that there are now 75 people taking part in this system which means a lot of manual opening and closing of different people's mailboxes. I have set up a profile for each person on my computer, so what I need if possible is the following:

A macro that will go into a new person's profile and export their calendar to excel, then close the profile.

Does anyone have any starting points for me on this one. I believe I can work through the calendar export but I am struggling with the code for opening different profiles and closing them again.

Any help would be much appreciated.

Brokovich

MAPI Send Mail .. Outlook Profile
Is there a way to make outlook use the default profile for outlook? RIght now i have it sending email using outlook but it prompts for a profile?

HELP

please email shaffer224@yahoo.com

thanks

How To Read Exchange Or Microsoft Outlook 97 Profile
Hi,

How could i read Microsoft Outlook Profile Names in a vb application .

Thanx
natraj

Retrieving A Users Name From His Exchange Or Outlook Profile???????????
Is there a mapi call or api call I can use to retrieve the users name.

Selecting Outlook Profile From Access Database
Hello there,

In my project, I need to generate reports from an access database and send
the emails by attaching the generated report.
To do this, I'm using docmd.sendobject method.

But, the outlook is prompting me to select the profile for each and every
email. I would like to select the profile for the first email and
subsequent emails should use the same profile. Can someone help me in this
regard?

Regards,
Krishnamohan

Loading User Profile When Server Is Logoff.
Hi,

We use Acrobat Distiller to convert documents to PDF format, this process initiated on a server side.
The problem is when there is no user logon to the server Distiller throws an error "There was an error found when printing the document... Do you want to retry or cancel the job". But when user logon to the system conversion process works fine.
I think that distiller needs logged-on user profile in order for this to work. Does anyone know how to load user profile from COM+ when server is logoff.

Invironment:
Win2000 srvr
Acrobat 5.0
VB 6.0

Thanks,
Boris.

Get All Users Profile Dir Or User List In Win2k Or XP.
Hi !
I tried this code to get all users profile:
' Function API name : GetAllUsersProfileDirectory
' ----------------------------------------------------------------------------
Private Const TOKEN_QUERY = (&H8)
Private Declare Function GetAllUsersProfileDirectory Lib "userenv.dll" Alias "GetAllUsersProfileDirectoryA" (ByVal lpProfileDir As String, lpcchSize As Long) As Boolean
Private Declare Function GetDefaultUserProfileDirectory Lib "userenv.dll" Alias "GetDefaultUserProfileDirectoryA" (ByVal lpProfileDir As String, lpcchSize As Long) As Boolean
Private Declare Function GetProfilesDirectory Lib "userenv.dll" Alias "GetProfilesDirectoryA" (ByVal lpProfileDir As String, lpcchSize As Long) As Boolean
Private Declare Function GetUserProfileDirectory Lib "userenv.dll" Alias "GetUserProfileDirectoryA" (ByVal hToken As Long, ByVal lpProfileDir As String, lpcchSize As Long) As Boolean
Private Declare Function GetCurrentProcess Lib "kernel32" () As Long
Private Declare Function OpenProcessToken Lib "advapi32" (ByVal ProcessHandle As Long, ByVal DesiredAccess As Long, TokenHandle As Long) As Long
Private Sub Form_Load()
    'KPD-Team 2000
    'URL: http://www.allapi.net/
    'E-Mail: KPDTeam@allapi.net
    Dim sBuffer As String, Ret As Long, hToken As Long
    'set the graphics mode of this form to 'persistent'
    Me.AutoRedraw = True
    'create a string buffer
    sBuffer = String(255, 0)
    'retrieve the all users profile directory
    GetAllUsersProfileDirectory sBuffer, 255
    'show the result
    Me.Print StripTerminator(sBuffer)
    'create a string buffer
    sBuffer = String(255, 0)
    'retrieve the user profile directory
    GetDefaultUserProfileDirectory sBuffer, 255
    'show the result
    Me.Print StripTerminator(sBuffer)
    'create a string buffer
    sBuffer = String(255, 0)
    'retrieve the profiles directory
    GetProfilesDirectory sBuffer, 255
    'show the result
    Me.Print StripTerminator(sBuffer)
    'create a string buffer
    sBuffer = String(255, 0)
    'open the token of the current process
    OpenProcessToken GetCurrentProcess, TOKEN_QUERY, hToken
    'retrieve this users profile directory
    GetUserProfileDirectory hToken, sBuffer, 255
    'show the result
    Me.Print StripTerminator(sBuffer)
End Sub
'strips off the trailing Chr$(0)'s
Function StripTerminator(sInput As String) As String
    Dim ZeroPos As Long
    ZeroPos = InStr(1, sInput, Chr$(0))
    If ZeroPos > 0 Then
        StripTerminator = Left$(sInput, ZeroPos - 1)
    Else
        StripTerminator = sInput
    End If
End Function
'-------------------------------------------------------------------
but its not get all dir
please help me or tell me how to get all users list
thanks !!!

User Profile Lost 3 TIMES! Let's Go For 4, Dudes!
Real good work, guys.

Outlook Promts For Profile Over And Over And Won't Send Mail CODE >>>>
Outlook prompts me for the profile to use to send this simple email like it's looping or something.... can someone take a gander at this code and help me out please?

THANKS,

JUSTIN

Private Sub SendMail(strTo As String, strSub As String, strMsg As String)

    Dim olApp As Outlook.Application
    Dim olNS As NameSpace
    Dim olMessage As MailItem

    Set olApp = CreateObject("Outlook.Application")
    Set olNS = olApp.GetNamespace("MAPI")

    Set olMessage = olApp.CreateItem(olMailItem)
    olMessage.To = strTo
    olMessage.Subject = strSub
    olMessage.Body = strMsg
    olMessage.Send

    olApp.Quit

    Set olApp = Nothing
    Set olNS = Nothing
    Set olMessage = Nothing

    Dim strSendTo As String
    Dim strSubject As String
    Dim strMessage As String

strSendTo = "xtremewireless@cox.net" '<=CHANGE TO NEEDED ADDRESS
strSubject = "This is the subject line" '<=CHANGE AS NEEDED

'Construct the message you want to send, append the text in the text box to the end of a string, add a new line...
strMessage = "Reference Number: " & Text1.Text & vbNewLine
'add some more text to the message
strMessage = strMessage & "This is the rest of the message..." & vbNewLine

Call SendMail(strSendTo, strSubject, strMessage)

End Sub

Private Sub Command1_Click()
Call SendMail("xtremewireless@cox.net", "Test mail", "Test mail from VB using SendMail procedure")
End Sub

Outlook Automation, Profile/pst Problem I Think - TOTALLY Desperate
I am new to Visual Basic programming and in writing an application I have included an Outlook automation subroutine that updates the contacts folder with data from a VB form. How can I identify the user profile to which I want to save the contact, instead of always saving to the profile of the user currently logged on?

Any help with this would be greatly appreciated
Thanks

HIGH TECH HOMER.

What API Call Do I Need To Fill In A Logon Script For A User Profile
Visual Basic 5.0.
What API function do I called to do the task below. The task below simply entering in a text "Logon_Script.bat" in the text box named "Login Script:"

================================

In Windows 2000,
Start --> Setting --> Control Panel -->
users and Passwords --> Advanced TAB --> Click the "Advanced" button --> Click "Users" folder -->
Double click user "JohnDoe" --> Click the "Profile" TAB -->
Logon Script: Logon_Script.bat

Sending Mail Thro' Exchange Server ( Without Outlook Profile)
Hi,

I have written a client-server application. Now i am planning to include email functionality in my
application. I was asked to add the functionality in the server side and the client should invoke a
function in the server to send the mail.

I thought i can do it with MAPI or CDO lib. But it seems both requires exchange server profile configured
in the server machine. All the sample codes written using MAPI/CDO uses a local profile to connect to
exchange server ( which is running in another machine ). SMTP is not secured. So, I cant use CDONTS
or SMTP or WINSOCK to send mails.

Is there a way to directly connect to the exchange server to send mail ( I was given a generic userid/password,
exchange server host name )? If you know a C++ or VB code which does this, please let me know.

Thanks,
Poochi..

Editing Outlook.srs For Outlook 2002 And User GUID
Greetings all! My first post, so please bare with me!

I'm currently trying to automate the setup up of Outlook 2002 - a holy grail for over a year now. The MS supplied maintenance wizards and profilers configure most components, but wont change Send and Receive settings. Indeed, MS cant seem to provide any method to change these... so began my quest.

The settings are held in Outlook.srs under the users /Application Data/Microsoft/Outlook directory. Its not plain text, so I've had to open it on a byte level; I've done that fine, no probs. Comparing Outlook.srs's, I;ve discovered there are several unique 16 byte blocks to each Outlook.srs, and one 16 byte block which is unique to the user - its this which stops an Outlook.srs being used between profiles. Its looks like a GUID to me... but I can't find it anywhere. I've successfully copied the block from a current live srs into the template srs (from another ID, and thus shouldn't work with the profile), allowing the template srs to work successfully.

So heres the plan; get a template Outlook.srs with my desired settings, binary read it with my tool and replace the user specific GUID (16 byte block) with the current users Outlook GUID. The flaw to this cunning plan is two fold;

1) The GUID (the unique 16 byte block) seems to move around the source srs file. I can't guarentee it will be in one specific location. By its nature it also changes between users.
2) I can't find any references to the GUID, in Outlook config files or in the registry.

I either need another programmatic way of updating the srs (COM objects wont do it) OR I need a way of finding out the current Outlook send and Receive GUID, to allow the "transplant" to my template.

Phew *takes a breath* Anyone any idea how I could crack this one?

Outlook User's Name
Does anyone know how to obtain the User's Name of an Outlook .pst file?
For example, if you were to go to outlook and click on an email message and print it, the User's Full Name would appear at the top of the page in bold. Now, if I were to replace my .pst file with someone else's .pst file, the local User's name would still show up. What I need is a way to get the actual Name of the person who the .pst file belongs to. All Outlook objects have inherit a "session" object that has a "CurrentUser" property, but this returns the local user's name.

Is there a way to get the Name of the actual owner of the .pst file?

With the mailItem, I can just use oMailItem.RecievedBy. But all other Outlook Items do not have this property.

If anyone understood anything I wrote and can be of assistance, please help me out. Thanks

(I know I confused a lot of you out there with my desciption, but there will be someone who knows what Im talking about.....hopefully)

Outlook User
Anyone know who to get the current Outlook user or if this is even possible??

Thanks....

Remove And Add Outlook User
Hello,
I am taking over this computer at work and the current outlook account under user A. How can I delete user A and set up new account for myself?

Also, how do you set up new account in outlook?

thanks so much.
AL

Outlook - Unlimted User?
Hi,

i need to know if we can share Outlook data, such as Appointments and Things To Do, with a small workgroup WITHOUT Exchange?

I mean, Outlook is a 1-user (local store) or unlimited-user (Exchange server) proposition?

Thanks
Balakumar

Sender User In Ms Outlook 2k
Please!!!!
How to choose from all the mail accounts configured in my outlook client to send an email under Ms VB6.0????

It's very urgent, please!!!!

Outlook - User Email Address
hi! in vbscript, how do i refer to the email address of the current user? thanks.

Outlook: Add User To Distribution List
In Outlook's Global Address List (GAL) we have multiple distribution lists (DLs) that we need to manage users for on a regular basis. Using Outlook's built in DL display to manage these lists is really frustrating since you can't have the DL window open while browsing emails at the same time.

For this reason I am building an external DL manager tool that we can use.
I need to be able to search for a DL by name, and then add or remove a contact from that DL. I have searched both google and these forums and have found numerous examples on how to create your own DL, but none that allow you to search for and update an existing DL in the GAL.

Please help!!!

To Get The List User Profiles Of Outlook.
Hi Gurus,
I am building an application where I have to show the list of all user profile in a machine so that the user can fill log on properties i.e. pasword and start his session to send mail through outlook. I know that I can send mail through outlook using outlook objects with current user profile setting, but requirement is that it is possible that we may have more than user profile in a machine and a user has to select the one of the profile.

Can anybody give me the idea to how to get the list of User profiles in VB?

Open Multi User Accounts In Outlook
Hi all

I have a question with regards to accessing other collegues accounts. Rather than opening each one file open etc then I would like a macro button to open them for me. I would also like the calendars to open in my window rather than opening in a seperate window. Is this possible? If so can anyone help me?

ps i'm on outlook 2002

Regards

Paul

Howto Export The Outlook Calendar Of Another User
Howto export the outlook calendar of another user ...?

Autonumer Generation For User Form In Outlook
I am trying to set up a client end outlook form for an IT helpdesk environment. The idea is that the user uses a form created by myself from there individual PC. This form is them mailed to a IT helpdesk mailbox (exchange). What I am having trouble with is how to generate a unique contiguos reference number for each call once the call has been sent to the IT HD mailbox. Is this possible ????.

Kind regards

Martin

Send E-mail Through Outlook Express With User Intervetion
I have this code, which sends e-mail with attachment through MS Outlook.

Code:
Public Sub SendMail(tempFile As String, Optional EmailTo As String, Optional Subject As String, Optional Body As String)

On Error GoTo Err_Email

Dim objOL As Outlook.Application
Dim msg As Outlook.MailItem

Set objOL = New Outlook.Application
Set msg = objOL.CreateItem(olMailItem)

With msg
.To = EmailTo
.Subject = Subject
.Body = Body
.Attachments.Add tempFile
.Display
'.send
End With

Exit_Email:
Set objOL = Nothing
Exit Sub

Err_Email:
MsgBox "Error #" & Err.Number & ": " & Err.Description
Resume Exit_Email

End Sub

I would like to send it through outlook express, becouse my client has only OE installed.

Is it possible to do something like that above?

(I would like to attach file, set the e-mail adress and subject, but I'd like that outlook express 'New e-mail' window stays open, so my client can edit the body or subject)

Outlook User Profile

Does anyone know What API I could use so that I could create an Outlook User profileProgrammaticly.Any suggestions would be greatly appreciated.tcompe