access/asp id=2 istedet for stem(9)

Prøv at smide stem.inc koden også

Og har jeg forstået det korrekt?

Du vil ha' et link der peger på 1 bestemt afstemning?

noget i stil med ..../index.asp?afstemning=1
så den viser resultatet af afstemning 1

Ja! det er rigtigt.. stem.inc koden kan du finde på
www.emil.vonbuchwald.dk/stem/stem.inc

Du kunne jo gøre noget alá

Lav en ny fil f.eks. resultat.asp
under dine afstemninger smider du et link til resultat.asp
med en parameter på
resultat.asp?voteid=<%=ID%>
i resultat.asp sætter du noget kode ind som denne:
<%
voteid = request.querystring("voteid")

Dernæst laver du en forespørgsel til databasen hvor den så henter afstemningsresultatet der passer med ID

noget i stil med:

Sql = "Select count(*) as Found from T_VoteResult where VoteId = " & voteid

Sidste sætning skal selvfølgelig være:
Sql = "Select * from T_VoteResult where VoteId = " & voteid

Forstår jeg ikke helt...
altså resultat.asp
skal der være
<%
voteid = request.querystring("voteid")
%>
Forstår ikke noget af det andet ;)

har du icq ?

jeg kan ikke særlig godt asp.. :(

mit icq nr er 157831584

Jeg har icq 44661199

Så hvis nu du lige loggede på din icq så kan vi tage en snak der. :-)

Jeg vil nu altså alligevel smide kode for svaret her

jeg har været på Net-Café såå... skulle lige prøve 1.5 ;)

Jeg har egentlig ikke ændret så meget i din kode:

I din stem.inc fil har jeg ændret linien
      session("retur") = Request.ServerVariables("SCRIPT_NAME")
til
      session("retur") = Request.ServerVariables("URL") & "?vote="& id


Og din index.asp hvor jeg har lagt listen over afstemninger ind ser nu således ud:

<html>
<head>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
<title>Afstemnig</title>
</head>
<body>

<!-- #include file="code_lib.asp" -->


 

<CENTER>
<%

session("retur") = Request.ServerVariables("URL")

stemt = Request.QueryString("vote")

If stemt  = "" then
stemt = 1

end if

%>



<% Stem(stemt) %>

<%

If session("retur") > "" then
%>
Andre afstemninger:

<%

set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("/fpdb/stem.mdb"))

set rsVote = Server.CreateObject("ADODB.recordset")
rsvote.Open "SELECT * FROM T_Vote", conn, 3, 1, 1

response.write"<table>"

rsVote.Movefirst
do while not rsVote.EOF

response.write"<tr><td><a href=index.asp?vote="& rsVote("id") &">--" & rsVote("Beskrivelse") &"--</a></td></tr>"

rsVote.Movenext

loop

rsVote.close
set rsVote = nothing
conn.close
set conn = nothing


response.write"</table>"


end if
%>

<BR>
</CENTER>
</body>
</html>

du skal ikke tage dig af at der står code_lib.asp det er såmænd bare din stem.inc jeg har omdøbt

Okay fin med mig :o)
Men så skal jeg vel lige omdøbe stem.inc ?

hehe... har lige ændret lidt i index.asp
Fordi der ikke skal være de der links
men er ikke sikker på at jeg har noget kode i den som ikke behøves nu tjek den lige :o)

<html>
<head>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
<title>Afstemnig</title>
</head>
<body>

<!-- #include file="code_lib.asp" -->


 

<CENTER>
<%

session("retur") = Request.ServerVariables("URL")

stemt = Request.QueryString("vote")

If stemt  = "" then
stemt = 1

end if

%>



<% Stem(stemt) %>

<%

If session("retur") > "" then
%>


<%

set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("stem.mdb"))

set rsVote = Server.CreateObject("ADODB.recordset")
rsvote.Open "SELECT * FROM T_Vote", conn, 3, 1, 1

response.write"<table>"

rsVote.Movefirst
do while not rsVote.EOF



rsVote.Movenext

loop

rsVote.close
set rsVote = nothing
conn.close
set conn = nothing


response.write"</table>"


end if
%>

<BR>
</CENTER>
</body>
</html>

kan du ikke hjælpe med noget andet ? i Admin.asp altså, tror jeg da:)
Ok lyt godt efter :)
Når man prøver at oprette en stemme boks hvor man ikke udfylder alle 7 felter Opretter den IKKE boksen
og når man Udfylder dem alle siger den:
Stemmeboksen er nu oprettet. Du kan indsætte boksen hvor du vil, skriv blot følgende kode: Stem(55)


Og det passer jo ikke mere..
og koden til admin.asp kan findes på:
http://www.emil.vonbuchwald.dk/poll/admin.txt

Du kan fortsat benytte dig af funktionskaldet stem(88)
Så det skal du ikke bekymre dig om.

Men hvis du gerne vil ha' oprettelses modulet til at skrive som link istedet ændrer du bare følgende linier:

Stemmeboksen er nu oprettet. Du kan indsætte boksen hvor du vil, skriv blot følgende kode:
<%
    Response.write "Stem(" & rs("id") & ")"
%>
Eller benyt dig af dette link:
<%
Response.write "<a href=index.asp?vote=" & rs("id") &">index.asp?vote="& rs("id") &"</a>"

    rs.Close
    Set rs = Nothing

%>

Til

Stemmeboksen er nu oprettet. Du kan indsætte boksen hvor du vil, skriv blot følgende kode:
<%
    Response.write "Stem(" & rs("id") & ")"

    rs.Close
    Set rs = Nothing

%>

fik lige skrevet det hele omvendt.

Det er de nederste linier der skal rettes til dem jeg har sat ind over "til"

Altså:

Stemmeboksen er nu oprettet. Du kan indsætte boksen hvor du vil, skriv blot følgende kode:
<%
    Response.write "Stem(" & rs("id") & ")"

    rs.Close
    Set rs = Nothing

%>

rettes til:

<%
    Response.write "Stem(" & rs("id") & ")"
%>
Eller benyt dig af dette link:
<%
Response.write "<a href=index.asp?vote=" & rs("id") &">index.asp?vote="& rs("id") &"</a>"

    rs.Close
    Set rs = Nothing

%>

Hvorfor er du offline på icq ?

Ofliner

Nok fordi jeg har bedt ICQ om ikke at starte automatisk!!

hehe :o)
Jeg er bare altid online på icq når jeg er på pc;)

Når jeg skriver <script src="http://www.emil.vonbuchwald.dk/poll/index.asp?vote=60"></script>
dur det ikke
når jeg skriver:
<? include ("http://www.emil.vonbuchwald.dk/poll/index.asp?vote=60"); ?>
dur det heller ikke :(
og så den måde med asp dur heller IK!

Du bad om at få rettet et script så du bare kunne skrive en URL for at gå ind på de forskellige afstemninger.
Det har du fået.

Man kan ikke smide en parameter på en include fil.

Så hvis du har tænkt dig at sætte afstemningen ind på en anden side er det ikke løsningen

I stedet kan du ændre din poll/index.asp til:

<html>
<head>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
<title>Afstemnig</title>
</head>
<body>

<!-- #include file="code_lib.asp" -->


 

<CENTER>
<%

session("retur") = Request.ServerVariables("URL")

stemt = Request.QueryString("vote")

If stemt  = "" then
stemt = 1

end if

%>



<% Stem(stemt) %>

<BR>
</CENTER>
</body>
</html>


og så blot inkludere den på din forside

Men på den måde vil det være afstemning 1 der altid vises.

Med mindre du smider en parameter med på den sider der inkluderer afstemningen

Jeg er efterhånden blevet i tvivl om hvad du egentlig vil ha' afstemnings scriptet til at kunne !!!!!!!

Skal der være forskellige afstemninger på forskellige sider?

Og i så fald skal det da være 1 bestemt afstemning der altid vises på de underliggende sider?
f.eks. på nyhedssiden vil det altid være afstemning 5 der vises mens der på links siden altid vises afstemning 2

eller skal den viste afstemning være tilfældig ?

Nej nu prøver jeg at Forklare:
Grunden til at jeg gerne ville kunne se URL'en var så jeg kunne skrive include osv.

Og det troede jeg ikke blev noget Problem :D

Håber du gider at hjælpe sætter lige pointe op! :o)

Det er ikke megen forklaring du kommer med.
Jeg går ud fra at du har en menu med forskellige punkter der peger på forskellige sider på din hjemmeside.

Nogle af disse sider vil du gerne have en afstemning på.

prøv at se på
http://www.krejberg.dk/udv/poll2/index.asp

Er det noget i den stil?

Du kan ændre hvilken afstemning der vises, ved at ændre værdien for vote.
På den måde kan du bestemme nøjagtig hvilken afstemning der vises på hvilke sider.

Har omdøbt index.asp til poll.asp
koden for poll.asp er:

<html>
<head>
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
<title>Afstemning</title>
</head>
<body>

<!-- #include file="code_lib.asp" -->


 

<CENTER>
<%

session("retur") = Request.ServerVariables("URL")
'her spørger vi om der er en værdi for vote
afstemning = Request.QueryString("vote")

if afstemning > "" then

%>



<% Stem(afstemning) %>

<%
else
%>

Der er ikke nogen værdi for vote!

<%
end if
%>
<BR>
</CENTER>
</body>
</html>

så har jeg rettet poll.asp!

<!-- #include file="code_lib.asp" -->
<%
session("retur") = Request.ServerVariables("URL")

id = Request.QueryString("vote")

if id > "" then

Stem(id)

else

if afstemning > "" then

Stem(afstemning)

else

%>

Der er ikke nogen værdi for afstemning

<%
end if

end if
%>

Det er nu muligt at kalde afstemninger frem på bestemte sider på 2 forskellige måder.

Enten ved at indsætte :
<% afstemning=xx %>
Øverst i de sider der skal ha' afstemninger
hvor xx er et tal der passer med id for den ønskede afstemning

Den anden metode er til at benytte hvis man har dynamiske sider, hvor indholdet skifter alt efter hvilke parametre der bliver sendt med
f.eks:
default.asp?vote=1 ville så vise afstemning med ID 1 på det sted i default.asp hvor man har sat poll.asp ind som include fil.
det samme for default.asp?vote=xx hvor xx er en eller anden værdi fra id i databasen

Men kan jeg også include med php ?  ?

Og filen jeg gemmer hvor jeg indsætter
<% afstemning=xx %>
skal den være i poll mappen ?

jeg har lige oprettet en fil med følgende indhold:
<!-- #include file="poll.asp" -->
<% afstemning=1 %>
den ligger her http://www.emil.vonbuchwald.dk/poll/test.asp

<% afstemning=xx %>

skal sidde i toppen af test.asp

altså før
<!-- #include file="poll.asp" -->
For det er jo poll.asp der skal vide hvilken afstemning der skal vises.

Hvis du vil ha' flere afstemninger på samme side skal du inkludere poll.asp for hver afstemning du vil ha, og før hver
<!-- #include file="poll.asp" -->
skal du skrive
<% afstemning=xx %> hvor xx er afstemningen du vil vise

Når jeg skriver <% afstemning=1 %>
<% afstemning=2 %>
<!-- #include file="poll.asp"-->
viser den kun en!

Hvis du vil ha' flere afstemninger på samme side er det mest overskuelige nok at skrive :
<% afstemning=xx %>
<!-- #include file="poll.asp" -->

for hver afstemning du vil ha

Når du skriver
<% afstemning=1 %>
<% afstemning=2 %>
<!-- #include file="poll.asp"-->

tildeler du jo først afstemning værdien 1
og derefter får afstemning værdien 2

Når poll.asp så beder om værdien for afstemning, får den at vide at afstemning er 2
derfor skal du skrive således:

<% afstemning=1 %>
<!-- #include file="poll.asp" -->

<% afstemning=2%>
<!-- #include file="poll.asp" -->

MEn hvad gør jeg så hvis det skal være i en anden mappe?

Altså hvis jeg har en fil som jeg har lagt i en anden mappe som afstemningen også skal kunne ses i

Det er ikke noget problem!
det eneste der skal ændres er din sti til poll.asp i <!-- #include file="poll.asp--!>

altså hvis du har lagt poll.asp og de tilhørende filer ind i mappen poll

og du vil kalde afstemninge fra mappen før (roden) skriver du blot:
<!-- #include file="poll/poll.asp" -->

hvis filen ligger i en anden mappe f.eks news skriver du:
<!-- #include file="../poll/poll.asp" -->

<% afstemning=1 %>
<!-- #include file="poll/poll.asp" -->

poll.asp

<html>
<head>
<title>Afstemning</title>
</head>
<body>

<!-- #include file="code_lib.asp" -->

<%

session("retur") = Request.ServerVariables("URL")

id = Request.QueryString("vote")

if id > "" then

Stem(id)

else

if afstemning > "" then

Stem(afstemning)

else

%>

Der er ikke nogen værdi for afstemning

<%
end if

end if
%>

</body></html>

Det her må virke.

Omdøb din poll mappe til poll_old
hent denne fil http://www.krejberg.dk/files/poll.ace

Pak den ud og smid alle filerne på serveren fuldstændigt som de ligger

Meningen med det er at understrege at man normalt når man får hjælp (kode) fra andre så benytter man deres kode og kun deres til en begyndelse.
Senere kan man så flette det sammen med egne koder.

Men prøv nu at gøre som jeg har beskrevet ovenfor.
Det er muligt der skal en enkelt lille rettelse til, men det finder vi ud af.

Jeg er først på igen i aften eller sidst på eftermiddagen. Der er en del arbejdsmæssig programmering jeg også skal se til, men jeg er klar til at hjælpe dig

Øh kommer der nogle point??

Ja der kommer point nu ;D
Vores internet har bare ikke duet i 1 uge så.. :o)