Estou usando o vb6 e o access mais estou precisando copiar uma tabela que esta em DBF em uma disquete para dentro do banco de dados do access via codigo do vb.

Alguem pode me ajudar.

Companheiro voce precisa criar uma DSN, seta-la para ler .DBF, depois dentro do VB pode aplicar o controle ADODC e seta-lo na sua DSN e ler a tabela.dbf, EX.:

With Adodc1
            .RecordSource = [NOME DA TABELA.DBF]
            .Refresh
            .Recordset.MoveMin
           
            Do While Not .Recordset.EOF
                [DB].rs[TABELA ACCESS].AddNew
                For Campo = 0 To .Recordset.Fields.Count - 1
                    tam = [DB].rs[TABELA ACCESS].Fields(Campo).DefinedSize
                    [DB].rs[TABELA ACCESS].Fields(Campo) = .Recordset.Fields(Campo)
                Next Campo

                [DB].rs[TABELA ACCESS].Update
                .Recordset.MoveNext
            Loop