vba - 从电源点导出数据到访问数据库

Question

在有一个带有文本框的 powerpoint，带有信息的组合框。我想将数据从 power point 导出到 aceess 数据库。我想像表格一样使用 powerpoint 来完成数据库。

解决方案是有一个按钮来更新这个数据库。谁有这个按钮的代码？

Answer 1

以下是关于一种方法的一些粗略说明。还有许多其他的可能性。

''Library reference: Microsoft ActiveX data Objects x.x Lubrary

Dim cmd As ADODB.Command
Dim cn As ADODB.Connection
Dim scn As String, ssql As String

''See also http://ConnectionStrings.com
scn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Z:\Docs\Test.accdb;"
Set cmd = CreateObject("ADODB.Command")
Set cn = CreateObject("ADODB.Connection")

cn.Open scn
ssql = "insert into table1 (atext,amemo) values( p1,p2)"
With cmd
    .CommandText = ssql
    .ActiveConnection = cn
    .CommandType = adCmdText
    .Parameters.Append .CreateParameter( _
        "p1", adVarChar, adParamInput, 50, Me.ComboBox1)
    .Parameters.Append .CreateParameter( _
        "p2", adVarChar, adParamInput, 50, Me.TextBox1)
    .Execute recs
End With

MsgBox recs