请问有没有控件或方法将硬盘的目录和下面的文件名直接转换成数据库！？

Question

直接的控件肯定没有
这个问题是这样解决的(记得给分哟)：
1。取得目录到数组（同理到recordset）
    sDirName1 = FileSystem.Dir(SDirPath & "\*", vbDirectory)
    
    I = 0
    J = 0
    
    Do While sDirName1 <> ""
        If InStr(1, sDirName1, ".") = 0 Then
            aDirName1(I) = sDirName1
            sDirPath1 = SDirPath & "\" & sDirName1
            aDirPath1(I) = sDirPath1
            I = I + 1
        End If
        sDirName1 = FileSystem.Dir
    Loop
2.取文件
    sFileName = FileSystem.Dir(SDirPath & "\*.htm")
    
    Do While sFileName <> ""
    ....    
        sFileName = FileSystem.Dir
    Loop

Answer 1

现成的控件是没有的，因为不确定因素太多了，我作了一个数据库备份和恢复的程序，是把SQL数据库备份成ACCESS，有一些方法可以给你参考，如果需要的话，发EMAIL：[email protected]