|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Banco de Dados)
|
|
 |
Título da Dica: Abrir DBF ou DB sem usar o objeto DataControl
|
 |
|
|
|
Postada em 30/10/2002 por Alessandro
Dim Dbfs As Database
Dim TbEstoque As Recordset
Set Dbfs = OpenDatabase(App.Path, False, False, "DBASE IV")
Set TbEstoque = Dbfs.OpenRecordset("Estoque", dbOpenTable)
TbEstoque.Index = "Esto_00"
'É simples devemos definir duas variaveis, uma vai conter a localização do Banco de Dados e qual conexão deverá fazer, no exemplo é o DbaseIV poderiámos fazer o do Foxpro. E na outra variavel o banco de dados que será aberto. E por último demos dizer qual index iremos utilizar.
|
|
|
|
|
