webForumDet fria alternativet

Update

7 svar · 157 visningar · startad av fredrik99

fredrik99Medlem sedan maj 2000426 inlägg
#1

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'"
LarsGMedlem sedan dec. 200012 464 inlägg
#2
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]

jorgenMedlem sedan feb. 20012 412 inlägg
#3

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 ***

fredrik99Medlem sedan maj 2000426 inlägg
#4

Får det inte att funka :(
tabell: stat
fält: sida; bes

Jag använder 'Select Case'.

LarsGMedlem sedan dec. 200012 464 inlägg
#5

Jaha, kan du vara lite mer specifik? Får du något felmeddelande? Kan du visa hela koden?

------------------
essentitia preter non sans multiplicandum

fredrik99Medlem sedan maj 2000426 inlägg
#6

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]

LarsGMedlem sedan dec. 200012 464 inlägg
#7
<%
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

fredrik99Medlem sedan maj 2000426 inlägg
#8

Nu funkar det :)

Tack så mycket PatrikB och LarsG :e:e

127 ms totalt · 3 externa anrop · v20260731065814-full.3ab8d573
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
124 ms — hämta tråd, inlägg och bilagor (db)