fer1710

fer1710

Fernando Loza Años de Experiencia en el Desarrollo de sistemas informaticos, con Visual FoxPro, Power Builder, SQL Server 2000, 2005
 6.650 puntos  Perú @fer1710 desde - visto

Respuestas

Respuesta en a

Resultado en grid

Puedes crear un cursor y asociarlo al grid, algo como select * from tabla where campo_fecha = dFecha into cursor cursor_lista luego el segundo grid lo enlazas a ese cursor asi: thisform.grid2.RecordSource = "cursor_lista" Thisform. Refresh
Respuesta en a

Correlativos

Lo que puedes hacer es poner la siguiente linea, cada vez que vas a procesar un medico nuevo: thisform.text1.value = PADL(VAL(INT(thisform.text1.value)),3,"0") Esto incrementa en 1 ese text1, y le pone los ceros a la izquierda

Reemplazar Valores en una tabla de VFP 6.0

Lo que puedes hacer, es crearle a ambas tablas un indice en el campo código, y activar ese indice. Luego ejecutas este código Se le tabla2 SET RELATION TO cod INTO Tabla1 ADDITIVE Replace all stock wirh tabla1. Stock
Respuesta en a

Quitar - por /

Puedes usar este truco: thisform.text2.value = "" cCaracter = "" for i = 1 to len(thisform.text1.value) cCaracter = substr(thisform.text1.value,i,1) if cCaracter = "-" cCaracter = "/" endif thisform.text2.value = thisform.text2.value + cCaracter Endfor
Respuesta en a

BD cargar registros

No entiendo muy bien lo que me estas explicando, pero, lo que creo que puedes hacer, es guardar tu archivo de excel como una DBF, y tratar de tarbajarla desde la DBF convertida. Los registros ya estarían almacenados en la DBF que se creo a partir del...
Respuesta en a

Borra espacios en blanco

Puedes crear una función 'limpiar', y usarla de la siguiente forma: c = "K& N" ?limpiar(c) function limpiar lparameter lp_texto local l_caracter, l_texto_limpio lp_texto = alltrim(lp_texto) l_texto_limpio = "" for i = 1 to len(lp_texto) l_caracter =...
Respuesta en a

Reporte Excel

Lo que sucede es que mientras se llenan las celdas de la hoja en Excel, no se puede tocar nada. Lo que puedes hacer es hacer invisible el objecto OLE ... visible = .F.) y cuando termine lo vuelves a poner visible (visible = .t.) También ten en...
Respuesta en a

Vfp y Msql

Declara la variable temp de la siguiente forma: temp = "'%" + alltrim(ThisForm.Text1.Value) + "%'" Suerte Fernando
Respuesta en a

Devolver más de un valor de un formulario

Lo que puedes hacer es pasarle una variable ARRAY como parámetro, y al salir del formulario, puedes alterar los valores de esa variable ARRAY. Ejemplo DIME array1[3] array1[1] = 'Texto' array1[2] = 20 array1[3] = date() DO FORM formulario1 With...
Respuesta en a

Mostrar informe de una a otra hora

Lo que puedes hacer es pegar en el Form1 un control Timer, desde donde vas a controlar por tiempo la visualización de los 2 formularios. Al control timer, ponle en la propiedad interval = 60000, esto es para que cada minuto verifique que hora es. En...

Suscríbete RSS