Re: Use a character from another codepage
Hi, I don't think you can do that in Windows, but try with cpconvert: Cpconvert(1252,437,Chr(255)) Greetings Graham Trott wrote: Would like to use the block character from codepage 437 without changing codepages chr(219)=? and chr(255)= blank space VFP9 uses codepage 1252. I am not sure what the implications would be of changing the codepage in existing applications. I would just like to create a simple progress bar that does not use any screen real estate. For example: WAIT REPLICATE(CHR(219),50)+REPLICATE(CHR(255),50) WINDOW nowait Is there any way to map a character to a different codepage. --- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html --- [excessive quoting removed by server] ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/4b5efb0b.4080...@alexandria.cc ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Excel ADO automation and dates.
Alan Bourke wrote:
I'm automating Excel with VFP9, using ADO to populate rows in a
spreadsheet,as detailed here:
http://fox.wikis.com/wc.dll?Wiki~ExcelAutomation~VFP
Which all fine apart from the usual - bloody dates, or more specifically
datetimes. I'm running a SELECT on a VFP table similar to this:
VFP2Excel(_samples+'data\testdata.dbc','select * from
employee',.ActiveSheet.Range('A10'))
One of the VFP fields is DateTime, but it was going into Excel in US
format, i.e. month first. Nothing I could do with cell formats, custom
or otherwise, would change it. I can't see anything in the ADO
documentation about regionalisation.
So I gave up and decided to put the date part in one column and the time
in another. But this *still* puts the date in with the wrong format.
Has anyone who doesn't work with US-format dates ever done this ?
Alan,
Excel displays data according to the options in the windows regional
settings, check that and change to English (United Kingdom) or whatever
other regional setting you want.
Another option is to format the cells with data:
Suppose the data is in column C:
Columns(C:C).Select
Selection.NumberFormat = dd/mm/
HTH
Jaime Vasquez.
___
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/4a1fea0a.7060...@alexandria.cc
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
Re: sql server and windows vista
Rafael Copquin wrote: thanks to all of you for your replies Rafael Hi Rafa, Sql 2000, 7.0 and 6.5 doesn't work with Vista, you need at least 2005 sp2 instead: http://www.microsoft.com/sql/howtobuy/sqlonvista.mspx Saludos Jaime Vasquez ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: VFP and Office Automation (MS Excel specifically at this time)
Allen wrote: It does help indeed Matt. Even if it does not address all points you can get a gist of how it works. The VB help in office itself helps again except one bit. That is the numbers to use. The help does not have the numbers in calls and foxpro does not understand the vbOKOnly type of paramater. Help can usualy be found in office programs by calling up the Visual Basic editor and getting help from there. Allen Hi, the easiest way to get the values is to open Visual Bssic for Applications, or any com server, in the object browser and drag the constants to a code window. the old fox wiki: http://fox.wikis.com/wc.dll?Wiki~ExcelConstants or msdn: http://msdn.microsoft.com/en-us/library/aa221100(office.11).aspx http://msdn.microsoft.com/en-us/library/bb259478.aspx HTH Jaime Vasquez ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] Net TV
Ricardo Araoz wrote: I want to buy one of those things you plug into the motherboard (sorry don't know the word in english) for watching TV, but I would also like to access the TV from other stations in my local web. Is that possible? How? Cheers. Hi, The easiest way to stream video is with VideoLan: http://www.videolan.org/doc/play-howto/en/play-howto-en.html http://forum.videohelp.com/topic259354.html http://www.engadget.com/2005/11/29/how-to-stream-almost-anything-using-vlc/ HTH Jaime Vasquez Guatemala, C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] Momentum for Linux PCs
Gil Hale wrote: Ubuntu and Kubuntu are said to be cut from the same cloth under the hood, it is just the GUI that is really different between them. Who knows for sure, however? Yes, ubuntu, kubuntu, xubuntu, edubuntu and gobuntu all descends from the same root: debian. The main diference between the first 3 is the window manager, ubuntu uses gnome, kubuntu kde and xubuntu xfce, for older machines. http://lwn.net/Distributions/ HTH Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Strategies for keeping connection open to MySQL web database from VFP9 client
Paul McNett wrote: Now *that* sounds like a MS move for sure! The developer says close the connection and the server, behind the scenes, keeps it open for you. Hi All, This technique it's called Connection Pooling and it's not only a MS thing, as you can see in the links at the end of the article: http://en.wikipedia.org/wiki/Connection_pool Cheers Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] Foreign Search Engines
Matthew Jarvis wrote: To our friends out there that come from places where English isn't the predominant language... What web search engines do you use? Is there the same Google stuff available to you, just based on your local language? Yes, we have Google Guatemala: www.google.com.gt There are more than 100 googles: http://c.asselin.free.fr/french/googleworldwide.htm Greetings. Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Where Do Files Go When Sent to the Vista Windows Folder?
Kenneth Kixmoeller/fh wrote: On Oct 31, 2007, at 12:35 AM, Christof Wollenhaupt wrote: 1. A Clean up my system button somewhere? Gets rid of this stuff (+ internet cache + cleans out OL or OLE deleted messages, etc.) Hello Ken, Try with atf-cleaner: http://www.blackyard.net/downloads/ATF-Cleaner.exe Saludos Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Excel question
Ricardo Aráoz wrote:
Jaime, it works! And it solves my problem.
Only glitch is that the second 'CopyFromRecordset(loRs, 150) copy
next 150' does not copy the next 150 but copies the first 150 records
again. Not a problem, I can copy my chunks of records to a cursor and
then do a cursor at a time (rs.Delete(150) does not work either).
Anyway if you can see a more elegant solution I'll appreciate it.
Thanks for your help.
Here is my test code :
---
loWorkBook = loExcel.WorkBooks.Add
loWorkBook.ActiveSheet.name = 'PrimeraHoja'
loWorkBook.Worksheets(PrimeraHoja).Range('a2').CopyFromRecordSet(lors,20)
loWorkBook.WorkSheets.Add(, loWorkBook.ActiveSheet)
loWorkBook.ActiveSheet.Name = 'SegundaHoja'
loWorkBook.WorkSheets(SegundaHoja).Range('a2').CopyFromRecordSet(lors,20)
loWorkBook.Application.Visible = .T.
and the same first 20 records are copied in both pages.
So I do :
-
go top in MyCursor
lors = dbf2rs('MyCursor', 'Next 20')
loWorkBook = loExcel.WorkBooks.Add
loWorkBook.ActiveSheet.name = 'PrimeraHoja'
loWorkBook.Worksheets(PrimeraHoja).Range('a2').CopyFromRecordSet(lors,20)
go 21 in MyCursor
lors = dbf2rs('MyCursor', 'Next 20')
loWorkBook.WorkSheets.Add(, loWorkBook.ActiveSheet)
loWorkBook.ActiveSheet.Name = 'SegundaHoja'
loWorkBook.WorkSheets(SegundaHoja).Range('a2').CopyFromRecordSet(lors,20)
loWorkBook.Application.Visible = .T.
-
Ricardo,
This behavior is because the recordset is a client recordset, you
can't delete records, and everytime you copy records it will start from
the beginning.
With a server recordset you can use the method I suggested of copy
records by chunks, or delete them.
You can create a server recordset converting your cursor to a temporary
phisical table and next read it with ADO.
I thing the solution you found is the best, create a recordset with the
number of records you want to copy in every page.
I just have 2 observations:
If the recordset has the number of records you want, there's no need for
the sencond parameter in copyfromrecordset method.
The copy will be a bit faster if you set excel visible = .t. before copy
the recordset.
HTH
Saludos,
Jaime Vasquez
___
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
Re: Excel question
Andy Davies wrote: The easiest and fastews way, imo, is to read the data with ado, next use the copyfromrecordset method to copy to excel. Jaime, what advantages does ado have over e.g. 'copy to xxx type xl5' ? Andy, Advantages, imo: More control, with copy to... , you have to createa a file for any worksheet and later marge each file to a workbook, wich tends to more erros and larger programming. With ADO, you only have to get a referencie to the range where you want to copy the results, that can be any cell in any worksheet. Speed, no need to create phisical files, everything is done in memory. No need to deal with odd codepage conversions. ADO is the method Excel underestands better. Remember use the right tool for the job. :) HTH Saludos, Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Excel question
Paul Newton wrote: Dave IIRC the 65536 limit applies to worksheets not workbooks? So one should be able to use this method multiple times (with chunks of 65536 records) and put each chunk in a different worksheet in the same workbook Yes, the limit is for Excel, not ADO, although Excel 2007 has now a limit of 1048576 rows. HTH Saludos, Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Excel question
Ricardo Aráoz wrote:
Jaime Vasquez wrote:
Ricardo Aráoz wrote:
My reports generate Excel files, if the report is too long (more than
64000 lines) I use different pages in the same file. I have two ways to
do it, either I export up to say 15000 lines with a copy to command to a
temporary excel file, then open it (as an excel object), copy it's
contents to the clipboard (through excel command) and then copy the
clipboard to a new page in my multi page excel file. The pro of this
method is speed, the con is that if the customer uses the clipboard he
interferes with the report.
The other way is to insert the data cell by cell, but if the file is too
large it gets slow.
Does any of you know of some other way to optimize this?
Ricardo,
The easiest and fastews way, imo, is to read the data with ado, next use
the copyfromrecordset method to copy to excel.
It will be fast and you don't have to deal with the volatile clipboard.
*Create ado connection and recordset object
loConn = NewObject('ADODB.Connection')
loRs = NewObject('adodb.recordset')
loconn.ConnectionString = Provider=vfpoledb.1;Data
Source=C:\myvfpdbfolder\;Collating Sequence=general;
loconn.Open
lors.Open(select * from credidt.dbf, LoConn)
*excel object:
loExcel = NewObject(Excel.application)
loWorkBook = loexcel.Workbooks.Add
loWorkSheet = loexcel.ActiveWorkbook.Worksheets.Add
loExcel.visible = .T.
loworksheet.range(A1).CopyFromRecordset(lors)copy data to excel
Te agradezco mucho Jaime. The problem is I process my data in the local
app, I take data from two different engines and combine and process it
so I am actually dealing with a VFP cursor which I have to insert into a
workbook in chunks of 15 to 64000 records per worksheet. I can see that
if I do something like loworksheet.ActivePage.CopyFromRecordSet(lors)
I might get the file into a given page, but I would still have two
problems, first how to divide the file in chunks (doable), and second I
have my data in a cursor. Is there a way of converting a local VFP
cursor into a record set?
Thanks again
Yes, a VFP cursor can be converted to an ADO recordset, see:
http://support.microsoft.com/kb/192762
If you want to copy just a number of records, use the sencond parameter
of the CopyFromRecordSet method:
*get a reference to the range where you want the results:
oWorkSheet = oWorkBook.Worksheets(Page1)
oworksheet.Range(a1).CopyFromRecordset(loRs, 150) copy first 150
records
* next page
oWorkSheet = oWorkBook.Worksheets(Page2)
oworksheet.Range(a1).CopyFromRecordset(loRs, 150) copy next 150
records.
And so on...
HTH
Saludos,
Jaime Vasquez
Guatemala C.A.
___
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
Re: Excel question
Andy Davies wrote: Using Jaime's method doesn't involve any export/import of physical data files. Dave Crozier Dave, does rs.Open(select * from credidt.dbf,...) do less under the hood than use credidt.dbf then? .. and does anyone know if the excel .CopyFromRecordset method also truncates cells to 256 characters? No, it's limited to the limit of the cell, 32767 characters. Only 1024 display in cell, all 32767 display in the formula bar. HTH Saludos, Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Excel question
Ricardo Aráoz wrote:
My reports generate Excel files, if the report is too long (more than
64000 lines) I use different pages in the same file. I have two ways to
do it, either I export up to say 15000 lines with a copy to command to a
temporary excel file, then open it (as an excel object), copy it's
contents to the clipboard (through excel command) and then copy the
clipboard to a new page in my multi page excel file. The pro of this
method is speed, the con is that if the customer uses the clipboard he
interferes with the report.
The other way is to insert the data cell by cell, but if the file is too
large it gets slow.
Does any of you know of some other way to optimize this?
Ricardo,
The easiest and fastews way, imo, is to read the data with ado, next use
the copyfromrecordset method to copy to excel.
It will be fast and you don't have to deal with the volatile clipboard.
*Create ado connection and recordset object
loConn = NewObject('ADODB.Connection')
loRs = NewObject('adodb.recordset')
loconn.ConnectionString = Provider=vfpoledb.1;Data
Source=C:\myvfpdbfolder\;Collating Sequence=general;
loconn.Open
lors.Open(select * from credidt.dbf, LoConn)
*excel object:
loExcel = NewObject(Excel.application)
loWorkBook = loexcel.Workbooks.Add
loWorkSheet = loexcel.ActiveWorkbook.Worksheets.Add
loExcel.visible = .T.
loworksheet.range(A1).CopyFromRecordset(lors) copy data to excel
HTH
Saludos,
Jaime Vasquez
Guatemala C.A.
___
Post Messages to: ProFox@leafe.com
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
Re: Help - cannot create word.application
I'm running out of ideas here and the hotel is going live tomorrow. They use these reports to print welcome letters etc for the guests so it's quite important. I created a .VBS script that works the same way and this opens Word fine. Does anyone have any ideas? Could it be a group policy or other security setting??? Help! See if your code or config.fp has SET OLEOBJECT OFF, if yes then turn to on, or you will don't be able to create automation objects. HTH Saludos, Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Numbers to words
Bryant wrote: Does anyone know where I can find coding to convert numbers to words for printing checks? http://users.aol.com/FoxProResources/zipfiles/num2word.zip Other userfull procedures: http://users.aol.com/FoxProResources/fpfp.htm HTH Saludos Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Numbers to words
Bryant wrote: Does anyone know where I can find coding to convert numbers to words for printing checks? Forgot to add this: http://support.microsoft.com/kb/259663 HTH Saludos Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: SQL question: How to sum ???
Ailsom F. Heringer (Osklen) wrote: But CASE do not work with 0 . This is OK (0 is summed as it was 1): SELECT SUM(CASE DISCOUNT WHEN 0 THEN 1 ELSE 0 END) from table But this one doesn´t work: SELECT SUM(CASE DISCOUNT WHEN 0 THEN DISCOUNT ELSE 0 END) from table Do it this way: select sum(case when discount0 then discount else 0 end) from table. HTH Saludos, Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
[OT] Re: Dell to start selling PCs at WalMart
MB Software Solutions General Account wrote: I only buy clothes made by my fellow US brothers and sisters. (yeah rightgood luck finding them on the store shelves...you'll have to go naked instead!) :) Look very carefully for it, around here there are a lot of maquilas, factories that made clothes, they put the made in usa label, but all the work is done here. http://en.wikipedia.org/wiki/Maquiladora Saludos, Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: SQL: Count() of DISTINCT codes???
Vince Teachout writes: This is a little hard to explain, but I need to get a count of distinct codes within orders. For example: Order 1: code1 Code 1 code 1 code 2 code 3 Order 2: code 1 Code 3 I'd like to see: Code 1, 2 Code 2, 1 Code 3, 2 ie, distinct within orders, but then a count of codes for all orders. Anyway to do it in one shot? I'm pretty sure I can do it in 2 queries. Thanks. create cursor codes (order1 char(10), code char(10)) insert into codes values(Order 1, code 1) insert into codes values(Order 1, code 1) insert into codes values(Order 1, code 1) insert into codes values(Order 1, code 2) insert into codes values(Order 1, code 3) insert into codes values(Order 2, code 1) insert into codes values(Order 2, code 3) select code, count(code) from codes group by code HTH Jaime Vasquez Get your free 15 Mb POP3 email @alexandria.cc Click here - http://www.alexandria.cc/ ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: VB to VFP
Sytze, no need to convert, see: http://fox.wikis.com/wc.dll?Wiki~GUIDGenerationCode~VFP HTH Jaime Vasquez. Sytze de Boer wrote: Thank you Stephen Here it is Option Compare Database Option Explicit Private Type Guid Data1 As Long Data2 As Integer Data3 As Integer Data4(7) As Byte End Type Private Declare Function CoCreateGuid Lib OLE32.DLL (pGuid As Guid) As Long Public Function GetGUID() As String Dim udtGUID As Guid If (CoCreateGuid(udtGUID) = 0) Then GetGUID = _ String(8 - Len(Hex$(udtGUID.Data1)), 0) Hex$(udtGUID.Data1) _ String(4 - Len(Hex$(udtGUID.Data2)), 0) Hex$(udtGUID.Data2) _ String(4 - Len(Hex$(udtGUID.Data3)), 0) Hex$(udtGUID.Data3) _ IIf((udtGUID.Data4(0) H10), 0, ) Hex$(udtGUID.Data4(0)) _ IIf((udtGUID.Data4(1) H10), 0, ) Hex$(udtGUID.Data4(1)) _ IIf((udtGUID.Data4(2) H10), 0, ) Hex$(udtGUID.Data4(2)) _ IIf((udtGUID.Data4(3) H10), 0, ) Hex$(udtGUID.Data4(3)) _ IIf((udtGUID.Data4(4) H10), 0, ) Hex$(udtGUID.Data4(4)) _ IIf((udtGUID.Data4(5) H10), 0, ) Hex$(udtGUID.Data4(5)) _ IIf((udtGUID.Data4(6) H10), 0, ) Hex$(udtGUID.Data4(6)) _ IIf((udtGUID.Data4(7) H10), 0, ) Hex$(udtGUID.Data4(7)) End If End Function On 5/22/07, Stephen the Cook [EMAIL PROTECTED] wrote: Sytze de Boer wrote: Hi Folk I have about 15 lines in VB code that I need to convert into VFP(9) I tried a utility from Sweet Potato but it's not quite complete Can anyone help me ? (Gimme your email address and I can send the txt file) Just put the code out here. Stephen Russell DBA / .Net Developer Memphis TN 38115 901.246-0159 A good way to judge people is by observing how they treat those who can do them absolutely no good. ---Unknown http://spaces.msn.com/members/srussell/ No virus found in this outgoing message. Checked by AVG Free Edition. Version: 7.5.467 / Virus Database: 269.7.6/813 - Release Date: 5/20/2007 7:54 AM [excessive quoting removed by server] ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF]MSSQL Statement-- performance inconsistency?
Derek Kalweit wrote: boost. Having a minor issue I haven't looked into now with not being able to get the SP results through ADO, but I'm sure I'll be able to figure that one out... Just select at the end of the SP the data you want in the Recordset: create proc test_sp as select * from sysobjects - Now when you call that sp with ado the recordset will get all the data the last command is selecting: (Untested code) dim oconn as adodb.connection dim ors as adodb.recordset set oconn = new adodb.connection let oconn.connectionstring = your connection string oconn.open 'now call the sp and get the data into the recordset: set ors = oconn.execute(test_sp) do while not ors.eof debug.print ors.fields(0).value ors.movenext loop .. HTH Saludos Jaime Vasquez ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: My appalling ignorance - creating visual classes
Vince Teachout wrote: You're supposed to be able to create a visual container class that you then drop on the form and mess with. Problem is, I can't figure out how to create the visual class. Use PrgToVcx, a utility by Tom Rettig, is in the download section: ftp://leafe.com/PrgToVcx.zip HTH Jaime Vasquez. Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech Searchable Archive: http://leafe.com/archives/search/profox This message: http://leafe.com/archives/byMID/profox/[EMAIL PROTECTED] ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] - AVI/MPG to DVD
Kent Belan wrote: Hello, How can I copy an AVI or MPG file to a DVD and play it in a DVD player? Hopefully Free ... Thanks, See This: AVI to DVD with soft subtitle and menu with AVI2DVD http://forum.videohelp.com/viewtopic.php?t=298122 Or a lot of other tuturial: http://tinyurl.com/27muet HTH Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] Linux Advantages
Kevin Cully wrote: The Linux way: Open up command window. Type in su and press enter. Type in the password. Type in exactly this: ifconfig wlan0:0 192.168.1.99 netmask 255.255.255.0 up and press the enter key. Hi, I'm not advocating for windows but that can be done in Windows too: netsh interface ip set address name=Local Area Connection static 192.168.0.100 255.255.255.0 192.168.0.1 1 Or netsh interface ip set address Local Area Connection dhcp Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: newb questions about moving and renaming classes and forms
John Weller wrote: If it is in a project then remove it from the project without deleting it from the disc, then move or rename it and add it back to the project. Hi, No need to remove the file from the project, just select the form and hit F2 or Right click, and the project will rename the .scx and .sct files at the same time. The same method aplies to any file in the project. HTH Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] Mount an ISO CD image as a virtual CD/DVD drive?
Malcolm Greene wrote: Justin/Rick, The unsupported Microsoft tool is my favorite (Justin) Try Nero (Rick) Hi Malcom, If you choose Daemon Tools, look for the last clean version: 3.47 http://www.disc-tools.com/download/daemon347+md5sum HTH Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] Another app broken by IE7
Whil Hentzen (Pro*) wrote: I would love a screen shot of the 'never!' message. s Whil For your eyes pleasure: http://www.thedatafarm.com/blog/content/binary/wsftpnever.png Jaime Vasquez ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] Riping from DishNetWork
Hal Kaplan wrote: taking my 12-year-old VHS copy of The Movie No One Ever Heard Of and transferring it to a DVD for (my) posterity? I know this can go way OT but can one of you recommend a good web site to explain all this stuff? TIA ... I really appreciate it. Lots of info here: http://www.videohelp.com/guides HTH Jaime Vasquez ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Polling App
Sietse Wijnker wrote: I'm using filesystem events to react to a file create/change in similar cases. The only problem is binding to them, but I've written a .NET ActiveX thet does that for me. Use that inside a VFP form and I'm able to write VFP code to react to the events. The vfp9's solutions samples have a demo on how to do that with VFP code, look for it in New in VFP9 - Binding To Windows Message Events - File/Folder Shell Events. HTH Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Directory Size
Richard Kaye wrote: You could do something similar using ADIR() ADIR(aFiles,[*.*]) x=0 FOR y=1 TO ALEN(afiles,1) x=x+afiles[y,2] NEXT ?x Cool!, another option, Thank you. Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Directory Size
Gérard Lochon wrote: And if WSH isn't needed, is there another way ? (ie API from file information system ...) Gérard. Gérard, No, there's no API, the closest APIS are FindFirstFile and FindNextFile, and a loop through the folder, an example (sorry, VB code), is shown here: http://vbnet.mvps.org/index.html?code/fileapi/getdirectorysize.htm another alternative could be to use DOS: !Dir c:\windows c:\tmp\windir.txt nI = Alines(aFolderSize, Filetostr(c:\tmp\windir.txt)) ?Folder Size: + Substr(aFolderSize(nI-1),Rat( , aFolderSize(nI - 1), 2)) HTH Saludos Jaime Vasquez Guatemala, C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Directory Size
Kevin O'Shea wrote: Does anyone know of a quick way to get the size of a directory in FoxPro? I have come across a few ways to loop through the files in directories and subdirectories and tally up the size, but there must be a quick way to get the directory size?! oFs = createobject(Scripting.FileSystemObject) oDir = ofs.GetFolder(C:\windows) ?odir.Size HTH Jaime Vasquez. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Visual Studio 2005 Professional Edition with MSDN ProfessionalSubscription
mrgmhale wrote: I can also download previous versions of apps and O/S (not Office 2000 due to the Great Java Debacle). What was the debate with Java?, I'm still using Office 2000, without any problem. Thank You. Saludos, Jaime Vasquez Guatemala, C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] MS Office Outlook 2003 Email Sent by VFP Requires Approval ... Rats
George wrote: Using MS Office Outlook 2003 SP2 under XP Home. When VFP sends an email by Outlook, the system asks if it is OK to send. Hopefully there is a setting somewhere (maybe in Outlook, maybe XP) that will allow VFP to aromatically send email via Outlook without intervention. Anyone know where that setting is? If so, are you willing to share? There is a DLL you can use to avoid that security Feature http://www.dimastr.com/redemption/ The security is bypassed if you call the outlook dll's directelly, instead of the COM interfase, which is what this dll does. HTH Saludos, Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [OT] 1 in 5 children can't find the UK on a map.
Paul Hill wrote: http://video.google.com/videoplay?docid=-4064401188831660771 Wow! and they say that the Latin Americans are ignorant Jaime Vasquez Guatemala C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: Setting Default Printer
John Weller wrote: I've been using the code Dave gave me to print PDFs with some success. I am required to print a PDF to a different printer depending on the folder the pdf is in. I tried using SET PRINTER TO which, of course, didn't work as VFP is not doing the printing, Adobe is - so,. naturally, it printed to the default printer. Obviously I need to change the default printer depending on the folder. I'm sure there is an API call which will do it but I can't find it. Any suggestions gratefully received! Hi John, To change the default printer, try with: DECLARE INTEGER SetDefaultPrinter IN winspool.drv STRING SetDefaultPrinter(GetPrinter()) HTH Saludos, Jaime Vasquez Guatemala, C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] How to save GroupWise messages?
Gérard Lochon wrote: I have another question : My wife uses GroupWise at work. When i try to send her messages a little bit larger for OE and my provider bandwidth, they are splitted in several sub-messages. How can she combine/decode the received messages with GroupWise ? I didn't find anything about that in the groupwise documentation. Hi Gérard, it's an OE feature, someone enabled it because it's not active by default. In OE go to Tools - Accounts - Properties - Advanced, look for Break apart messages larger than, uncheck it, accept changes. HTH Saludos, Jaime Vasquez Guatemala C.A. Comodo AntiVirus http://www.comodo.com : Outbound message clean. Scan Date: Wed, 12 Jul 2006 7:54:27 AM Virus Definition Update: Tue, 11 Jul 2006 Copyright © 2006 COMODO ®. All rights reserved. --- StripMime Report -- processed MIME parts --- multipart/mixed text/plain (text body -- kept) text/plain (text body -- kept) --- ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: How To Know If an Internet Connection is Active
G Gambill wrote: How can I determine if an Internet Connection is active for PostCast Server. I thought about oIE = createobject( 'internetexplorer.application') oIE.Navigate2( http://www.yahoo.com; http://www.yahoo.com/) but can't figure out how to programatically test if that was successful. TIA George Hi George: Declare Integer InternetCheckConnection in Wininet.dll String Url, Long Flags, Long Reserved lnResult = InternetCheckConnection(http://leafe.com/,1,0) If lnResult != 0 Msg = Connected! Else Msg = Not connected! EndIf MessageBox(msg) HTH Jaime Vasquez Guatemala, C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: [NF] How to disable Windows Genuine Advantage from phoning the mothership.
Alan Bourke wrote: http://www.theregister.co.uk/2006/06/22/wga_remove/ Oh dear .. it appears the that the above article links to is down for maintenance. After a call from MS lawyers, I'll warrant. Fifteen ways to remove WGA http://tinyurl.com/nfrgw Jaime Vasquez ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
Re: tab order question
Ken McGinnis wrote: Yes, that is exactly what we need. I wonder how hard that would be to create? It's already in the product: Tools - Options - Forms - Tab Ordering, Choose 'By List' Accept changes, next: View - Tab Order. HTH Jaime Vasquez Guatemala, C.A. ___ Post Messages to: ProFox@leafe.com Subscription Maintenance: http://leafe.com/mailman/listinfo/profox OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech ** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.
