webForumDet fria alternativet

Antal nya gbn

ASP

23 svar · 846 visningar · startad av Jeppeweb

Medlem sedan sep. 2006462 inlägg
Frågan#1

Har kommit en bit påvägen men nu e jag fast.. jag skriver ut för att se antal nya gbn såhär;

 <%
set count13372 = connect.execute("SELECT Count(*) AS antalnyagb FROM gastbok WHERE last = '0' AND till = '"&Session("cmID")&"'")
response.write " "&count13372("antalnyagb")&""
count13372.close
%>

Den visar just nu hur många gbn användaren har i sin gästbok, och får man ett gb så plussas det på med 1.. hur gör jag nu för att få den att nollställa när ägaren till gbn spanar in sin gästbok ?

tacksam för svar!

Medlem sedan sep. 2006462 inlägg
#2

Har tänkt som så att om last sätts till en "1"a så ska det nollställas

Medlem sedan feb. 200112 078 inlägg
#3
connect.execute "UPDATE gastbok SET last = 0 WHERE till = '" & Session("cmID") & "'",,128
Medlem sedan sep. 2006462 inlägg
#4

Microsoft OLE DB Provider for ODBC Drivers error '80040e0c'

Command text was not set for the command object.

/gastbok.asp, line 9

<%

	if Request.QueryString("userid") = Session("cmid") OR Request.QueryString("userid") = "" then
		userid = CLng(Session("cmid"))
		SQL = "Select * from medlemmar where id = "&userid&""
connect.execute "UPDATE gastbok SET last = 0 WHERE till = '" & Session("cmID") & "'",,128
		Set Rs2 = Connect.execute(SQL)
		egen = 1
	else
		userid = CLng(Request.QueryString("userid"))
		SQL = "Select * from medlemmar where id = "&userid&""
		Set Rs2 = Connect.execute(SQL)
		egen = 0
	end if
%>
Medlem sedan sep. 2006462 inlägg
#5

rad 9 gästbok.asp fet text:

	<%
	if Request.QueryString("userid") <> "" AND Request.QueryString("userid") <> Session("cmid") then
		userid = CLng(Request.QueryString("userid"))
		SQL = "Select * from medlemmar where id = '"&userid&"'"
		Set Rs = Connect.execute(SQL)
	else
[B]	Set Rs = Connect.execute(SQL)[/B]
	end if
	%>
Medlem sedan juni 20019 519 inlägg
#6

har du någon SQL innan IF frågan? annars är SQL strängen tom...

Medlem sedan sep. 2006462 inlägg
#7
	<!-- #include file="databaskopplingar.asp" -->
	<%
			SQL = "Select * from medlemmar where id = '"&userid&"'"
	if Request.QueryString("userid") <> "" AND Request.QueryString("userid") <> Session("cmid") then
		userid = CLng(Request.QueryString("userid"))
		Set Rs = Connect.execute(SQL)
	else
	Set Rs = Connect.execute(SQL)
	end if
	%>

ADODB.Field error '80020009'

Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.

/gastbok.asp, line 0

Medlem sedan juli 20041 183 inlägg
#8

Innehåller userid något?

Är userid ett tal? I sådana fall ska det inte vara citatecken runt...

SQL = "Select * from medlemmar where id = " & userid
Medlem sedan sep. 2006462 inlägg
#9
	<!-- #include file="databaskopplingar.asp" -->
	<%
			SQL = "Select * from medlemmar where id = " & userid
	if Request.QueryString("userid") <> "" AND Request.QueryString("userid") <> Session("cmid") then
		userid = CLng(Request.QueryString("userid"))
		Set Rs = Connect.execute(SQL)
	else
	Set Rs = Connect.execute(SQL)
	end if
	%>

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[MySQL][ODBC 3.51 Driver][mysqld-5.0.21-log]You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '' at line 1

/gastbok.asp, line 9

hmm .. :/

Medlem sedan juni 20019 519 inlägg
#10

Du kan inte skriva
SQL = "Select * from medlemmar where id = " & userid
och sen att userID = CLng(Request.QueryString("userid")) i en IF fråga.. din SQL ser ut:
"Select * from medlemmar where id = "
det är därför du får fel..

	<!-- #include file="databaskopplingar.asp" -->
	<%
userid = "någon"
			SQL = "Select * from medlemmar where id = " & userid
	if Request.QueryString("userid") <> "" AND Request.QueryString("userid") <> Session("cmid") then
		userid = CLng(Request.QueryString("userid"))
                [b]SQL = "Select * from medlemmar where id = " & userid[/b]
		Set Rs = Connect.execute(SQL)
	else
	Set Rs = Connect.execute(SQL)
	end if
	%>

eller något..

annat råd att felsöka en SQL sträng är att skriv ut dom under tiden:
response.write SQL

Medlem sedan sep. 2006462 inlägg
#11

hur ska ajg skriva då?

Medlem sedan juni 20019 519 inlägg
#12

Visa hela gastbok.asp filen... för jag tror du gör det svårare än vad det är... som jag ser det så kommer det andra koder från gång till gång.

Medlem sedan sep. 2006462 inlägg
#13

eftersom inte all text fick plats här så slänger jag upp en .txt fil istället..

http://home.no/jeppeweb/hej/gastbok.txt

Medlem sedan juni 20019 519 inlägg
#14

på de första raderna:

	SQL = "UPDATE gastbok Set last='1' Where ID= " & Cint(Session("cmid"))
	SQL = "Select * from medlemmar where id = '"&Session("cmid")&"'"

är medlemmar.id en sträng?

Medlem sedan sep. 2006462 inlägg
#15

Yes

Medlem sedan juni 20019 519 inlägg
#16

På ena stället använder du ' i medlemmar.id .. men på några längre ner gör du det inte...
du får nog läsa alla rader en gång till...

Ett allmänt tips:
Mixar inte strängar och Tal när det gäller ID:n...

Medlem sedan sep. 2006462 inlägg
#17

Det där hjälper/te inte mitt problem.. hur skriver jag för att få "last" att sättas till 0 när det är ens egen gästbok man går in på ?

Medlem sedan juni 20019 519 inlägg
#18

med en update där gästboksägare id = din session...

Medlem sedan sep. 2006462 inlägg
#19

och hur skulle en sådan se ut?

Medlem sedan juni 20019 519 inlägg
#20
SQL = "UPDATE gastbok Set last='0' Where till= " & Cint(Session("cmid"))
connect.execute(sql,,128)

eller

SQL = "UPDATE gastbok Set last='0' Where till= '" & Cint(Session("cmid")) &"'"
connect.execute(sql,,128)

beroende om "till" i gastbok är en sträng eller tal...

144 ms totalt · 2 externa anrop · v20260731065814-full.2ae45ccc
0 ms — hämta statistik (cache)
141 ms — hämta tråd, inlägg och bilagor (db)