Search results

Half Job Progress chWorkSheet:Cells:Find('telefono',,-4123, 2,1,1,FALSE,FALSE):SELECT. This came from the Macro Cells.Find(What:="telefono", After:=ActiveCell, LookIn:=xlFormulas, LookAt _ :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _ False...

define var vAcct like customer.account. define var vOrderDate like order.orderdate. define var vConfirmDate like order.confirmdate. define temp-table tTrack field account like customer.account field orderdate like order.orderdate field confirmdate like order.confirmdate. FOR EACH tTrack NO-LOCK...

Hi. DEFINE variable chExcelApplication AS COM-HANDLE. DEFINE variable chWorkbook AS COM-HANDLE. DEFINE variable chWorksheet AS COM-HANDLE. DEF VAR valor AS CHAR. CREATE "Excel.Application" chExcelApplication. chExcelApplication:Visible = TRUE. chWorkbook = chExcelApplication:Workbooks:Add()...

Hi again 1.- In control panel -> Administrative tools -> Data sources(ODBC) create a new Data Source Name (DSN) select Microsoft Access Driver. give it a name (suposse abc) and select the physical access database 2.- Create a progress database (to be used as schema holder) Connect to this...

Hi. A very open question ... With office 2010: Excel chExcelApplication:ActiveSheet:ExportAsFixedFormat(0,"your_file.pdf",0,TRUE,FALSE,,,TRUE). Word WORD:activedocument:saveas("your_file.pdf",17).

Hi. DEF VAR t_item AS DEC. DEF VAR t_price AS DEC. INPUT FROM 'your_file.txt'. REPEAT : IMPORT DELIMITER " " t_item t_price. FIND articulo WHERE articulo.id_articulo = t_item NO-ERROR. IF NOT AVAILABLE articulo THEN NEXT. articulo.precio = t_price. END. Mrobles

Team Work MRobles

Try this chExcelApplication:ActiveSheet:Protect(TRUE,TRUE,TRUE). or this /*ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFormattingColumns:=True */ chWorkSheet:Protect(true, true, true, true) 1srt true = DrawingObjects 2nd true = Contents 3er true =...

HI This works with Word 2010 DEF VAR WORD AS COM-HANDLE. CREATE "Word.Application" WORD NO-ERROR. WORD:VISIBLE = TRUE. WORD:Documents:OPEN("your_file.doc"). WORD:activedocument:saveas("your_file.pdf",17). /* 17 means PDF */ RELEASE OBJECT WORD. /* change the face with : and letter D together...

Your antivirus detect you and it worked

Use PAUSE 0.

Why a buffer? In 116407 "Recursive progrss query for parent-child tree structure". 26 Nov 2009 are 2 samples, with and without buffer. Both works.

Hi. Your database has users list. You can include the username -U uuuuuu and password -P pppppp in your conection.

Hi. May be this can help you ... chExcelApplication:ActiveSheet:PageSetup:RightHeader = "Pag &P" + " de " + "&#". /* Page n of n' */ chExcelApplication:ActiveSheet:PageSetup:LeftHeader = "First Line~nSegunda Linea~nHola Pag &P~n &F". /* Text, new lines, page number and Today */...

Use WHERE in your query to select the desired records

For example, in your main program use: ON F3 help.

I used EZVIDCAP http://www.download25.com/install/easy-video-recorder-for-win.html Now, Windows Image Acquisition (WIA) is better http://msdn.microsoft.com/en-us/library/windows/desktop/ms630368(v=vs.85).aspx but a little difficult

chExcelApplication:activeWorkBook:Saveas('c:\data\wrk.csv', 24,,,,,). chExcelApplication:activeWorkBook:Saveas('c:\data\wrk.xls', -4143 ,,,,,).

vchWorkBook:SaveAs("c:\temp\sample.xlsx",,,,,,,).

. . . . . . .