title image


Smiley Outlook import
Salve...



Ich importiere mir aus der Outlook datei OUTLOOK.PST die Kontakte...

Geht auch alles 100 pro... wenn die Outlook.pst auf dem rechner sich befindet...



Nun möchte ich aber gerne auch xyz.pst Dateien von anderen Rechnern importieren...

Nur weiss ich nicht wie ich eben meine Programierung umbauen soll das ich mit nem file requester mir die Datei aussuchen kann....



Kann mir mal einer helfen... ??



Hier mal mein momentanter Code....



---schnipp------------------------------------------------------------

Dim OutlN As New Outlook.Application



Set Conn = CurrentDb

Set DBS = CurrentDb.OpenRecordset("tblKunden", dbOpenDynaset)



i = 0

iNeu = 0

iUpd = 0



Set Arbeitsverz = OutlN.GetNamespace("MAPI").GetDefaultFolder(olFolderContacts)



For i = 1 To Arbeitsverz.Items.Count

Set objKon = Arbeitsverz.Items(i)

s = objKon.LastName

s2 = objKon.FirstName

s = "Zuname = '" & s & "'"

With objKon

DBS.FindFirst s

If DBS.NoMatch Then

DBS.AddNew

DBS!Zuname = .LastNam



etc...

etc..





mfG. Andre
Access 2002/2003 / C# / Java / SQL
Mein neuer Laptop :)


geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: