<%
SQL="Select Visits From Antal Where Besok='1'"
Set rs=Conn.Execute(SQL)
rs2=(rs("Visits"))+1
SQL="Update Antal Set visits="& rs2 &" Where Besok='1'"
Conn.Execute(SQL)
rs.Close
%>
<%
If Request.kaka("besok")("visit")="yes" then
Else
response.kaka("besok").expires = dateadd("h", 12, now())
response.kaka("besok")("visit")="yes"
SQL="Update Antal Set Visits=Visits+1 where Besok=1"
Conn.Execute(SQL)
End IF
%>
den ska inte uppdatera db:n om man återkommer inom 12 timmar
stämmer det?
obs! kaka ska vara "cookies" om nån tänker använda koden!
det skulle jag också gjort men är som sagt lite trött idag :)
Körde fast här:
SQL4 = "Select Visits, Besok From Antal Where Besok=1"
Set rvs = conn.execute(SQL4)
%>
<p>Antal besökare: <b><%=rvs("Visits")%></b>
<%
rvs.Close
%>
Fel:
Microsoft OLE DB Provider for ODBC Drivers (0x80020009)
[Microsoft][ODBC Driver Manager] Drivrutinen kan inte hantera denna parameter.
/master.asp
hum, har inte läst igenom ordentligt *trött* men borde det inte vara
Response.cokies("namn").expires...
istället för .kaka("")....
(men med två o:n, webforum vill inte låta mig skriva det i koden?)
så har iaf jag gjort, och det funkar alldeles utmärkt..
uhm, klantigt av mig att inte läsa allt. aleborg hade ju redan skrivit det. men men...
och @nders med... *gnu* måste vara väldans trött nu..
------------------
There is always
something more to do
[Redigerat av john_samuel den 24 apr 2001]
[Redigerat av john_samuel den 24 apr 2001]
251 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849