Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Dll not return a cursor
Message
From
23/03/2010 15:41:36
 
 
To
23/03/2010 14:51:07
General information
Forum:
Visual FoxPro
Category:
Object Oriented Programming
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
MS SQL Server
Application:
Desktop
Miscellaneous
Thread ID:
01456719
Message ID:
01456730
Views:
44
You can't return a cursor from a dll. You'll need to return the recordset or xml, then convert it to a cursor afterwards.

>hi
>I have a dll a cap of data and want that this one returns a cursor and not recordset but not because he does not return the alone cursor to me he returns to me .t.
>
>here code.
>
>
>if type("nalias")='C'
> ocursor=this.rstodbf(nalias,lors)
> return ocursor
>endif
>
>procedure rstodbf(calias,lorst)
> if used(calias)
> select (calias)
> use
> endif
> talias="CA"+sys(2015)
> try
> ocursoradapter = createobject("CursorAdapter")
> ocursoradapter.alias=talias
> ocursoradapter.allowdelete = .t.
> ocursoradapter.allowinsert = .t.
> ocursoradapter.allowupdate = .t.
> ocursoradapter.datasourcetype="ADO"
> ocursoradapter.cursorfill(,,,lorst)
> ocursoradapter.cursordetach()
> catch to loerror
> messagebox(loerror.message)
> endtry
> select * from (talias) into cursor (calias) readwrite
> select (talias)
> use
> return (calias)
> endpro
Craig Berntson
MCSD, Microsoft .Net MVP, Grape City Community Influencer
Previous
Reply
Map
View

Click here to load this message in the networking platform