Search found 1281 matches

by anserkk
Thu Feb 25, 2021 11:14 am
Forum: FiveWin para Harbour/xHarbour
Topic: Sistema multi empresa con mysql
Replies: 17
Views: 11054

Re: Sistema multi empresa con mysql

I recommend using one single database for all the companies. You can add one additional column in the tables to identify/differentiate the company the data belongs to. In the long run, this approach will benefit you. If you keep separate databases for each company, then on a later date if you need t...
by anserkk
Wed Feb 24, 2021 8:21 am
Forum: FiveWin for Harbour/xHarbour
Topic: How read lines of word doc
Replies: 6
Views: 5076

Re: How read lines of word doc

The following example reads word contents, paragraph wise. Not sure whether this is what you are looking for. Maybe you can modify the code to suit your requirement #Include "Fivewin.ch" *---------------------------* Function Main()     Local oWord,oDoc,cWordFileName,aData, oPara          ...
by anserkk
Tue Feb 23, 2021 9:20 am
Forum: FiveWin for Harbour/xHarbour
Topic: How to Curl for text messaging
Replies: 8
Views: 10305

Re: How to Curl for text messaging

Many Many Happy Returns of the day, dear Reinaldo. :)
by anserkk
Mon Jan 11, 2021 7:21 am
Forum: FiveWin for Harbour/xHarbour
Topic: Happy Birthday, Mr. Cristobal Navarro Lopez
Replies: 11
Views: 10796

Re: Happy Birthday, Mr. Cristobal Navarro Lopez

Many Many Happy Returns of the day :)
by anserkk
Tue Jan 05, 2021 12:32 pm
Forum: FiveWin for Harbour/xHarbour
Topic: Marc : Conversion process and questions about it
Replies: 28
Views: 71032

Re: Marc : Conversion process and questions about it

Another option is to use a CLASS already developed by Andrade A. Daniel. The CLASS's name is TPublic // Usage oBill:=TPublic():New(.T.) // Vaiables Declaration oBill:nBillNo:=100 oBill:dBillDate:=Date() oBill:cCustCode:=Space(10) oBill:cCustName:=Space(35) Instead of passing many variables to other ...
by anserkk
Tue Dec 29, 2020 10:54 am
Forum: FiveWin for Harbour/xHarbour
Topic: Column width of the Word table
Replies: 1
Views: 732

Re: Column width of the Word table

Code: Select all

? oTable:Columns(nColNumber):Width
by anserkk
Thu Dec 24, 2020 11:09 am
Forum: FiveWin for Harbour/xHarbour
Topic: ADO filtering
Replies: 3
Views: 879

Re: ADO filtering

What about

Code: Select all

cFilter := "HIREDATE >= "+FW_ValToSQL( DATE() )
oRs:Filter := cFilter
by anserkk
Sat Dec 19, 2020 7:19 am
Forum: FiveWin para Harbour/xHarbour
Topic: COMO ABRIR UNA WEB CON CHROME
Replies: 2
Views: 924

Re: COMO ABRIR UNA WEB CON CHROME

You can open Web on Chrome using the following code //----------------------------------------------------------------------------// Function Main()     Local oShell         oShell:=CreateObject("WScript.Shell")     oShell:Run("chrome.exe")     oScript:sleep( 100 )     o...
by anserkk
Thu Nov 26, 2020 5:32 am
Forum: FiveWin for Harbour/xHarbour
Topic: Happy birthday Antonio !!!
Replies: 52
Views: 24099

Re: Happy birthday Antonio !!!

Many many happy returns of the day :)
by anserkk
Fri Nov 20, 2020 5:44 am
Forum: FiveWin for Harbour/xHarbour
Topic: Change the value
Replies: 2
Views: 803

Re: Change the value

What about copying the value of TGet of App1 to ClipBoard and then in the App2 read the value from the clipboard and then paste into the corresponding TGet ? Just an idea
by anserkk
Thu Jul 23, 2020 9:23 am
Forum: FiveWin for Harbour/xHarbour
Topic: just married
Replies: 24
Views: 21439

Re: just married

Congratulations
by anserkk
Thu May 07, 2020 6:00 am
Forum: FiveWin for Harbour/xHarbour
Topic: Passing Parameters to Excel.
Replies: 2
Views: 656

Re: Passing Parameters to Excel.

byron.hopp wrote:Dim sheet As Worksheet
Set sheet = ActiveWorkbook.Sheets.Add(After:=ActiveWorkbook.Worksheets(ActiveWorkbook.Worksheets.Count))
Try

Code: Select all

oSheet := oExcel:ActiveWorkbook:Sheets:Add( oExcel:ActiveWorkbook:Worksheets( oExcel:ActiveWorkbook:Worksheets:Count() ) )
by anserkk
Sat May 02, 2020 10:08 am
Forum: FiveWin for Harbour/xHarbour
Topic: Happy Birthday Enrico
Replies: 12
Views: 2451

Re: Happy Birthday Enrico

May many happy returns of the day Mr.Enrico :)
by anserkk
Mon Apr 06, 2020 9:28 am
Forum: FiveWin for Harbour/xHarbour
Topic: Excel - text width
Replies: 6
Views: 1197

Re: Excel - text width

I do not know whether this will serve your purpose or not. I haven' tested this. You may have to tweak the code as per your requirement. Just give a try. Function AutoFitAll()   AutoFitMergedCells(Range("B4:K4"), oSheet)   AutoFitMergedCells(Range("B5:K5"), oSheet)   AutoFitMerge...
by anserkk
Mon Apr 06, 2020 9:01 am
Forum: FiveWin for Harbour/xHarbour
Topic: Excel - text width
Replies: 6
Views: 1197

Re: Excel - text width

What about wrapping the text of the merged cell ?