Jag ser inget fel i SQL-frågan.
men den väljer ut alla poster, inkl. de som har under 0 i sitt f_Kundmaxvisningar
Hur vet du det?
6 svar · 275 visningar · startad av webzonen
Använder följande:
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "DRIVER={MySQL};DATABASE=webzonen;UID=Root;PWD=;SERVER=localhost;"
SQL = "select count(*) AS count_ads from Annonser WHERE f_kundbildstorlek='468x60' AND F_Kundmaxvisningar > 0 "
Set RS_count_ads = Connect.Execute(SQL)
får inget felmeddelande, men den väljer ut alla poster, inkl. de som har under 0 i sitt f_Kundmaxvisningar. Om ni undrar är detta till ett bannervisningssystem.
PS.1 jag kör MyODBC på Win 98, men får i bland felet
ODBC: To many COnnections, vad beror det på? jag stänger alltid db kopplingar
Jag ser inget fel i SQL-frågan.
men den väljer ut alla poster, inkl. de som har under 0 i sitt f_Kundmaxvisningar
Hur vet du det?
jo, för jag ser vilka banners den väljer ut, och jag har statistik, så på en del som har -2 visas ändå!
Den frågan du visade räknar ju bara antalet som uppfyller vissa villkor. Du måste ha någon annan kod som tar fram en banner.
jo, hela koden:
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "DRIVER={MySQL};DATABASE=webzonen;UID=Root;PWD=;SERVER=localhost;"
SQL = "select count(*) AS count_ads from Annonser WHERE f_kundbildstorlek='468x60' AND F_Kundmaxvisningar > 0 "
Set RS_count_ads = Connect.Execute(SQL)
Randomize
vilkenad = Int(rnd*RS_count_ads("count_ads")) +0
SQL = "Select * from Annonser"
Set RSdbase = Server.CreateObject("ADODB.Recordset")
RSdbase.open SQL, "DRIVER={MySQL};DATABASE=webzonen;UID=Root;PWD=;SERVER=localhost;"
RSdbase.Move vilkenad
Set Connect1 = Server.CreateObject("ADODB.Connection")
Connect1.Open "DRIVER={MySQL};DATABASE=webzonen;UID=Root;PWD=;SERVER=localhost;"
SQL1 = "UPDATE Annonser SET f_Kundvisningar=f_Kundvisningar+1,f_KundMaxVisningar=f_Kundmaxvisningar-1 WHERE ID="& RSdbase("id")
Connect1.Execute(SQL1)
Connect1.Close
Set Connect1=Nothing
%>
<a href="adsredir.asp?ID=<% =RSdbase("ID") %>&url=<%=RSdbase("f_KundAdress")%>" target="_blank">
<img border="1" WIDTH="468" height="60" src="<% =RSdbase("f_KundBild") %>" border="0" alt="<% =RSdbase("f_KundAltText") %>">
</a>
<%
RSdbase.close
set RSdbase=Nothing
Connect.close
Set Connect=nothing
%>
Nu förstår jag inte
Randomize
vilkenad = Int(rnd*RS_count_ads("count_ads")) +0
SQL = "Select * from Annonser"
Här har du inget villkor, så då får du med alla annonser.
Borde det inte vara
Randomize
vilkenad = Int(rnd*RS_count_ads("count_ads")) +0
SQL = "Select * from Annonser WHERE f_kundbildstorlek='468x60' AND F_Kundmaxvisningar > 0 "
oooh tack LarsG! faan vad illa av mig att inte set det där! :r :r