FiveTech Software tech support forums

Antonio, La razón principal es que ya le había hecho algunas modificaciones al código del módulo principal, como es: - que "interpretará" ciertas órdenes embebidas en la URL y diera respuesta. Obviamente esta opción no era para uso de todos en internet. Ahora necesito ampliar esa funcional...

... se qualcuno di voi ha già avuto lo stesso problema ed ha un sistema per bypassarlo. Questa la mia routine di invio: FUNCTION Interactivemessage() paramet cSubject, cBody, aTo, aFiles, lDirectSend,lUseCC,cOrigin LOCAL oOutLook,oMailItem,oRecip,oAttach,i,lOffice,lMailMancante,cVar local nSelected,oDlg1 ...

Thanks Antonio,
it runs.

Due to the routine structure I have difficult to pass as paramet the hDC.
Is there a way to obtain the hDC of oWnd:oWndClient directly in the PaintTrasnsparent routine ? I tried with GetDC(oWnd:oWndClient) but it doesn't runs.

... 2147483654 #include "FiveWin.ch" function Main() cPath:=FileFind("WINWORD.EXE") msginfo(cPath) RETURN function filefind paramet cFile local cValue,nhandle cValue:="" if RegOpenKey( HKEY_LOCAL_MACHINE,"SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths", ...

... via OLE if available otherwise the default mail client. #include "FiveWin.ch" #include "Mail.ch" FUNCTION Interactivemessage() paramet cSubject, cBody, aTo, aFiles, lDirectSend,lUseCC LOCAL oOutLook,oMailItem,oRecip,oAttach,i,lOffice,lMailMancante,cVar local nSelected,oDlg1 ...

... InteractiveMessage("","","",aFiles,.f.) return("") FUNCTION Interactivemessage() paramet cSubject, cBody, aTo, aFiles, lDirectSend LOCAL oOutLook,oMailItem,oRecip,oAttach,i,lOffice,lMailMancante if lDirectSend=NIL lDirectSend:=.f. ...

Solved, thanks. There is a problem also with the AUTOSORT paramet. It doen't runs if I use the ADD COLUMN command to define the column (see code below). It is not urgent for me but I advise you about this problem. .. .. DEFINE dialog oDlg TITLE "xBrowse ...

... I use the MAPI subset system. You can make this using this function: #include "FiveWin.ch" #include "Mail.ch" FUNCTION Interactivemessage() paramet cSubject, cBody, aTo, aFiles, lDirectSend LOCAL oOutLook,oMailItem,oRecip,oAttach,i if lDirectSend=NIL lDirectSend:=.f. endif if cSubject=NIL ...

... aadd(aTo,{"marco","info@softwarexp.co.uk"}) aFiles:={} InteractiveMessage(cSubject,cBody,aTo,aFiles) return nil function InteractiveMessage() paramet cSubject,cBody,aTo,aFiles local oMail oMail:=tMail():New( cSubject,cBody,,,,, .f., .t.,,aTo,aFiles) ACTIVATE MAIL oMail return nil

... Thanks in advance. Best Regards Marco Turco ************************ #include "FiveWin.ch" #include "Mail.ch" function InteractiveMessage() paramet cSubject,cBody,aFrom,aFiles local oMail for i:=1 to len(aFrom) aFrom[i,1]:=alltrim(aFrom[i,2]) aFrom[i,2]:=alltrim(aFrom[i,2]) next oMail:=tMail():New( ...

... Qualche idea ? Grazie in anticipo Marco Turco ************************ #include "FiveWin.ch" #include "Mail.ch" function InteractiveMessage() paramet cSubject,cBody,aFrom,aFiles local oMail for i:=1 to len(aFrom) aFrom[i,1]:=alltrim(aFrom[i,2]) aFrom[i,2]:=alltrim(aFrom[i,2]) next oMail:=tMail():New( ...