Know if a records locked

[Barney]

on 1/9/04 9:31 AM, Ruslan Zasukhin at sunshine at public.kherson.ua wrote:

> On 9/1/04 12:26 AM, "Barney" <barney at custombased.com> wrote:
> 
>> Hi Ruslan,
>> 
>> No I'm not getting anything ? Here is my code :
>> 
>> Dim I as Integer
>> Dim a,b,c as integer
>> Dim L as ListBox
>> 
>> //Cur = Nil
>> 
>> L = ListBox1
>> L.DeleteAllRows
>> 
>> a = val(EditField2.text)
>> b = val(EditField3.text)
>> c = val(EditField4.text)
>> 
>> Cur = App.DB.SQLSelect(EditField1.text,a,b,c)   //Neither cursor works
>              ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
>               what is this ???
> 

1.) My Database object is a property of my App class.

2.) Editfield1 contains my SQL query.

3.) Editfield 2, 3, 4 contain the three parameters required by plugin.

I am still playing around trying to see exactly what happens with
all the different scenarios. I still am having problems with my project.

I have cursors which are not locked but which still won't allow me to update
records within ? 

I am attempting to reproduce it all in a smaller very simple project to see
how it all works.

for example ...

1.) Right now I call a single record using SQL and LOCK it using 'Server',
'ReadWrite', 'Random'.

2.) This record should now be locked.

3.) Call it again using 'Server', 'NoLock', 'Random'.

And I have access to the record ?



If I repeat the process like this ...


1.)  Call a single record using SQL and LOCK it using 'Server', 'ReadWrite',
'Random'.

2.) This record should now be locked.

3.) Call it again using 'Server', 'READWRITE', 'Random'.

And its locked as it should be. Why then in the first example will I have
access to it ?

I can send this to you ...

Thanks

Barney















Barney