![Citation](https://forum.developpez.be/images/misc/quote_icon.png)
Envoyé par
maxos75
ben non finalement même avec le recordset ça passe pas ...
set listing_sites=Server.CreateObject("ADODB.Recordset")
sql_sites= "SELECT count(NOM) AS nb_sites FROM SITES"
listing_sites.Open sql_sites, connexion
If listing_sites("nb_sites")<=18 THEN
response.Write(listing_sites)
response.Write(" Moins de 18 sites recencés")
else
response.Write(listing_sites)
response.Write(" Plus de 18 sites recencés")
End IF
Il me semble que tu fais une erreur là:
listing_sites.Open sql_sites, connexion
Pour ouvrir un recordset comme ceci il ne faut pas mettre la connexion, mais le provider.
Pour info ceci marche très bien chez moi:
1 2 3 4 5 6 7 8 9 10
| sql_sites="SELECT count(CLient_ID) as nb FROM Client"
Set listing_sites = objConn.Execute(sql_sites)
If listing_sites(0) <= 18 THEN
response.Write(listing_sites(0))
response.Write("Moins de 18 sites recencés")
else
response.Write(listing_sites(0) )
response.Write("Plus de 18 sites recencés")
End IF
Set listing_sites=Nothing |
Ultra light :
1 2 3
| Set listing_sites = objConn.Execute("SELECT count(CLient_ID) as nb FROM Client")
response.Write(listing_sites("nb") & " recencés<br>")
Set listing_sites = Nothing |
Ou encore, sachant que:
1 2 3 4
| set objConn = server.createobject("ADODB.Connection")
objConn.Open strProvider
set cm = Server.CreateObject("ADODB.Command")
cm.ActiveConnection = objConn |
1 2 3
| cm.Commandtext = "SELECT count(CLient_ID) as nb FROM Client"
listing_sites = cm.Execute
response.Write(listing_sites("nb") & " recencés<br>") |
Partager