Nokia与Windows的联系人同步

本文将指导您如何使用Nokia PC套件在Windows系统中导出和同步联系人,包括使用VBA代码解决pst文件中手机号位置的问题。

摘要生成于 C知道 ,由 DeepSeek-R1 满血版支持, 前往体验 >

Nokia与Windows的联系人同步
2009-06-11
版权声明:转载时请以超链接形式标明文章原始出处和作者信息及本声明
http://shenhh.blogbus.com/logs/40870422.html

1.在Nokia的PC套件中导出的联系人,outlook的联系人文件:pst文件。

2.在导出的pst文件中,因为默认把手机号放在其他电话里,所以可以通过在Outlook里运行下面的VBA,拷贝每个联系人的其他电话到手机号里。在outlook里按alt+f11,就可以出现VBA编辑界面。

Public Function UpdatePhoneNumber()
Dim O As Outlook.Application
Dim F As Outlook.MAPIFolder
Dim ICount As Long
Dim oContact As Outlook.ContactItem
Dim obj As Outlook.ContactItem

Set O = New Outlook.Application
Set F = O.Session.GetDefaultFolder(Outlook.OlDefaultFolders.olFolderContacts)
For Each obj In F.Items() ' This line gives error: Expression is of type
'Outlook.Items', which is not a collection type.
If TypeOf obj Is Outlook.ContactItem Then
Set oContact = obj
oContact.MobileTelephoneNumber = oContact.OtherTelephoneNumber
oContact.Save
End If
Next

End Function


收藏到:Del.icio.us
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值