webForumDet fria alternativet

Ahhhhhhhhhhhhhhhhhhh!

ASP

18 svar · 368 visningar · startad av crisse6

Medlem sedan dec. 20002 526 inlägg
Frågan#1

Ibland kan man ju bli lite små sur...

Har för tillfället ett problem...

  strNavigation = strNavigation & " <a href='?pageid=" & i & "&trad=" & objRs("trad") & "'>" & i & "</a>"

utan " & objRs("trad") & " fungerar det, men jag måste ha med trad... i länken... hmm....

Medlem sedan jan. 2002473 inlägg
#2

Är du säker att objRs("trad") funkar...
Skriv enbart ut det och se vad du får för värde!

Medlem sedan dec. 20002 526 inlägg
#3

har gjort det... den finns ju

Medlem sedan jan. 2002473 inlägg
#4

Antar att det inte hjälper så mycket om du skriver
strNavigation = strNavigation & " <a href=""?pageid=" & i & "&trad=" & objRs("trad") & """>" & i & "</a>"

Men en fråga bara... Varför anger du inte vart länken skall gå???

<a href=""filen.asp?pageid= ????

Medlem sedan dec. 20002 526 inlägg
#5

det är paging script... det finns förklaring längre upp i scriptet

Medlem sedan jan. 2002473 inlägg
#6

det är paging script

Jo, det är mycket möjligt att det är, men ifall en <a href> länk skall funka så måste du skriva vilken fil den skall till...

Du har skrivit:
strNavigation = strNavigation & " <a href=""?pageid=" & i & "&trad=" & objRs("trad") & """>" & i & "</a>"
Borde det inte mer vara:
strNavigation = strNavigation & " <a href=""sidanjagärpå.asp?pageid=" & i & "&trad=" & objRs("trad") & """>" & i & "</a>"

Medlem sedan dec. 20002 526 inlägg
#7

det finns förklaring längre upp i scriptet

det funkar ju redan har jag sagt innan jag la dit objRs("trad") så det är inget fel med vart man ska, utan själv querystringen det är fel på....

Medlem sedan jan. 2002473 inlägg
#8

oki...
Kan du ge mer kod då!!!

Medlem sedan dec. 20002 526 inlägg
#9

sure...

<%
Set objRs = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT * FROM add_forum Where trad = '" & Request.Querystring("trad") & "' ORDER BY [datum] DESC"

intPageId = request.querystring( "pageid" )
if intPageId = "" then intPageId = 1

with objRs
  .cursorLocation = 3
  .open strSQL, Databas
  .pagesize = 10
  .absolutepage = intPageId
end with

intPages = cint( objRs.pagecount )
intCurrentPost = 0
response.write "<table width=600 height=1 cellspacing=2 cellpadding=0><tr><td width=200 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Rubrik:</font></td><td width=80 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Skribent:</font></td>" &_
    "<td width=80 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Datum:</font></td><td width=80 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Antal svar:</font></td>" &_
    "<td width=100 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Senaste inlägget:</font></td></tr>"
do until objRs.eof and intCurrentPost < objRs.pagesize
  strContents = strContents &_
    "<table width=600 cellspacing=2 cellpadding=0 bgcolor=#FFFFFF border=0><tr><td width=200 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>" & objRs( "rubrik" ) & "</td></font>" &_
    "<td width=80 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>" & objRs( "anvandarnamn" ) & "</td></font>" &_
    "<td width=80 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>" & objRs("datum") & "</font></td>" &_
    "<td width=80 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>13</font></td>" &_
    "<td width=100 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>2002-06-24</font></td></tr>"
  intCurrentPost = intCurrentPost + 1
  objRs.movenext
loop

for i = 1 to objRs.pagecount
  strNavigation = strNavigation & " <a href='?pageid=" & i & "'>" & i & "</a>"
next

response.write "<table>" & strContents & "</table>"
response.write "<table><tr><td><font face=Verdan size=1>" & strNavigation & "</td></tr></table></font>" 
%>
Medlem sedan jan. 2002473 inlägg
#10

Är inte alls säker men har ändrat de röda:

<%
[red]trad = Request.Querystring("trad")[/red]
Set objRs = Server.CreateObject("ADODB.Recordset")
[red]strSQL = "SELECT * FROM add_forum Where trad = '" & trad & "' ORDER BY [datum] DESC"[/red]

intPageId = request.querystring( "pageid" )
if intPageId = "" then intPageId = 1

with objRs
  .cursorLocation = 3
  .open strSQL, Databas
  .pagesize = 10
  .absolutepage = intPageId
end with

intPages = cint( objRs.pagecount )
intCurrentPost = 0
response.write "<table width=600 height=1 cellspacing=2 cellpadding=0><tr><td width=200 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Rubrik:</font></td><td width=80 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Skribent:</font></td>" &_
    "<td width=80 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Datum:</font></td><td width=80 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Antal svar:</font></td>" &_
    "<td width=100 valign=top bgcolor=#EFEFEF><font face=Verdana size=1>Senaste inlägget:</font></td></tr>"
do until objRs.eof and intCurrentPost < objRs.pagesize
  strContents = strContents &_
    "<table width=600 cellspacing=2 cellpadding=0 bgcolor=#FFFFFF border=0><tr><td width=200 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>" & objRs( "rubrik" ) & "</td></font>" &_
    "<td width=80 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>" & objRs( "anvandarnamn" ) & "</td></font>" &_
    "<td width=80 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>" & objRs("datum") & "</font></td>" &_
    "<td width=80 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>13</font></td>" &_
    "<td width=100 valign=top bgcolor=#FFFFFF><font face=Verdana size=1>2002-06-24</font></td></tr>"
  intCurrentPost = intCurrentPost + 1
  objRs.movenext
loop

for i = 1 to objRs.pagecount
 [red] strNavigation = strNavigation & " <a href='?pageid=" & i & "&trad=" & trad & "'>" & i & "</a>"[/red]
next

response.write "<table>" & strContents & "</table>"
response.write "<table><tr><td><font face=Verdan size=1>" & strNavigation & "</td></tr></table></font>" 
%>
Medlem sedan dec. 20002 526 inlägg
#11

löste det problemet....

men nu ett annat, jag gör ett forum där jag har fält som id och svarid, id är unikt ju, men svarid, hur ska jag göra så att det blir ett unikt nr varje gång någon svara på ett inlägg? slumpa? men då kan det ju ändå olyckligtvis bli samma ändå..

Medlem sedan apr. 20012 427 inlägg
#12

crisse6 skrev:

hur ska jag göra så att det blir ett unikt nr varje gång någon svara på ett inlägg? slumpa? men då kan det ju ändå olyckligtvis bli samma ändå..

Det sköter lämpligtvis databasen. Vilken kör du?

Medlem sedan dec. 20002 526 inlägg
#13

access 2000

Medlem sedan dec. 20002 526 inlägg
#14

kan någon hjälpa mig med en siffer slumpare?

Medlem sedan mars 20015 287 inlägg
#15

Prob. 1 Vad var det som var fel?
Hjälpte roadys kod?

Prob. 2 http://www.webforum.nu/search.php?s=&action=showresults&searchid=57716&sortby=lastpost&sortorder=descending

Medlem sedan dec. 20002 526 inlägg
#16

solbulle:
Prob.1 Det var redan så att jag hade kört igenom recsetet och kunde därför inte köra det i länken nedan. Istället blev det så att jag la in request.querystring("trad") i länken, och nu funkar det ;)

Prob2. ska kolla nu... återkommer vid mera frågor

Medlem sedan dec. 20002 526 inlägg
#17

har kollat lite nu, alla ser jävligt röriga ut... jobbigt... ska ju bara få fram ett nr som sedan ska skickas in i samma tabell som all annan information...

Medlem sedan mars 20015 287 inlägg
#18

Angående svarsid, jag vet inte hur du lagt upp det hela, men kan man inte bygga ett svarsid som ser ut som typ:

svarid = id + _ + räknare (i databasen)

så att första svarsid blir typ: 23_1 sen nästa svar: 23_2 osv.

Hängde någon med där?

Medlem sedan dec. 20002 526 inlägg
#19

nein

271 ms totalt · 4 externa anrop · v20260731065814-full.e96017d9
129 ms — deklarationer (db)
0 ms — hämta statistik (cache)
139 ms — hämta tråd, inlägg och bilagor (db)
125 ms — ändringar (db)