Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - barri
Páginas: [1]
1
« en: Viernes 13 de Enero de 2006, 13:19 »
Hola peña. Necesito recorrer una tabla con 15000 registros aproximadamente. Para esto me creo un odbc (la tabla es de foxpro, dbf), hago un select con un command y lo abro en un recordset llamado reg_art_dat. El caso es que cuando abro el registro mediante el codigo
cmd.ActiveConnection = c200X cmd.CommandText = "SELECT * from art_dat order by f_art_cod" reg_art_dat.Open cmd reg_art_dat.MoveFirst
y añado reg_art_dat a la inspeccion, las propiedades PageCount y RecordCount de dicho objeto adquieren el valor "El proveedor de datos u otro servicio devolvió un estado E_FAIL."
y cuando recorro el registro secuencialmente mediante el codigo
Encontrado = 0 Do While Not reg_art_dat.EOF And Encontrado = 0 'Por cada articulo codigo = Mid(reg_art_dat.Fields("f_art_cod"), 2, 6) If reg_articulos_homologados.Fields("ReferenciaCatalogo") = codigo Then Encontrado = 1 End If reg_art_dat.MoveNext Loop
en la posicion 1163 se detiene la ejecucion dando el error "El proveedor de datos u otro servicio devolvió un estado E_FAIL." que es el valor que adquirian las propiedades del objeto recordset.
Alguien que me pueda echar una mano por favor lo agradeceria mucho.
Saludos.
2
« en: Jueves 17 de Noviembre de 2005, 12:36 »
Wenas,
tengo un problemilla de tipos al insertar en Access. El error que me da es:
[Microsoft][Controlador ODBC Microsoft Access] No coinciden los tipos de datos en la expresión de criterios.
En la tabla de Access tengo datos de tipo moneda con 2 decimales y datos tipo Fecha/Hora.
Para pasar los tipo moneda e intentado con Long e Integer pero me sigue dando el error.
Para Fecha/Hora evidentemente he usado Date. No puedo cambiar el formato en las tablas de Access ya que tengo que subirlas a un servidor web con ese formato.
¿Que tipos deberia usar en Visual Basic o de que otra forma puedo resolver el problema?
Muchas gracias!!
Salu2.
3
« en: Jueves 17 de Noviembre de 2005, 10:45 »
Lo primero que tienes que hacer es agregar la referencia a excel en tu proyecto (Proyecto -> Referencias... -> Microsoft Excel)
Una forma que me dijeron es:
Dim mixl As Object Set mixl = CreateObject("excel.application") mixl.Workbooks.Open "c:\tempo.xls" mixl.Application.Visible = True ' cualquiera de estas dos formas es válida Debug.Print mixl.Cells(3, "I") Debug.Print mixl.Cells(3, 9) mixl.Quit Set mixl = Nothing
--------------------------------
Otra forma es:
Dim mixl As Object
Set mixl = GetObject("f:\tarifa\Tarifas Serviempresa 2005.xls") mixl.application.Visible = True mixl.Parent.windows(1).Visible = True Set mixl = GetObject("f:\tarifa\Tarifas Serviempresa 2005.xls") lista_catalogo.AddItem mixl.Worksheets(1).Range("I" & 4320).Value
Esto es para para extraer el dato de la celda I4320 (existe en mi hoja) de la hoja 1 y me da el error 381 (el indice de la matriz de propiedades no es valido).
Tambien he probado cambiando la ultima linea por la siguiente:
lista_catalogo.List(1) = mixl.Worksheets(1).Cells(4320, "I").Value
------------------------------------------
Otra:
Dim objExcel As Excel.Application, i As Integer
Set objExcel = New Excel.Application
With objExcel .Workbooks.Open App.Path & "\MiPlantilla.xls"
.Range("I" & 4).Select List1.AddItem .ActiveCell.FormulaR1C1
.Workbooks.Close .Quit
-----------------------------------------
Y por ultimo la que yo uso es mediante consultas SQL creando un ODBC (Inicio -> Ejecutar -> odbcad32) del tipo "Driver do Microsoft Excel(*.xls) y seleccionando el archivo excel. Entonces lo tratas como un ODBC normal (con connection, command, etc.) y las consultas tienes que hacerlas de la siguiente forma:
"Select DATO From [Conteo_Datos$]"
donde DATO es el nombre de una columna si el nombre esta puesto en la parte superior de la misma y [Conteo_Datos$] es la hoja donde hacemos la consulta.
Cuando haces referencia a una hoja del libro la tabla se llama igual que la hoja, pero le tienes que agregar el signo de dolar $ al final del nombre, pero como este no es un nombre válido para una consulta SQL, entonces lo encierras entre corcheques.
Saludos
4
« en: Martes 15 de Noviembre de 2005, 09:16 »
jaja, no, se puede crear un ODBC para excel y tratarlo desde Visual Basic con consultas SQL y tambien se puede acceder sin ODBC con otros metodos de creacion de objetos excel. Ya me dijeron y puedo acceder sin problemas. Salu2.
5
« en: Lunes 31 de Octubre de 2005, 20:50 »
Hola peña,
necesito obtener datos de una hoja excel. Hice el odbc, he abierto la conexion y cuando quiero volcar a un registro una consulta con un command no se como llamar a la tabla y al campo que quiero consultar, ademas ambos tienen tildes, he probado y me dice que no encuentra el objeto correspondiente a la tabla que intento acceder (si la tabla es artículos dice que no encuentra artículos). ¿Como se consulta a excel? Muchas gracias de antemano.
Salu2.
6
« en: Miércoles 19 de Octubre de 2005, 12:52 »
Hola, acabo de instalar visual basic 6.0 y tengo un problema y es que cuando abro un proyecto hecho anteriormente se cierra el programa conforme se abre. Si creo un proyecto nuevo si puedo abrirlo pero al pulsar ctrl+T y elegir cualquier control, al pulsar aceptar o aplicar se cierra automaticamente el programa. ¿Como lo arreglo para que no se cierre? Muchas gracias. Salu2.
7
« en: Miércoles 19 de Octubre de 2005, 10:38 »
Buenas, tengo que instalar Visual Basic 6.0 pero cuando lo intento me sale una ventana titulada "Subsistema de Windows de 16 bits" con el error
"C:\WINNT\SYSTEM32\AUTOEXEC.NT. El archivo de sistema no es apropiado para ejecutar aplicaciones MS-DOS y Windows. Elija "Cerrar" para finalizar la aplicación."
El caso es que he buscado ese archivo, incluso desde el gestor de comandos, y no existe. ¿Como puedo resolver esto para instalar el programa? Mil gracias.
Salu2.
8
« en: Sábado 15 de Octubre de 2005, 10:57 »
Enas, necesito acceder a tablas dbf que no pertenecen a una base de datos, van por libre. ¿Como puedo hacerlo? Muchas gracias. Salu2.
9
« en: Martes 11 de Octubre de 2005, 19:55 »
Enas sabe alguien como abrir y tratar archivos de texto txt desde foxpro? Asias salu2
10
« en: Viernes 7 de Octubre de 2005, 19:09 »
Enaaaass, necesito acceder a bases de datos de access, consultarlas y modificarlas. Me han dicho que el foxpro accede directamente a bases de datos access (uso la version 6.0) pero he probado a abrirla de la forma habitual con open database y no lo abre, como puedo hacerlo? Muchas gracias, salu2
Páginas: [1]
|