webForumDet fria alternativet

Blockerings funktion funka konstigt....

ASP

7 svar · 203 visningar · startad av DiDjo

Medlem sedan nov. 2002544 inlägg
Frågan#1

Hej! Om någon medlem har varit olydig vill jag kunna blockera den från t.ex att skriva i Gästböcker! Den fungerar bara i sin egna gb! Där kommer det upp " Du har blivit blockerad i Gästböckerna....."
Men sen när man går in i någon annans Gb så kommer rutan fram! Kan det ha att göra med if-satsen?
så här ser den ut

            <%if rs1("blockadgb") = false then%>
    <form name="form" method="post" action="gastbok.asp?action=spara&id=<%=request.querystring("id")%>"  onSubmit="submitonce(this)">
              <div align="right"> 
                <font face="Verdana, Arial, Helvetica, sans-serif"> 
                <textarea name="requiredinlagg" rows="4" cols="20"></textarea><font size="2">
                <br>
                </font>
                <input type="submit" name="Submit" value="Skicka"><font size="2">
                </font></font>
              </div>
            </form>
     <%else%>           <font face="Verdana, Arial, Helvetica, sans-serif" size="2">Du är blockerad från att skriva i Gästböckerna!<%end if%></td>
Medlem sedan mars 20015 287 inlägg
#2

Hur plockar du fram rs1("blockadgb") ?

Medlem sedan nov. 2002544 inlägg
#3
Set rs1 = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM anv where id='"&request.querystring("id")&"'"
rs1.Open Addera, Connect, 3, 3

Connect å sånt skräp e högre upp

Medlem sedan dec. 20003 563 inlägg
#4

Hmm. Plockar du inte ut id-numret för dens gästbok som du är inne på?
Är du inne på någons gästbok där denne e blockad så blir du blockad?

Medlem sedan nov. 2002544 inlägg
#5

ja det blir man.......

Medlem sedan mars 20015 287 inlägg
#6

Mao måste du antingen plocka ut besökarens rs1("blockadgb") också alt. om du redan gjort det ha det med dig i en cookie/session eller liknande.

Medlem sedan nov. 2002544 inlägg
#7

Nu fungerar det! Tog den här koden:

Set rs6 = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT * FROM anv where id='"&session("id")&"'"
rs6.Open Addera, Connect, 3, 3
Medlem sedan mars 20015 287 inlägg
#8

Kanske ska du köra:

Set rs6 = Server.CreateObject("ADODB.Recordset")
Addera = "SELECT blockadgb FROM anv where id='"&session("id")&"'"
rs6.Open Addera, Connect, 3, 3

om det bara är det du ska ta fram, för att skona servern något.

PS: Gott nytt år på dig själv. ;)

264 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
132 ms — deklarationer (db)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)
130 ms — ändringar (db)