The LA Fox Developer Newsletter

ADO Jumpstart (Con? from page 5)

.Open

End With

With oRecordset .ActiveConnection = oConnection .Source = cShpStr .CursorType = adOpenStatic .LockType = adLockBatch0ptimistic .CursorLocation = adUseClient .Open

EndWith

Do While toRecordset.Eof

With oRecordset

?.Fields(”CustomerlD”).Value,.Fields(”CompanyName”).Value

EndWith o0rders = oRecordset.Fields(”orders”).Value Do While !o0rders.Eof oShippers = oOrders.Fields(”shippers”).Value oEmployee = oOrders.Fields(”employees”).Value oEmployeeTerritories =

oEmployee.Fields(”em ployeeterritories”).Value oTerritorles = oEmployeelerritories.Fields(”territories”).Value oRegion = oTerritories.Fields(”region”).Value ?“Order ID: “,oOrders.Fields(”orderid”).Value,; “Order Date: “,oOrders.Fields(”orderdate”).Value oOrderDetails = o0rders.Fields(”orderdetails”).Value ?“Territory: “,

oTerritories.Flelds(”territOrydescriptiofl”).ValUe,;

“Region: “,oRegion.Fields(”RegionDescription”).Vatue ?“Shipper: “,oShippers.Fields(”companyname”).Value oEmployee = oorders.Fields(”employees”).Val With oEmployee

?“Employee: “,.Fields(”employeeid”).Value,;

.Fields(”firstname”).Value “ .Fields(lastname”).Value End With

?“Order Details:

oProducts = oOrderDetails.Fields(”Products”).Value oCategories = oProducts.Fields(”categories”).Value oSuppliers = oProducts.Fields(”suppliers”).Value

?Chr(9),; oProducts.Fields(”productname”).Value,; oSuppllers.Fields(”companyname”).Value,; oCategories.Fields(”categoryname”).Value,; oOrderDetails.Fields(”Quantity”).Value,; oOrderDetails.Fields(”UnitPrice”).Value oOrderDetails.MoveNext

EndDo

oOrders.MoveNext

EndDo

oRecordset.MoveNext

EndDo

The output appears as follows:

(Con?, page 7)

Undocumented (Con? from page 5)

SET(”History”)

This returned the number of the history buffer in dBaselll+. Has

no meaning for VFP but it doesn’t generate an error, either.

SET(”IBLOCK”)

This always returns 0, regardless of the previous setting.

SET(”INSTRUCT”)

This function always returns “OFF”, even if you precede it with

SET INSTRUCT ON.

SET(”LDCHECK”)

This always returns OFF even if preceded with SET LOG HECK

ON...

SET(”MACDESKTOP”)

Returns the setting for SET MACDESKTOP, either ON or OFF.

To be continued..

Hot Tip...

Useful Info/Utilities

from Dan Covill

FoxPro Dcveloperc Network of San Diego

Tasklnfo

It you have wondered, as I otten have, where all that crap came from that’s always running in your system, I have a neat utility for you.

It’s called Tasklnfo, and it’s a shareware program by a Russian who writes video device drivers for a living. His name is Igor Arsenin and his Site is <http://www.iarsn.com>

It runs on Win 9x, NT and 2000, and combines the NT Task Manager output with Win 98 System Info and a lot more. The neatest thing to me is that, for every task and thread running, it gives you the path and name of who it belongs to! Absolutely amazing how many separate processes McAfee Anti-Virus thinks it needs. The real vs virtual memory info is invaluable by itself. This guy is good!

It’s a 350k download, and doesn’t even have to be installed, you can just run it. Like most shareware, 30 days free, then only $12 and well worth it. (If you try it, tell me what you think.)

Dependency Walker

Found this gem in one of the newsletters I get.

<>Dependency Walker v2.0b5 (409k] W9X/NT FREE

http://www.dependencywalker.com/

http://www.dependencywalker.com/depends20beta5_x86.zip

(Con?, page 9)

Page 6