Hola que tal. hasta este punto ya se ocnectarme a bases de datos MS SQL SERVER 2005 y ACCESS por medio de VB, pero ahora tengo que conectarme a un archivo de excel.
Tengo e siguiente código.
Código:
Dim cnt As New ADODB.Connection
Dim rst As New ADODB.Recordset
Dim stCon As String = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=c:\put.xls;" _
& "Extended Properties=""Excel 8.0;HDR=YES"";"
Dim Forme As New Form1
Dim stSQL As String = "Select * from [Data]"
Sub ty()
Try
cnt.Open(stCon)
rst.Open(stSQL, cnt)
Forme.TextBox1.Text = rst.Fields(0).Value
Catch Err As Exception
MessageBox.Show(Err.Message)
Finally
rst.Close()
cnt.Close()
rst = Nothing
cnt = Nothing
End Try
End Sub
ese [Data] en realidad no se a que se refiere, debe ir algo ahi como "Sheet1"?? pues ya lo intenté pero me dice que no se encuentra ese objeto y que me asegure que esta bien escrito y con el path correcto. Aguien puede explicarme por favor? que es ese data y enseñarme un ejemplo práctico plz? Muchas gracias