The LA Fox Developer Newsletter

April 1999

Hot Tip...

Visual lnterDev Web

Solutions Kit

Try a full version of Visual lnterDev 6.0 FREE for 90 days! The

Web Solutions Kit includes:

• Fully functional 90-day trial version of Visual lnterDev 6.0

• Dozens of technical articles, plus lots of in-depth samples and

tutorials

• Data Form Wizard for Visual lnterDev 6.0

• Microsoft Exchange Wizard

MSDN Sampler

And, get trial editions of essential add-ins from leading software

vendors, including:

• Chili!Soft Chili!ASP

• Elsinore Visual Intercept

• lntraActive ActiveForum

• Lomasoft Jiffy 3D

Luxent Visual WebGrid

Major Micro ASP-db

• NetStudio

• Peripherals Plus DTCs

Pinnacle Graphics Server

• Radview WebLoad 3.0

Software Artisans SA - FiIeUP 2.2.1

Software FX Chart FX

• Vertigo RuleZero

Wall Data Cyberprise Developer Studio

Free for the cost of shipping and handling. Offer good while

supplies last.

Already using Visual lnterDev 6.0? The Web Solutions Kit

contains dozens of technical articles, plus lots of in-depth

samples and tutorials to make your Visual lnterDev development

even more productive.

http://msdn.microsoft.com/vinterdev/wsk/default.asp

Job Titles (Con’t from page 6)

supplies. Can make copiers self destruct just by going to lunch

1. Contract Programmer. A Contract Programmer doesn’t have

to wear a nice suit. Or go to meetings. Or fill out time cards. Or

keep complaints to himself. He can make all the mistakes he

wants. He doesn’t get benefits. He doesn’t get training. He

doesn’t get respect. But after years in the trenches, the Con-

tract Programmer will finally achieve the ultimate goal in the

profession: He will be able to make impossible deadlines with

inadequate resources for desperate managers by putting in all

kinds of extra hours... and will be paid overtime for every one of

them.

Verifying One Instance (Cony from page 1)

declare integer CreateMutex in Win32API integer, short,string @

declare short closeHandle in W1n32API integer

declare integer GetLastError in WIn32API

local hMutex, iResult, bCanRun

#define ERROR_ALREADY_EXISTS 183

hMutex=CreateMutex(O,O,”MyApplicationMutexName”)

iResult=GetLastError()

do case

case iResult==O

bCanRun=.t.

case iResultERROR_ALREADY_EXISTS

=MessageBox(”Another instance of this application is already

running. Sorry!”,16,”Test”)

bCanRun=.f.

otherwise

bCanRun=.f.

MessageBox(”GetLastError() returned “ +

ltrim(str(iResult)),16,”Test”)

endcase

if bCanRun==.f.

=CloseHandle(hMutex)

return

endif

*

Do Main Application

=closeHandle(hMutex)

return

It Can’t Get Any Easier.......

We’ve come up with an easy way to submit articles to the LA

Fox Developer Newsletter one that has been overlooked for

a long time.

You can submit your articles to Barry Lee at CIS# 72723, 3422

on Compuserve, orbrlee@earthlink.net.

These articles can be on any FoxPro-related topic, whether it

concerns a new technique you’ve discovered, a certain develop-

ment technique you may favor over others, book reviews, etc.

Editor reserves the right to edit or offer constructive comments

concerning submitted articles and accepted articles shall be

considered to be in the public domain.

The quality of this newsletter really depends on the members

that support it, not just read it. And I think we’d all be surprised

by the useful information that could be circulated around the

membership.

So.

How ‘bout it?

(Ed. Note: George Sexton is an oveiworked slave for MH

Software. His most recent pursuit is the pursuit of nappiness.J

Join

LA Fox!

Page 8