Programa fuente VB dBase IV
II. También puedes utilizar el control DATA para conectar la tabla *.DBF por separado.
El siguiente es el código fuente:
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=MSDASQL.1minimum_inventory_quantity,sl.stock_quantity,sl. stock_amount, sl.stock_unit_price,sl.category Código de JWCK_BM como cs,jwl_jiec como sl" & _
" donde cs.Código de repuestos = sl.Código de repuestos" & " y cs.Código de repuestos >" & "''" & "''''" & " ordenar por sl.Código de categoría, sl.Código de repuestos"
Adodc1.Refresh
DataGrid1.Refresh
zsl = Adodc1.Recordset.RecordCount
Adodc3.ConnectionString = "Provider=MSDASQL.1..Persist Security Info=False;Data Source=jwl_dbf"
Adodc3.RecordSource = "seleccione la suma (monto del saldo) como hj de jwl_jiec"
Adodc3.Refresh
End Sub