bonjour,
j'ai cree une procedure stockée avec parametre dans access et je dois l'appeler dans une page asp.
merci d'avance
voici l'erreur qu'on me retourne ainsi que le code
ADODB.Parameters erreur '800a0e7c'
L'application a défini un objet Parameter de manière incorrecte
voici la ligne qu'il accepte pas:
Comm.Parameters.Append parametre1
<% @Language=VBScript%>
<% Option Explicit%>
<%Response.Buffer = True%>
<!--#include file="constante.asp"-->
<HTML>
<HEAD>
<TITLE>Validation</TITLE>
</HEAD>
<BODY>
<%
'-- Ouverture Connexion
Dim objConn, connstring
Set objConn = Server.CreateObject("ADODB.Connection")
connstring="DRIVER={Microsoft Access Driver (*.mdb)};" & _
"DBQ=" & Server.MapPath(".") & "/../base.mdb"
objConn.Open connstring
%>
<%
Dim objRS, leSQL, strpseudo, strpasse, Comm, parametre1, parametre2
strpseudo = Request.Form("pseudo")
strpasse = Request.Form("motpasse")
'creation de la commande
Set Comm = Server.CreateObject("ADODB.Command")
'execution de l'instruction sql
set objRS = Server.CreateObject("ADODB.Recordset")
Comm.ActiveConnection = objConn
Comm.CommandText = "psverifmotdepasse"
Set parametre1 = Comm.CreateParameter("parampasse", adWChar, adParamInput, , strpasse)
Comm.Parameters.Append parametre1
'creation du parametre1
'set parametre1 = Server.CreateObject("ADODB.Parameter")
'parametre1.Name = "parampasse"
'parametre1.Type = adWChar
'parametre1.Direction = adParamInput
'parametre1.Value = strpasse
'Comm.Parameters.Append parametre1
'creation du parametre2
set parametre2 = Server.CreateObject("ADODB.Parameter")
parametre2.Name = "parampseudo"
parametre2.Type = adWchar
parametre2.Direction = adParamInput
parametre2.Value = strpseudo
Comm.Parameters.Append parametre2
Set objRS = Comm.Execute