Access导入到图片库中，具有可操作性吗？

ning84

ACCESS做的产品管理系统可一键导入图片生成产品图册报价单-Access & SQL Server-ExcelHome技术论坛 -  https://club.excelhome.net/threa ... tml?_dsign=0128ba05

图片导入到Access文件会很大。Access建立图片库具有可操作性吗？


批量导入员工照片，你会操作了吗？-Excel基础应用-ExcelHome技术论坛 -  https://club.excelhome.net/thread-1135979-1-1.html


我现在用Excel+SQL方法管理图片，图片存放在指定目录下。

1. 
   
2. '''EngName,ChiName,oNote,Path,Left1,Top1,Width1,Height1,Left2,Top2,Width2,Height2
   
3. '''
   
4. Function SheetSqlRs(FilePath, oAddress)
   
5.     ''
   
6.     Dim Str
   
7.         Str = "Select "
   
8.         Str = Str & "EngName,ChiName,oNote,Path,Left1,Top1,Width1,Height1,Left2,Top2,Width2,Height2"
   
9.         Str = Str & " From "
   
10.         Str = Str & "[" & FilePath & "].[" & oAddress & "]  Where EngName <> Null"
    
11.         'Debug.Print Str
    
12.     Dim Cn As ADODB.Connection
    
13.     Dim Rs As ADODB.Recordset
    
14.         Set Cn = New ADODB.Connection
    
15.         Set Rs = New ADODB.Recordset
    
16.         Cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Extended Properties='Excel 12.0;HDR=yes';data source=" & ThisWorkbook.FullName
    
17.         '''
    
18.         'Set Rs = Cn.Execute(Str)
    
19.         Rs.Open Str, Cn, adOpenKeyset, adLockOptimistic
    
20.         Set SheetSqlRs = Rs
    
21. End Function

复制代码

约定的童话

这种方法思路是对的

zpy2

片导入到Access文件会很大。Access建立图片库具有可操作性吗？

我现在都是只保留路径