Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
1526 error with a remote view
Message
De
16/08/2004 11:01:52
Jason Mesches
Ocean Systems Engineering Corporation
Carlsbad, Californie, États-Unis
 
 
À
15/08/2004 18:36:14
Information générale
Forum:
Visual FoxPro
Catégorie:
The Mere Mortals Framework
Divers
Thread ID:
00933435
Message ID:
00933548
Vues:
19
Hello Godfrey,

Typically, this is a result of "something" closing the SQL connection. MM uses a connection manager to prevent such occurrences, but it is possible for it to become "confused" and disconnect a connection before all views using that connection are closed.

What I would suggest is that you add a SET STEP ON in your BizObj.Save() and check the value of CURSORGETPROP('ConnectHandle', 'YourAliasName'). If it returns a zero, the connection has closed. Otherwise, it's still valid. Then, step through the code until that value changes until you come across the code that disconnects.

Hope that helps,
---J

>Hello out there:
>
>Let me describe what leads up to the "1526 connectivity error" I am getting.
>
>I have a project based on VFP 7 and MM7
>I have some tables set up from scratch in SQL2000, populated from Excel using DTS.
>I have created and tested a connection to the SQL db.
>I have created a remote view, rv_address_edt, based on this connection and through this view I am able to see and (manually) edit the SQL data. This is the initially selected alias in the DE. This DAO is set to remote
>In addition I have two list views that are used to populate a couple of combo boxes. One is local and one remote.
>The preference set on the app is for local data (so that the logon screen will appear).
>I have constructed a simple maintenance form based on cBizObjForm - nothing flash, smart or liable to incite a riot.
>
>If I edit and then try and save the data, I can trace the save right up to the point where, in ov_address_edt.save, it disappears into the tableupdate() function below (parameters .F., .F.)
>
>loSelect = This.SelectAlias()
>IF CURSORGETPROP("BUFFERING") != DB_BUFOFF
>	IF TABLEUPDATE(tlAllRows, tlForce)
>		lnRetVal = FILE_OK
>	ELSE
>		*--------------------------------------------
>		*-- Return error number of what went wrong
>		*--------------------------------------------	
>		=AERROR(laError)
>		lnRetVal = laError[AERROR_ERROR]
>	ENDIF
>ENDIF
>RETURN lnRetVal
>
>It comes back straightaway with the returned error 1526 "connectivity_error"
>The changesare rolled back and the "error" is attended to.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform