用于更新Access数据库中的表字段的HTML超链接

时间:2016-03-19 21:59:13

标签: html vba ms-access-2010

我在电子邮件中创建了一个超链接,用于打开访问数据库。

main

我希望在<'a href='" & "C:\data.final\databaser\FE\shelfstatus_FE.mdb" & "'>LINK<'/a><'/p> 超链接中包含一条语句,当用户点击超链接时,该语句会更新访问数据库中的表。

类似于

HTML

1 个答案:

答案 0 :(得分:0)

AFAIK这不能通过直接连接到数据库的简单超链接来完成。一种解决方案是创建执行更新的VBScript或批处理文件......

在example.vbs中:

Const adOpenStatic = 3
Const adLockOptimistic = 3

Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")

cn.Open _
    "Provider = Microsoft.ACE.OLEDB.12.0; " & _
        "Data Source = C:\data.final\databaser\FE\shelfstatus_FE.mdb"

sql = "UPDATE register SET DateField = #3/16/2016# WHERE number = 1"
rs.Open sql, cn, adOpenStatic, adLockOptimistic

...然后超链接到:

<'a href='" & "C:\data.final\databaser\FE\example.vbs" & "'>LINK<'/a><'/p>