摘要:
先临时记录下,以后再整理将文件转换成二进制写入数据库:Dim adodb1, adorec As Object Set adodb1 = OpenDatabase(App.Path & "\data.mdb") Set adorec = adodb1.OpenRecordset("select * from model") Dim stmpic As ADODB.Stream Dim strpictemp As String Set stmpic = New ADODB.Stream ... 阅读全文
posted @ 2013-02-11 18:02
八风
阅读(677)
评论(0)
推荐(0)
浙公网安备 33010602011771号