Bonjour, J'ai un petit probleme. Voici l'extrait du code où je bloque :

<%@ Language="VbScript" %>
<!-- #INCLUDE File="../Fonctions/OpenConnexion_Admin.asp" -->
'cette fonction permet d'ouvrir la connexion avec la BDD

<%
Set RsMateriel = Server.createObject("ADODB.Recordset")
Dim Max

Set RsMateriel.Open = "SELECT MAX(Num_inventaire) as MonMax" & _
"FROM Materiel,Type_mat" & _
"WHERE Materiel.Id_type_mat = Type_mat.Id_type_mat" &_
"AND Type_mat.Id_type_mat = " & Request("Ztxttype_mat")
'là c'est ma requete. Elle recupere la valeur maximum du
'numero d'inventaire pour un type de materiel donné ( Ztxttype_mat ).


Max = RsMateriel("MonMax")
'là je souhaiterai enregistrer dans la variable Max le resultat de ma requete .... mais ça marche pas

%>

Alors si quelqu'un pouvait m'orienter. Merci

Hello!

essaye de mettre Max=RsMateriel.fields("MonMax")
ou encore Max=RsMateriel.fields(0)

voilou
SEREN


-------------------------------
Réponse au message :
-------------------------------

> Bonjour, J'ai un petit probleme. Voici l'extrait du code où je bloque :
>
> <%@ Language="VbScript" %>
> <!-- #INCLUDE File="../Fonctions/OpenConnexion_Admin.asp" -->
> 'cette fonction permet d'ouvrir la connexion avec la BDD
>
> <%
> Set RsMateriel = Server.createObject("ADODB.Recordset")
> Dim Max
>
> Set RsMateriel.Open = "SELECT MAX(Num_inventaire) as MonMax" & _
> "FROM Materiel,Type_mat" & _
> "WHERE Materiel.Id_type_mat = Type_mat.Id_type_mat" &_
> "AND Type_mat.Id_type_mat = " & Request("Ztxttype_mat")
> 'là c'est ma requete. Elle recupere la valeur maximum du
> 'numero d'inventaire pour un type de materiel donné ( Ztxttype_mat ).
>
>
> Max = RsMateriel("MonMax")
> 'là je souhaiterai enregistrer dans la variable Max le resultat de ma requete .... mais ça marche pas
>
> %>
>
> Alors si quelqu'un pouvait m'orienter. Merci

Merci Seren. Mais j'obtiens une erreur avec les deux solutions que tu m'as propose.
<%@ Language="VbScript" %>

<!-- #INCLUDE File="../Fonctions/OpenConnexion_Admin.asp" -->
' lance une fonction qui ouvre la connexion à la bdd
<%
Set RsMateriel = Server.createObject("ADODB.Recordset")
Dim Max

Set RsMateriel.open = "SELECT MAX(Num_inventaire) as MonMax " & _
"FROM Materiels,Type_mat " & _
"WHERE Materiels.Id_type_mat = Type_mat.Id_type_mat " &_
"AND Type_mat.Id_type_mat = " & Request("Ztxttype_mat")
' la requete SQL

Max = RsMateriel.fields("MonMax")
' là je souhaiterai récupérer la valeur de la requete dans la variable Max

%>
<!-- #INCLUDE File="../Fonctions/CloseConnexion.asp" -->
' cette fonction ferme la connexion avec la bdd

Il me met comme erreur :
Objet requis: 'RsMateriel.Open'

Misterdarth

ah mais fallait le dire tout de suite ;)

c'est ton instenciation du recordset qui est fausse il lui manque des paramètres! tu dois mettre quelle connection il doit utiliser. mais au plus simple fait comme sa:

set Recordset=NOM_CONNECTION.execute(req_sql)

voilà sa devrai jouer sa!!!

SEREN


-------------------------------
Réponse au message :
-------------------------------

> Merci Seren. Mais j'obtiens une erreur avec les deux solutions que tu m'as propose.
> <%@ Language="VbScript" %>
>
> <!-- #INCLUDE File="../Fonctions/OpenConnexion_Admin.asp" -->
> ' lance une fonction qui ouvre la connexion à la bdd
> <%
> Set RsMateriel = Server.createObject("ADODB.Recordset")
> Dim Max
>
> Set RsMateriel.open = "SELECT MAX(Num_inventaire) as MonMax " & _
> "FROM Materiels,Type_mat " & _
> "WHERE Materiels.Id_type_mat = Type_mat.Id_type_mat " &_
> "AND Type_mat.Id_type_mat = " & Request("Ztxttype_mat")
> ' la requete SQL
>
> Max = RsMateriel.fields("MonMax")
> ' là je souhaiterai récupérer la valeur de la requete dans la variable Max
>
> %>
> <!-- #INCLUDE File="../Fonctions/CloseConnexion.asp" -->
> ' cette fonction ferme la connexion avec la bdd
>
> Il me met comme erreur :
> Objet requis: 'RsMateriel.Open'
>
> Misterdarth

Super ça marche! Merci beaucoup Seren.

Misterdarth

-------------------------------
Réponse au message :
-------------------------------

> ah mais fallait le dire tout de suite ;)
>
> c'est ton instenciation du recordset qui est fausse il lui manque des paramètres! tu dois mettre quelle connection il doit utiliser. mais au plus simple fait comme sa:
>
> set Recordset=NOM_CONNECTION.execute(req_sql)
>
> voilà sa devrai jouer sa!!!
>
> SEREN

y a po de quoi a bientot bonne journée!

SEREN


-------------------------------
Réponse au message :
-------------------------------

> Super ça marche! Merci beaucoup Seren.
>
> Misterdarth
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> > ah mais fallait le dire tout de suite ;)
> >
> > c'est ton instenciation du recordset qui est fausse il lui manque des paramètres! tu dois mettre quelle connection il doit utiliser. mais au plus simple fait comme sa:
> >
> > set Recordset=NOM_CONNECTION.execute(req_sql)
> >
> > voilà sa devrai jouer sa!!!
> >
> > SEREN
>