Jag håller på att göra statisk över varje sida. Får bara inte rätt på den. Det skall uppdatera varje gång som man klickar på en länken med ?stat=epost.
SQL = "UPDATE stat SET bes = (bes + 1) WHERE sida = 'epost'"
7 svar · 157 visningar · startad av fredrik99
Jag håller på att göra statisk över varje sida. Får bara inte rätt på den. Det skall uppdatera varje gång som man klickar på en länken med ?stat=epost.
SQL = "UPDATE stat SET bes = (bes + 1) WHERE sida = 'epost'"
epost = request.querystring("stat")
SQL = "UPDATE stat SET bes = bes + 1 WHERE sida = '" & epost & "'"
Något sådant?
------------------
essentitia preter non sans multiplicandum
[Redigerat av LarsG den 20 maj 2001]
Något i stil med detta kanske?
Du får själv definera vad den ska hämta i Dbn.
mvh Jörgen
If Request.Querystring("stat") = "epost" Then
Set Connect = Server.CreateObject("ADODB.Connection")Connect.Open "DSN="
Set RecSet = Server.CreateObject("ADODB.Recordset")
Set rs = Connect.execute("select * from Dbn ORDER by Id "
bes = rs("stat")
rs.close
bes = bes + 1
Connect.execute("update Dbn set stat=" & bes & " "
Connect.Close
Set RecSet=Nothing
Set rs=Nothing
Set Connect=Nothing
End If
------------------
*** Det brukar lösa sig sade hon som satt och sket i vasken ***
Jaha, kan du vara lite mer specifik? Får du något felmeddelande? Kan du visa hela koden?
------------------
essentitia preter non sans multiplicandum
Jag kommer till den sidan som ligger i Redirect, men inget kommer till i databasen. Och det är inget fel på databaskopplingen.
<%
Action = Request.QueryString("stat")
Select Case Action
Case "epost"
SQL = "UPDATE stat SET bes = (bes + 1) WHERE sida = 'epost'"
Response.Redirect "left.asp"
End Select
%>
[Redigerat av fredrik99 den 20 maj 2001]
<%
Action = Request.QueryString("stat")
Select Case Action
Case "epost"
SQL = "UPDATE stat SET bes = (bes + 1) WHERE sida = 'epost'"
[b]conn.execute sql
conn.close
Response.Redirect "left.asp"
[/b]
End Select
%>
Nu vet jag inte vad du har använt för namn på ditt connectionobject, så du får anpassa det.
------------------
essentitia preter non sans multiplicandum