webForumDet fria alternativet
Logga in / Bli medlem

Response.Write PROBLEM!

ASP

26 svar · 595 visningar · startad av Bohlin-Gbg

Medlem sedan feb. 200226 inlägg
Trådstart#1

Tjena,

Vad är fel i koden nedan, den vägrar skriva ut följande:

Response.Write "<td class=""br&ouml;dtext""><span class=""br&ouml;dtext"">- " & RS("underrubrik") & "</span></td>"

och

Response.Write "<td class=""br&ouml;dtext"">" & RS("KORTTEXT") & "</td>"

Här kommer hela koden:

<%
If Request.Form("sokord") <> "" Then
Response.Write "Din sökning på <b>" & Request.Form("sokord") & "</b> gav följande träffar.<br><br>" & vbCrLf
strSQL="SELECT * FROM FORELASNING WHERE RUBRIK LIKE '%"& request.FORM("sokord")&"%'"
SET RS = Con.Execute(strSQL)
While Not RS.EOF
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""br&ouml;dtext""><a href=""forelasningar_info.asp?nr=" & Rs("nr") & "&fnamn=" & Rs("fnamn") & "&enamn=" & Rs("enamn") & "&rubrik=" & Rs("rubrik") & "&underrubrik=" & Rs("underrubrik") & "&korttext=" & Rs("korttext") & "&langtext=" & Rs("langtext") & "&pdf=" & Rs("pdf") & """ target=""main"" class=""Fetrubrik"">" & RS("RUBRIK") & "</a></td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""br&ouml;dtext""><span class=""br&ouml;dtext"">- </span></td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""br&ouml;dtext""><img src=""bilder/genomskinlig.gif"" width=""10"" height=""10""></td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""br&ouml;dtext"">" & RS("KORTTEXT") & "</td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""br&ouml;dtext""><br><br></td>"
Response.Write "</tr>"
RS.MoveNext
Wend
RS.Close
Set RS = Nothing
End If
%>

Hoppas ngn kan hjälpa mig med detta .. :q

Medlem sedan nov. 20017 144 inlägg
#2

Välkommen till WF

Vad händer om du bara skriver: Response.Write RS("KORTTEXT")?

MVH Jesper

Medlem sedan feb. 200226 inlägg
#3

Hej Jesper,

Tack för välkomnandet, känns trevligt .. :e

Det händer ingenting om jag gör det ..

Här är sidan upplagd på webben http://www.startdirekt.com/fb/forelasningar.asp

Om du går till lista alla så ser du hur det ska vara listat förutom fontformateringen ..

Medlem sedan mars 20014 214 inlägg
#4

SQL frågan är inte riktigt rätt och inte heller recordset...

<%
If Request.Form("sokord") <> "" Then
Response.Write "Din sökning på <b>" & Request.Form("sokord") & "</b> gav följande träffar.<br><br>" & vbCrLf
strSQL="SELECT * FROM FORELASNING WHERE RUBRIK LIKE '%"& request.FORM("sokord")&"%'"
RS.OPEN strSQL, CON
While Not RS.EOF
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""brödtext""><a href=""forelasningar_info.asp?nr=" & Rs("nr") & "&fnamn=" & Rs("fnamn") & "&enamn=" & Rs("enamn") & "&rubrik=" & Rs("rubrik") & "&underrubrik=" & Rs("underrubrik") & "&korttext=" & Rs("korttext") & "&langtext=" & Rs("langtext") & "&pdf=" & Rs("pdf") & """ target=""main"" class=""Fetrubrik"">" & RS("RUBRIK") & "</a></td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""brödtext""><span class=""brödtext"">- </span></td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""brödtext""><img src=""bilder/genomskinlig.gif"" width=""10"" height=""10""></td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""brödtext"">" & RS("KORTTEXT") & "</td>"
Response.Write "</tr>"
Response.Write "<tr align=""left"" valign=""middle"">"
Response.Write "<td class=""brödtext""><br><br></td>"
Response.Write "</tr>"
RS.MoveNext
Wend
RS.Close
Set RS = Nothing
End If
%>

DÅ måste du givetvis också ha ett recordset som heter RS

Medlem sedan feb. 200226 inlägg
#5

Hej där Rinaldo,

Recordset är ju satt till SET RS = Con.Execute(strSQL) så det finns ju annars hade ju inte rubriken skrivits ut ..

Jag testade den kod du gjort och den brakade ihop totalt .. så felet är fortfarande olöst ..

Medlem sedan mars 20014 214 inlägg
#6

Jaha,,, jag missuppfattade din kod hellt... då kan man börja från början.

Är det bara dessa två fält som inte skrivs ut? Skrivs dom andra ut?

Medlem sedan nov. 20017 144 inlägg
#7

Har du med:
Set Con = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")?

Medlem sedan feb. 200226 inlägg
#8

Hej igen ALLA =)

"Rinaldo"

Ja, allt annat skrivs ut.

"Jesper"

Så här ser den kopplingen ut:

<%
Dim Con
Dim SQL
Dim RS

Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "DBQ=" & Server.MapPath("admin/db/data.mdb") & ";Driver={Microsoft Access Driver (*.mdb)};"

%>
Medlem sedan feb. 200226 inlägg
#9

Hej igen,

Ni kan kika på http://www.startdirekt.com/fb så ser ni vad som är utskrivet under "föreläsning" när ni söker på t.ex. % ..

Medlem sedan nov. 20017 144 inlägg
#10

Har du med detta till ditt recset?:
Set Rs = Server.CreateObject("ADODB.Recordset")

Medlem sedan feb. 200226 inlägg
#11

Hej Jesper,

Ja, som du ser i första inlägget med kod så är det

SET RS = Con.Execute(strSQL)

som är inlaggt ..

Jag har även en annan sida som heter forelasare.asp som är uppbyggd på samma kod och som funkar perfekt .. skumt värre ..

Medlem sedan juni 200032 967 inlägg
#12

Fälten som inte visas är av typen PM / Memo, eller hur?

Medlem sedan nov. 20017 144 inlägg
#13

Det ser ut som att @nders tar vid, då kommer saken snart att vara "biff"!

Själv lämnar jag "walk over"

MVH Jesper T

Medlem sedan feb. 200226 inlägg
#14

Hej @nders,

Nej enda fältet som jag gjort till memo/pm är ett fält som heter "beskrivning" .. alla andra fält är rena textfält ..

Medlem sedan feb. 200226 inlägg
#15

.. det verkar som om raden:

Response.Write "<td class=""brödtext""><a href=""forelasningar_info.asp?nr .... osv ...

Blockerar de andra rs utskrifterna .. hmm ..

Kan man lägga in ytterligare ett rs ? typ rs2 för det underliggande värdena .. ?

Medlem sedan mars 20014 214 inlägg
#16

Då måste du även göra en till SQL fråga då det är i det andra Rs som infon finns...
Jag hittar inget fel på den långa raden...

Medlem sedan feb. 200226 inlägg
#17

.. nej de e inge fel på den långa raden, men det verkar ändå som den blockerar alla rs förfrågningar under i samma loop ..

.. jag tog bort rs frågan korttext i den långa raden och då kom värdet fram i den undre rs frågan .. skumt ..

.. hur gör man en ny sql fråga i samma loop .. har aldrig gjort det ..

Medlem sedan mars 20014 214 inlägg
#18

jaha... oj... du måste köra en <%loop%>
och en <%rs.movefirst%> innan du kan fråga efter samma fält två gånger...

Testa lägg in det så ska det nog fungera...

Medlem sedan mars 20014 214 inlägg
#19

Eller så löser du det så att du lägger de värden du använder 2 gånger i varibler för värdet och använder dem istället...

Medlem sedan feb. 200226 inlägg
#20

Hej Rinaldo,

.. ok, nu tar vi det vääääldigt sakta och förklarande en gång till .. är ingen superprogrammerare utan har snarare väldigt med "bas" kunskaper om detta med asp .. kan du utveckla dina två senaste inlägg lite .. fattar bara 15% av det .. :e

262 ms totalt · 4 externa anrop · v20260731065814-full.51f67c91
121 ms — deklarationer (db)
0 ms — hämta statistik (cache)
136 ms — hämta tråd, inlägg och bilagor (db)
123 ms — ändringar (db)