RESPONDER UNA PREGUNTA

Si para responder la pregunta, crees necesario enviar un archivo adjunto, puedes hacerlo a traves del correo [email protected]

Pregunta:	19270 - COMO CREAR UN RECORSET DE VISUAL BASIC HACIA EXCEL
Autor:	Jesus Mata
Hola: Gracias por ver mi pregunta. Estoy haciendo un programa de importación de datos de una hoja de Excel hacia una Base de Datos SQL server 7.0 para ello estoy utilizando Visual Basic 6.0, esta operación ya la habia hecho pero con Access y jalaba perfectamente nada mas que era con la version VB 5.0, ahora que lo tengo que hacer con VB 6.0 me truena el programa en un recordset y me manda el error type mismatch, para que te des una mejor idea de lo que hablo checa este pedaso de codigo.Grasias ojala me puedas ayudar. Public Sub ImportarXLS() Dim strImportar As String Dim dbstemp As Database Dim ws As Workspace Dim tbl As DAO.TableDef Dim otra As Database Dim Importa As Recordset Dim nomtbl As String Dim tblTem As String Dim nvaBD As ADODB.Connection nomtbl = frmImportador.txtRuta.Text Set ws = DBEngine.CreateWorkspace("ODBCWorkspace", "admin", "") Set dbstemp = OpenDatabase(nomtbl, False, 0, "Excel 5.0;") Set otra = dbstemp For Each tbl In otra.TableDefs tblTem = tbl.Name Next Set Importa = dbstemp.OpenRecordset(tblTem, dbOpenDynaset) ' abre la hoja de Excel ' aqui truena********** para mas aclaraciones por favor escribeme.