怎样可以读取 OUTLOOK 的日历并同步到自己的程序中 - 编程论坛

#2

啊良2014-10-06 12:49

这段是日期时间显示看能用上不:
Private Sub Timer1_Timer()
Label1.Caption = Chr$(13) + Chr$(10) + Date$ '日期
Label2.Caption = Time$ + Chr$(13) + Chr$(10)'时间
If Label5.Caption = Time$ Then GoTo 51
Exit Sub ' 结束以上程序
51: Print Tab(10); "起床啦。。。"
End Sub

#3

chen35232014-10-06 21:54

位高权重，事多怕忘记，怕冲突。
用数据库添加记录，然后用查询日期显示结果，条件是：日期>=date+7,‘显示7天的行程。

#4

ljh1202014-10-07 09:38

谢谢大家积极回复。

#5

ljh1202014-10-07 09:42

以下是引用chen3523在2014-10-6 21:54:00的发言：

位高权重，事多怕忘记，怕冲突。
用数据库添加记录，然后用查询日期显示结果，条件是：日期>=date+7,‘显示7天的行程。

谢谢！
但我要的不是自己输入再添加到数据库。而是需要程序读取OUTLOOK中的日历排程信息，然后自动由程序写入到数据库中。公司人员通过此程序共享自己的日程安排，有权限的人都可以看到。

现在是我不明白怎么从OUTLOOK中同步日历排程到程序中。请各位多多指点，谢谢！