Runtime et Access.Application

Bonjour à tous,
une petite question je vous prie..
J'ai développé une mdb avec table, requette, et module...

il y a une autre application en vba (macro)..dans laquelle j'utilise :

Code:

---

1 2 3 4 5 6 7

dim titi as new Access.Application titi.OpenCurrentDatabase.... et   titi.Run "NomProcédure d'un module"

---

Ma question est : les postes qui vont utiliser la macro vont elle planté si il n'y a pas Access installé dessus.?....
et si il y a le runtime installé..est ce que c'est sur que "Access.Application" fonctionnera.?
je dévelope mais je ne suis pas un pro du déploiement.

Merci par avance de vos réponses.

Je n'ai pas utilisé d'objet Access.Application mais j'ai déjà fait un OpenCurrentDatabase et un Run avec un runtime 2002 sans aucun problèmes.

Disposes-tu d'un poste pour faire des tests ? C'est la solution idéale dans ce genre de cas. Tu développes sur ton poste et tu testes ta future version de production sur un autre poste qui est aussi proche de ton parc standard que possible.

Sur ton poste tu peux simuler le mode runtime en lançant access par la ligne de commande. (Menu démarrer/Executer/Cmd)

MSAccess "C:\TonChemin\TaBD.mdb" /runtime.

Personnelement je n'ai pas rencontré de problèmes avec les RunTimes que j'ai utilisés (A97 et A2002).

Note : en runtime le menu contextuel d'Access (Clic-Droit) est désactivé.

A+

bjr

Le New Access.Application ne marchera pas

:fleche: http://www.developpez.net/forums/d11...untime-access/

Bonjour marot_r,Arkham46

Merci pour vos contris..merci pour le lien...

j'ai modifié le code afin d'utiliser la méthode indiquée a savoir : OpenRunTime
...toutefois j'ai le désagréable affichage de la base, puis sa fermeture....
vous auriez une proposition a me faire.?...car le visible=false ne semble pas avoir de résultat..( il s'agit d'un .mdb)..
Merci par avance de vos réponses.

Bonjour,

Le GetObject ne te permettra pas de rendre l'instance invisible.
N'aurais-tu pas moyen d'exécuter cette macro directement à partir de l'application depuis laquelle tu cherches l'appeler ?
Que fait cette macro en fait ?
Peux-tu nous donner un exemple de code ?

Argy

La macro est une surcouche en fait de l'application...une sorte d'api...
dans le code existant il y a des utilisation de

Code:

---

1 2 3 4

dim titi as new ADODB.connection Dim objRecordset As New ADODB.Recordset etc...

---

je ne voulais pas mettre toutes les requettes en dur dans le code..laisser ce traitement a access...mais bon..si il n'y a pas d'autre possible...

voici le code qui appelle la procédure dans le module de la base..cette procédure appelle elle des requettes dans la base.

Code:

---

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

Public Function gfstrReturnxxxxx(ByVal ixxx As String, ByVal inxxxx As String) As String On Error GoTo ErrorHandler   Dim result As String Call OpenRunTime'->copier- coller du code donné ds le lien 'MonAccess.Visible = False 'MonAccess.OpenCurrentDatabase cgstrDATA_BASE_PATHFD & cgstrDATABASE_NAME MonAccess.Run strSUB_Returnxxxxx, ixxxx, inxx, result   MonAccess.Quit acquitsaveNone Set MonAccess = Nothing   strReturnxxx = result   Exit Function   ErrorHandler: If Err.Number <> 0 Then Call gflngDisplayMessage(39, enxxrr, inxx) 'Erase ostrArrArray Err.Clear End If Resume Next   End Function

---

Suis je donc obligé d'utiliser ADODB..et l'objet command.?...

est ce que vous savez comment faire la meme chose mais sans utiliser new Access.application.?
j'essai de le faire avec ADODB.Command..mais j'ai des soucis...
vous savez commment faire pour appeller une sub qui est dans un module access et qui a 2 param byval et 1 byref.?
je ne parviens pas a trouver l'info

.....

BON, je ne suis pas parvenu a utiliser une sub d'un module .mdb. avec adodb...en revanche j'ai pu utiliser les requettes paramétrées de la base avec adodb...
je clos donc le post..merci pour vos contris.....