PREGUNTAS CONTESTADAS - FoxPro/Visual FoxPro

Hay un total de 1456 Preguntas.

<< >>

Pregunta:	5208 - IMPRIMIR EN RED
Autor:	Edgar Pabani
Que tal a todos. Necesito saber si en VFP 5.0 puedo imprimir desde mi equipo a una impresora compartida de otro equipo, sin tener que instalar la impreso en mi PC. Quiero imprimir especificando solamente la direccion de la impresora. Desde ya muchas gracias.

Respuesta:

Juan Jose Herrera

Por ejemplo si tienes una computadora en red que se llama INFORMATICA y esta tiene una impresora compartida como INFO(nombre del recurso compartido)la sintaxis seria algo asi:
set printer to salida.txt
repor form miinforme to printer
set printer to
!copy salida.txt \\informatica\info > null
si los nombres de las computadoras en red y sus impresoras compartidas las metes a una tabla y creas una LISTA podras escojer a cual mandar la impresion dentro de tu programa.

Contestar

Pregunta:	5215 - COMPONENTES COM
Autor:	Henry Yupaycana Serrano
Como puedo leer un parrafo o una palabra de un archivo de Word y asignarlo a un campo de tabla.

Respuesta:

Victor Alexander Andrade Parra

Puede trabajar por medio de automatización del word, las aplicaciones Microsoft tienen esa ventaja, para sabe que instrucciones tiene que utilizar grabe desde Word una macro indicando las instrucciones que desearia hacer en word despues por la opcion de macros oprima el boton de modificar y observela, algunas instrucciones para trabajarlas con VFP hayque variarlas logicamente para que no emitan error de sintaxis

Contestar

Pregunta:	5220 - ALINEAR CON @SAY
Autor:	jorge Athanassopoulos
Hola: Trabajo con V.FOX PRO 6.00,como puedo hacer para que los datos numéricos mostrados con la función @say en una ventana definida con DEFINE WINDOWS queden alineados a la derecha, mi pregunta puede parecer tonta pero he probado con todo tipo de plantillas y no puedo lograrlo. Si alguien me puede ayudar desde ya le agradezco mucho.

Respuesta:	Victor Alexander Andrade Parra
Normalmente en VFP se crean objetos text para realizar este tipo de operación pero con @ say puede utilizar la instruccion @ SAY #,## TRANSFORM(varible,"999,999,999.. (cantidad de nueves segun anchura")

Contestar

Pregunta:	5271 - CONFLICTO DE ACTUALIZACION
Autor:	antonio difranco
tengo problemas con el conflicto de actualización ,yo trabajo con vistas para hacer mis facturas ,y cuando en cuando me sale el error de conflicto de actualizacion y se cuelga el programa.quiero saber si existe una rutina o libreria que controle estos errores que no sea la que viene el Samples del Vfp 5.0 y si alguien la tiene una idea de como corregir este problema,el sistema es multiusuario y uso el almacenamiento en buffers optimista

Respuesta:

Daniel Aguirre

hola,
tenes que usar almacenamiento optimista 5
cuando haces el table update, si fox no puede bloquear que devuelve un error el 1884, podrias probar con lo siguiente

if tableupdate(.t.)
.... tu codigo
else
aerror(a)
do case
case a(1)=1884
messagebox(" El Número de Cliente ha sido generado
en otra terminal, el sistema cambiará el Número de Cliente!",48,"ATENCIÓN!!!")

....
aca recupara el valor de los objetos del formulario
e intentas nuevamente la actualizacion de la tabla

endcase
endif

suerte y espero que te sirva

Contestar

Pregunta:	5285 - TOOLLBAR CON IMAGELIST EN VFP
Autor:	Fernando Morales Flores
como pegar un control ImageList a un Toolbar en visual foxpro 6.0 lo intente pero no me acepta el imagelist.

Respuesta:

jENY

MIRA YO UTILICE EL TOOLBAR Y EL IMAGELIST PARA MI BARRA DE HERRAMIENTAS PRIMERO DEBES AGREGAR LOS CONTROLES ACTIVEX

LUEGO LE CAMBIAS EL NOMBRE AL IMAGE LIST TE PASO MI CODIGO A MI ME FUNCIONO
PRIMERO AGREGAS EL CONTROL DE IMAGE LIST TE VA APARECER COMO OLE LE CAMBIAS EL NOMBRE Y LE PONES IMAGELIST
LUEGO AGREGAR LA BARRA DE TOOLBAR TAMBIEN APARECE COMO OBJETO OLE LE CAMBIAS EL NOMBRE Y LE PONES TB

LOS AGREGAS A TU FORMULARIO Y SELECCIONAS EL TB TE VAS A CODIGO Y PEGAS ESTO

Visualizar código

EN EL IMAGE LIST LO SELECCIONAS BOTON DERECHO TE APARECE UN MENU VAS EN PROPIEDADES IMAGELISTCTL Y AHI AGREGAS TU IMAGENES Y YA LO CORRES TE TIENE QUE JALAR AMI ME FUNCIONA MUY BIEN

Respuesta:	LUIS BARRANTES
Si no Puedes pegarlo atravez del mismo control, entonces. no perdamos tiempo Este es codigo que uso para un treeview ,en donde muestro la geografia de mi pais Geograf = Tu control imagenes = Tu lista de Imagenes This.Geograf.imagelist=This.imagenes Tienes mi correo ... Estoy para servirte .. Adios Luis Barrantes "Shaman" Comparte tus conocimientos con el mundo Todos ocupamos de Todos

Contestar

Pregunta:	5315 - MSGRAF FORMATEAR
Autor:	LUIS A BARRANTES ARTAVIA
Deseo saber como se le puede dar formato a un grafico programado. Ejemplo .. Cambiar el fondo o cambiar el tipo de barra por una barra circular Gracias por la ayuda

Respuesta:	Victor Alexander Andrade Parra
Te envio un archivo adjunto que contiene un prg que le puede ayudar.. resp5315.zip

Contestar

Pregunta:	5323 - USO DEL POLE DISPLAY
Autor:	Herbert Munguia
Estoy trabajando en un POS(punto de venta) y tengo un pole display, en el que despliego la informacion, mi problema es que no puedo llevar el cursor al inicio del pole display al momento de volver a escribir Auxilio! :) todo desarrollado en Visual Foxpro6.0

Respuesta:

José G. Samper

Yo he configurado para mis aplicaciones varios display, en la forma de facturas tengo un ole con el cual controlo el puerto y cree un metodo en el cual tengo todos los comandos de configuración de los display, lee el manual del dispaly y verifica cuales son los comandos de limpieza, y como puedes hacer para imprimir en cada una de las lines del display
ej:
PARAMETERS pCadena,linea
LOCAL ldisplay,laError[AERRORARRAY]
IF EMPTY(linea)
linea=1
ENDIF
IF !THISFORM.siDisplay
RETURN
ENDIF
** envia informacion al display
IF RTRIM(UPPER(vpar_emp.temp_char7))=='PD-2100S'
pCadena=pCadena+SPACE(20)
pCadena=LEFT(pCadena,20)
&&& jgs: configuración para un tipo de display
ELSE
&&& configuracion para el otro tipo de display
IF linea=1
pCadena=CHR(27)+CHR(81)+CHR(65)+pCadena+SPACE(20)
pCadena=LEFT(pCadena,22)+CHR(13)

ELSE
pCadena=CHR(27)+CHR(81)+CHR(66)+pCadena+SPACE(20)
pCadena=LEFT(pCadena,22)+CHR(13)
ENDIF
ENDIF
ldisplay=THISFORM.ldisplay
ldisplay.PortOpen = .T.
ldisplay.OutBufferCount = 0
ldisplay.OUTPUT = pCadena
ldisplay.OutBufferCount = 0
ldisplay.PortOpen = .F.

Contestar

Pregunta:	5344 - PROBLEMA CON LOS JPG EN EL CAMPO GENERAL
Autor:	Hugo Hugo
Tengo el siguiente problema, en una tabla con un campo general guardo imagenes en formato jpg y me guarda perfecta la imagen. Pero en la PC de mi compañero me guarda un icono y el nombre de la imagen, no me guarda la imagen como en mi PC. Necesito ayudaaaa !!!!! No se como hacer o que hacer para solucionar este problema, quiero saber como hacer para que me guarde la imagen y no un vinculo a la imagen. Mil gracias

Respuesta:

Luis Roberto Navarro

Bueno antes que nada saludos, te digo que el problema lo tuve yo también y el problema pasa un poco en como tengas el sistema operativo [Windows].-
la solución fue un poco costosa, las imágenes "JPG" tuve que guardarlas en un archivo memo binario "APPEND MEMO" desde un archivo para guardarlo y luego para mostrarlo desde la base de datos utilizaba "STRTOFILE" para guardarlo en el disco C:\ con un nombre que me devolviera el sys(2015) con extención tmp el objeto image en su propiedad picture lo apuntaba hacia este nuevo archivo y de esta manera se visualizaba la imágen; una ves echo esto inmediatamente lo borraba para no llenar el disco de temporales, y el objeto mantiene la imágen.-
Espero que te sirva, si no avisame con tiempo que te armo un proyecto y te lo envio.-

Contestar

Pregunta:	5364 - POLE DISPLAY Y CASH DRAWER
Autor:	Herbert Munguia
Hola necesito abrir una cash drawer y usar un pole display el pole display lo puedo ver pero no puedo reiniciarlo a la primera posicion necesito ayuda.

Respuesta:

Victor Alexander Andrade Parra

El cajon monedero se abre imprimiendo una sarta precisa de caracteres encaso de que este conectado a una impresora

prueba con esto :

IF FILE("C:\CAJON.TXT")
ERASE C:\cajon.txt
ENDIF
SET CONSOLE OFF
SET DEVICE TO FILE C:\cajon.txt
@ 00,00 SAY CHR(27)+CHR(112)+CHR(0)+CHR(20)+;
CHR(80)
SET DEVICE TO SCREEN
SET HEADING OFF
TYPE C:\cajon.txt TO lpt1

Si no tiene pruebe creando un .bat que contenga esto :
type "cualquier caracter" > COM# donde # es el numero del puerto a donde esta llegando el cajon

para el pole puede utilizar los siguiente
arch = FOPEN('COM2',12)
nuevo1 = STR(billete,9,2) && Billete variable
nuevo2 = STR(wcambio,9,2) && wcambio variable
= FWRITE(arch,CHR(10))
= FWRITE(arch,CHR(13))
= FWRITE(arch,'RECIBIDO ')
= FWRITE(arch,nuevo1,11)
= FWRITE(arch,CHR(18)+CHR(10))
= FWRITE(arch,CHR(13))
= FWRITE(arch,'CAMBIO')
= FWRITE(arch,nuevo2,11)
= FCLOSE(arch)

Cuando se utiliza los com seriales debe inicializarlos en el autoexec

Contestar

Pregunta:	5378 - QUE FUNCIÓN DEVUELVE LA IP DE MI PC
Autor:	Felipe Olivella
Que función de Visual Foxpro devuelve la dirección IP de mi PC?

Respuesta:	ERIK SAMUEL MARTINEZ
hola espero haberte dado la solucion a tiempo lo que tienes que hacer es lo siguiente crea una tabla con un campo memo Run ipconfig > "C:\red.DOC" use tabla.dbf ZAP APPEN BLANK APPEND MEMO SERIE FROM "C:\red.doc" ip=substr(alltrim(serie),98,13) REPLACE (campomemo) WITH ip y ahi tienes una tabla con el no de ip de tu maquina guardado suerte...

Respuesta:

Uriel Cardenás Noriega

Mi querido amigo la función exactamente no la se pero si de algo te sirve puedes ejcutar:

!ARP -A > C:\RUTA\ARCHIVO.TXT

Esto genera un archivo algo asi:

Interfaz: 172.27.2.11 on Interface 0x1000002
Direcci¢n IP Direcci¢n f¡sica Tipo
172.27.1.6 08-00-20-89-ee-df din mico
172.27.1.7 00-80-5f-a6-08-ee din mico

Luego recorres el archivo y en frente de interfaz: esta tu dirrección , como te digo esto es una solución temporal...

Contestar

|< << 34 35 36 37 38 39 40 41 42 43 44 >> >|