Visual Foxpro and Excel

*Open Desired Excel File
mfile=getfile('xls','Open Excel','Browse',1)

*Create Object for Excel Application
oleExcel = CREATEOBJECT("Excel.Application")

*Open the Excel File
oleExcel.Workbooks.Open(mFILE)

*Choose Sheet to use (eg. Sheet1, Sheet2, etc...)
oleSheet = oleExcel.Sheets(1)

*Save Value from Excel to a Variable excelvalue
excelvalue=oleSheet.Cells(1,1).value

*Save Value to Excel
oleSheet.Cells(1,1).value="Hello World"

*Show or Hide Excel File
oleExcel.Visible = .t.

*Quit the Opened Excel File
oleExcel.quit

lenovo monitor- "menu is locked"

to remove menu lock on the lenovo monitor press <--'(enter button) button for 10 sec

Guitar - Pentatonic Scale

Pentatonic Scale is I think the fundamental of all scales.. If you use this scale wisely I'm Sure you'll be a rockstar. So here it is..

This Scale is taken from the Family of G (G,Bm,C,D,Em)

Try this one ...


e -----------------------------------------------------------------
B ---10/12-10-8-10-8----8-10-8~~------------------------------
G ----------------------9--------------repeat as many------------
D --------------------------------------times as you can----------
A -----------------------------------------------------------------
E -----------------------------------------------------------------

..ENJOY!!! Try other combinations

How to use Serial Port (mscomm32.ocx)

Use mscomm32.ocx. (Com1 - Com16 only)

1. Register to your library
-> locate at windows\system32
-> if not available download it from the web then copy to windows\system32
-> type at run - regsvr32 c:\windows\system32\mscomm32.dll

2. By using vb6
-> Right Click Tools -> Add Component
-> Scroll Down and Check Microsoft Communication Control
-> A Telephone image will be added on your tools

3. By using foxpro
-> At Tools Choose OLE -> Add object -> Form will pop-up
-> Choose Insert Control -> Scroll Down -> Add Microsoft Communication Control

4. Initialize Mscomm32
-> right click OLE -> Properties -> Enter Commport, Settings, Etc..

5. Send data
-> if mscomm.portopen=false then
-> mscomm.portopen=true
-> end if
-> mscomm.output="Message"
-> mscomm.portopen=false

6. Recieve Data
-> if mscomm.portopen=false then
-> mscomm.portopen=true
-> end if
-> message=mscomm.input
-> mscomm.portopen=false

Useful Visual Foxpro Codes - Data Convertion

1. Copy Foxpro Table to Excel File
sele table1
copy to excelname type xls
-> the code will create excelname.xls file wich contains the data of table1

2. Copy Foxpro Table to Textfile (comma delimited)-CSV
sele table1
copy to text.txt delimited
-> the code will create text.txt file wich contains the data of table1

3. Copy Foxpro Table to Textfile (delimited with any character)
sele table1
copy to text.txt delimited with character "|"
-> the code will create text.txt file wich contains the data of table1

4. Append data t0 Foxpro Table from Excel File
sele table1
append from excelname.xls type xls
-> the code will append excelname.xls data to table1
-> note excel file must be plain data - no attachments (pictures,drawings,etc..)

5. Append data t0 Foxpro Table from Textfile (comma delimited)-CSV
sele table1
append from text.txt delimited
-> the code will append text.txt file data to table1

6. Append data t0 Foxpro Table from Textfile (delimited with any character)
sele table1
append from text.txt delimited with caracter "|"
-> the code will append text.txt file data to table1

FoxPro Programmer

Im a Visual FoxPro Programmer.
You can ansk any questions about foxpro programming.
marklabz30@yahoo.com

Add Avatar on Yahoo

- Visit http://avatars.yahoo.com//
- Log-in Your Account
- Then Your Ready to Add Your Avatar

Media Player History

- Click on Tools
- Click on Option
- Click on Privacy
- Check/Uncheck History Box
(see picture)