Bonjour, jai le code suivant :
<%
Set oWebService = GetObject("IIS://LocalHost/W3svc")
oWebService.Put "AspAllowOutOfProcComponents", True
oWebService.SetInfo
' Path de la base de donnees
DbPath = "./Data/adhérents.mdb"
Set objAccess = Server.CreateObject("Access.Application")
objAccess.Visible = False
objAccess.OpenCurrentDatabase Server.MapPath(DbPath)
Set objDB = objAccess.CurrentDb()
'objAccess.Run("NouveauContact()")
objAccess.DoCmd.RunMacro Mettre_a_jour
set objDB = nothing
objAccess.Quit acQuitSaveNone
Set objAccess = Nothing
Response.Write "La macro a ete executee"
%>
Et l'erreur suivante :
Erreur d'exécution Microsoft VBScript erreur '800a01b0'
Nom du fichier ou de la classe introuvable lors de l'opération Automation: 'GetObject'
/webpub/Mailing List/envoie.asp, ligne 28
L'erreur est donc à GetObject.
Je connais la cause du problème (le GetObject est sur IIS or je travaille sous PWS avec Win98) mais je ne sais pas la solution.
Si quequ'un peut m'aider.
Merci beaucoup.