通过在Powerpoint上使用VBA将映像插入MYSQL DB

时间:2018-12-10 14:41:58

标签: mysql vba base64 powerpoint

我想将图像文件插入MYSQL服务器,以便 我的网页可以使用base64编码显示它:

<img src="data:image/jpeg;base64,'.base64_encode($row['image']).'" ?>

但是,我不知道如何在VBA上获取图像代码并将其上传到服务器: 对于我在PPT上的VBA代码:

    Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim rs As ADODB.Recordset
Dim strConn As String
strConn = "Driver={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE =test3;USER =root;PASSWORD=P@ssw0rd"

cn.Open strConn
Dim oWAI As Object
Set oWIA = CreateObject("WIA.ImageFile")
oWIA.LoadFile "test01.png"
cn.Execute "INSERT INTO image VALUES ('test1','" & oWIA & "');"
cn.Close
Set cn = Nothing

我可以知道如何编辑VBA,以便可以将base64图像代码插入mysql DB吗?

0 个答案:

没有答案