FiveTech Software tech support forums

... ? BemaReporteZeta(cFecha,cHora),"REPORTEZ" RETURN .T. FUNCTION ISWINXP() RETURN .T. //Faz abertura do dia // DLL32 FUNCTION LECTURA ( cPort AS LPSTR ) AS LONG PASCAL ; // FROM "IniPuertaStr" LIB oDp:nBemaDLL //DLL32 FUNCTION LECTURA( cPort AS STRING ) AS LONG PASCAL FROM ...

Enrico,
IF you have COM1 in your micro, could you try this code for a COM port that doesn't exist ?
I'm having the problem when I try to do an OpenComm( cPort, 1024, 10 ), for a COM port that doesn't exist in my computer. The function returns -1, but each time I try, CPU use is increased quickly.

... STATIC FUNCTION SENDMAIL( cFrom, cServer, cTo, cSubject, cMessage, aAttach, cSender, cUser, cPassword, aCc, lHtml, cPort, lNotification, lSSL ) LOCAL lOk := .F. LOCAL oCfg, oMsg LOCAL cCc := "" LOCAL i DEFAULT lHtml := "<html" $ LOWER( cMessage ...

... I am passing all parameters to sendmail() SENDMAIL( cFrom, cServer, cTo, cSubject, cMessage, aAttach, cSender, cUser, cPassword, aCc, lHtml, cPort,lNotification , lSSL ) This is the return message : "Unsent message check windows live mail" LOCAL cFrom := "amriazkhan@gmail.com" ...

... Driver};" + ; "server=" + cServer + ; ";database=" + cDatabase + ; ";uid=" + cUser + ; ";port=" + cPort + ; ";pwd=" + cPass ) xRfc:="XAXX010101XXX" If Empty(oCone) MsgAlert(" No se pudo establecer la conexion con la Base ...

... "This goes in line 10, column 20") oPrn:EndPage() // optional oPrn:End() A little description of all the members of this class: DATAs: cPort: Printing port, by default "LPT1" cCompress: String for compressed mode, by default "15" cNormal: String for normal mode, ...

... "This goes in line 10, column 20") oPrn:EndPage() // optional oPrn:End() A little description of all the members of this class: DATA: cPort: Printing port, by default "LPT1" cCompress: String for compressed mode, by default "15" cNormal: String for normal mode, ...

... cSender, cUser, cPassword ) RETURN NIL FUNCTION SENDMAIL( cFrom, cServer, cTo, cSubject, cMessage, aAttach, cSender, cUser, cPassword, aCc, lHtml, cPort, lNotification ) ... ... maybe something missing or not possible to use it ? or is there maybe another working sample in the meantime because ...

... /********************************************************/ static function ConnectTo() /* */ LOCAL oServerIni, cServer, cUser, cPass, cBanco, cPort, nPort, nFlags, oErr Pega_Script('connect.ini', @cServer, @cUser, @cPass, @cBanco, @cPort ) oServerIni := NIL nPort := Val(cPort) nFlags := 0 ...

...     8388608#define PRINTER_STATUS_POWER_SAVE        16777216//------------------------FUNCTION Main()Local cPort,aPrn,nStatus,aPrintercPort := PrnGetPort()Msginfo( cPort )cPrinter := GetDefaultPrinter()msginfo( "cPrinter" ...

... al directorio de tu instalcion de Instant Client. cCmd :="Provider=OraOLEDB.Oracle;Data Source="+alltrim(cServer)+":"+alltrim(cPort)+"/"+alltrim(cSid)+";User ID="+alltrim(cUser)+";Password="+alltrim(cPassword)+";" // ??? cCmd oCn := FW_OpenAdoConnection( ...

... con la misma version de windows. En una aplicacion para imprimir remisiones tipo DOS, tengo ha grandes rasgos esta function: function ImprDos(cPort) local OBJ_PRINT local OBJ_FILE:=NombreTmp('PRN') // nombre de archivo temporal con extencion PRN OBJ_PRINT:=TDosPrn():New(OBJ_FILE) OBJ_PRINT:=Command('27','67','46') ...

... MANEJO estas funciones y me abre elpuerto como servidor y yo puede manipular todas las operaciones hb_InetInit() Socket := hb_InetServer( val( cPort ) ) ya con esta dos funciones ya puedo recibir la informacion de los clientes y con hbsocket cuales serias las funciones para iniciar como servidor ...

... "This goes in line 10, column 20") oPrn:EndPage() // optional oPrn:End() A little description of all the members of this class: DATA: cPort: Printing port, by default "LPT1" cCompress: String for compressed mode, by default "15" cNormal: String for normal mode, ...

... #define PF_BUFLEN 2048 //----------------------------------------------------------------------------// CLASS TDosPrn DATA LastError DATA cPort, cCompress, cNormal, cFormFeed, cBuffer // AS STRING DATA hDC, nRow, nCol, nLeftMargin, nTopMargin // AS NUMBER DATA lAnsiToOem // AS LOGICAL ...