FiveTech Software tech support forums

Solucionado,

No me había dado cuenta que bskip debía inicializarlo a 1

Saludos

Buenas
Tengo éste código:

static function Ltarifa(aAlias )
********************************
local oFont:=array(3)
local nfield
local a,pre,tra,pos1,pos2,precio:=array(41),tramo:=array(41)
local xtipo,oReport
local cIndi:=(aAlias[1])->( OrdSetFocus() )
for a=1 to 41
pre:='precio'+alltrim(str ...

Buenas

Yo, desde hace años utilizo el siguiente programa para subir ficheros por ftp, no he tenido ningún problema. Es para xharbour, son ficheros de texto. Este código lo saqué de éste foro ha ce años.


#include "fivewin.ch"
#include "xbrowse.ch"
#include "Directry.ch"

memvar Publicas ...

Funciona perfectamente

Muchas gracias César.

Buenas

Una Pregunta:

Si como Variable de texto utilizo un Get memo, como lo hago para que me ponga las lineas según las voy escribiendo en dicho get?; ya que escribo en éste campo las lineas separadas, pero al enviar, me lo hace con todas las líneas seguidas.

Gracias

Muchisimas gracias Cristobal.

Nos ayudas muchisimo.

Buenas

he adquirido un ordenador portátil con windows 11, tengo que pasar todos los temas de compilación a él.
Yo utilizo para compilar Fivedit, del maestro Cristóbal Navarro, y he copiado tal cual el directorio donde tengo todo lo necesario para la compilación al nuevo ordenador.
Empezó dándome ...

Correcto

Gracias Antonio!

Buenos dias

Tengo el siguiente codigo:
(aAlias[26])->(Dbseek(xnuconduc))
cVar:=(aAlias[26])->Matricula
cVar1:=(aAlias[26])->Codigo+space(2)+"-"+space(2)+(aAlias[26])->Nombre
cAlias1:=aAlias[29]
titulopanta:=" ENVIOS DEL DIA : " + dtoc(cini)
DEFINE DIALOG oDlg FROM 1, 1 TO 50, 205
oDlg:cTitle ...

Si es un lobo, me come.

me sobraba el valid

Buenas
Tengo estas dos funciones que me buscan una poblacion por el nombre, todo funciona bien, pero hay una cosa que me mosquea, y es que me he dado cuenta que evalúa dos veces la función ponciudad, por lo tanto me mustra dos veces el mensaje "Poblacion ya existía" , en su caso. la primera vez se ...

Vale, perfecto.
Muchas gracias

Voy a probar a ver

La función Buscapo, que he puesto anteriormente es lentísima en red.
Imaginate que para cada letra que tecleemos, tarda como 10 segundos en dejarte escribir la siguiente.
Voy a ver si soy capaz de depurar un poco el código

Me da error al compilar


#include "autoget.ch"
Function asociar()
local poblac:=space(20)
local cAlias2,oDlg,oSay,oGet1
dbUseArea(.T.,,Publicas:cUnidad+"MUNICI",aAlias[2],.T.)
(aAlias[2])->(ordSetfocus("cnonmun"))
(aAlias[2])->( dbGotop() )
cAlias2:=alias()
DEFINE DIALOG oDlg FROM 1, 1 TO 50 ...