我在outlook联系人的窗体上加了个button,想按下它后去执行一段VBA代码，该如何做？还有，我想在VBScript中用程序连接数据库，该如何做？

Question

Dim rs As ADODB.Recordset, ds As ADODB.Connection 
Set ds = New ADODB.Connection 
st = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=MYDB.mdb;Mode=Read|Write|Share Deny None;Persist Security Info=False" 
ds.Open st 
Set rs = New ADODB.Recordset 
rs.ActiveConnection = ds 
rs.CursorType = adOpenStatic 
rs.LockType = adLockBatchOptimistic 
rs.open SQLSTATEMENT

Answer 1

这个是用vbs连接access数据库,其他的雷同

Answer 2

谢谢你的回复，但在outlook的VBScript中，我找不到关于ado的引用，因此用不了ado

Answer 3

你说的“工具-----引用”在outlook的vba编辑器里就有但在outlook的VBScript编辑器里就没有。

Answer 4

感谢您使用微软产品。 对于第一个问题：如何把一段宏映射为Outlook的一个按钮，请参考下面的文章：252426 OL2000: How to Assign a Macro to a Toolbar Button
http://support.microsoft.com/?id=252426希望对您有帮助！ 本贴子以“现状”提供且没有任何担保，同时也没有授予任何权利。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。 为了为您创建更好的讨论环境，请参加我们的用户满意度调查(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。