access form et procédure stoquée sqlserver paramétrée comme recordset source

BOnjour j'essaie d'appeler une procédure stoquée sur un server sql server pour affecter le recordset à un formulaire mais cela ne marche pas
j'appelle le code sur l'évenement "FORMLOAD"

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

'open connection CONNECT = "Driver={ODBC Driver 13 for SQL Server};Server=tcp:xxx.database.windows.net,1433;Database=xxx;Uid=xxx;Pwd=xxx;Encrypt=yes;TrustServerCertificate=no;Connection Timeout=30;" oCx.ConnectionString = CONNECT oCx.Open   Set oCmd = New ADODB.Command With oCmd .ActiveConnection = oCx .CommandType = adCmdStoredProc .CommandText = "dbo.PS_TIERS_DOSSIER" .Parameters("@DS_NID").Value = var_session_dossier Set oRst = oCmd.Execute If oRst.EOF = False Then Do While Not orst.EOF Debug.Print oRst![TI_NID] oRst.MoveNext Loop end if End With set Forms("FL_AF_TI001").Form.Recordset = oRst

---

je récupére bien le bon d'enregistrement (ok en débug.print) et donc la requête fonctionne mais l'affection au formulaire plante
"l'objet entre n'est une propriété recordset valide"
Et là je seche, et j'en appelle à votre expertise
Merci d'avance

Bonjour,

Je ne pense pas qu'une commande soit l'objet idoine...
Voici la syntaxe que j'utilise. Le résultat est en lecture seule, si qqn a mieux je suis preneur ;)

Code:

---

1 2 3 4 5 6 7

Dim reca As ADODB.Recordset, Sr as string   Sr = "SELECT ..." Set reca = New ADODB.Recordset reca.Open Sr, cnx, adOpenStatic, adLockReadOnly 'coté serveur, lecture seule Set Me.Recordset = reca 'ATTENTION cette méthode ne se met pas à jour par requery :( Set reca = Nothing

---

NB : ma connexion (cnx) est ouverte une fois pour toute en début de programme

Bonjour,

Tu es visiblement en ADO.
Nous avons les conditions préalables remplies ? (aide MSDN) :

Citation:

---

A form must meet two general requirements for the form to be updatable when it is bound to an ADO recordset. The general requirements are:
The underlying ADO recordset must be updatable via ADO.
The recordset must contain one or more fields that are uniquely indexed, such as a table's primary key.

---

Alors, sur l'evet Form_open, ça doit marcher :

Code:

---

1 2 3 4 5 6

... 'Set the form's Recordset property to the ADO recordset Set Me.Recordset = rs Set rs = Nothing Set cn = Nothing

---

CDLT

bonsoir et merci pour vos contributions
cela fonctionne en ajoutant
oCx.CursorLocation = adUseClient
avant l'ouverture du recordset
j'ai pu affecter le re corset au formulaire

par contre les tris et filtres ne fonctionnent plus dans le form
"Impossible d initialiser le fournisseur de données"

et lecture seule
J'ai essayé en ajoutant cela mais pas mieux:
oCx.Mode = adModeReadWrite

si quelqu 'un a une idée?

Citation:

---

Envoyé par MisterBI

par contre les tris et filtres ne fonctionnent plus dans le form

---

Pour cela je modifie le contenu de Sr et régénère le recordsource. En pratique l'affectation du recordset est dans une procédure paramétrée, appelée à l'ouverture et chaque fois que nécessaire.

Citation:

---

Envoyé par MisterBI

et lecture seule

---

J'ai essayé les différents paramétrages du curseur sans succès. L'écriture me semble compromise si la source est une procédure et non une simple table, par contre cela marche bien avec des tables liées.