8 svar · 489 visningar · startad av Nova
Vet ej om detta är rätt forumsdel, men jag provar :)
Sidan jag håller på med innehåller bland annat matrecept och bygger på en access databas, samt att jag använder mig av dreamweaver mx.
Nu till frågan när jag hämtar recept texten till min sida med hjälp av ett recordset så blir det ju inga radbrytningar, stycken och andra formateringar. Detta har jag löst genom att dela upp receptet i delar i en access tabell, typ kolumn ett namnet på receptet kolumn 2 instruktioner1 osv, som jag sedan lägger ut i tabeller på aspsidan där jag gör formateringen. Nu vet jag att man kan styra formateringarna med htmlkod direkt i access tabellerna, men för mig som inte kan html känns det som ett jobbigt sätt.
Vad är att rekomendera eller finns det ytterligare sätt att göra det på?
Jag använder en sån här grej för att kunna använda radbrytningar och fler än ett mellanslag.
<%
'Skriver ut texten från databasen med radbrytningar och mellanslag
Dim KallText
KallText = Replace(rs("text"),chr(13),"<br>")
KallText = Replace (text,chr(32)," ")
Response.Write KallText
%>
Förlåt, ska naturligtvis se ut så här...
<%
'Skriver ut texten med radbrytningar och mellanslag
Dim text
text = Replace(rs("text"),chr(13),"<br>")
text = Replace (text,chr(32)," ")
Response.Write text
%>
Jag förstår inte vart jag ska sätta in de där i mitt RS eller om jag behöver ändra något i din kod mitt rs ser ut så här
<%
Dim Rsrecinstruk
Dim Rsrecinstruk_numRows
Set Rsrecinstruk = Server.CreateObject("ADODB.Recordset")
Rsrecinstruk.ActiveConnection = MM_news_STRING
Rsrecinstruk.Source = "SELECT Recept.*, personal.* FROM personal INNER JOIN Recept ON personal.Kontaktnr = Recept.Kontaktnr WHERE Receptnr = " + Replace(Rsrecinstruk__MMColParam, "'", "''") + ";"
Rsrecinstruk.CursorType = 0
Rsrecinstruk.CursorLocation = 2
Rsrecinstruk.LockType = 1
Rsrecinstruk.Open()
Rsrecinstruk_numRows = 0
%>
Visa koden där du skriver ut ditt RS så är det enklare att förklara. Någonstans står det nåt liknande: response.write Rsrecinstruk("Recept") det ändrar du till:
response.write text(Rsrecinstruk("Recept"))
Jag måste vara trögare än vanligt, jag förstår inte hur :)
Jag har sökt på olika forum också men hittar inte svaret på min fråga. Söker jag på detta eminenta forum om radbrytning så får jag massor av träffar men jag hittar inte svaret. I dreamweaver så använder jag mig av
<%=(Rsrecinstruk.Fields.Item("instr_1").Value)%>
för att skriva ut från de olika recordseten och inte Response.Write så jag förstår inte hur jag ska använda svaren jag fått.
// Jag är trög norrlänning :)
Ja det blir så med Dw när man använder sig av rs, nu ändrade jag så jag skriver ut samma sak men med Response.Write, Jag har en testsida som jag provar på och där ser det ut så här nu.
<% Response.Write ((Rsinfo.Fields.Item("infotext").Value)) %>
Och här skulle jag vilja radbryta texten "infotext"
Jag har gjort så här skrivit en test text i notepad med en hel del radbrytningar och kopierat in den i min access data bas men jag får bara ut en låmg texmassa, om jag kopierar tillbaka texten från databasen till notepad så finns formateringarna kvar, så de borde gå att få ut med radbrytningarna på min .asp sida också.
Hur bör jag göra nu?
//Jag är en trög norrlänning
Men jag är då megatrög, de var ju mycket simplare än vad jag trodde :)
<%
function tecken(str)
tecken = Replace(str, vbCrLf, "<BR>" & vbCrLf)
End function
%>
Och
<% Response.Write (tecken((Rsinfo.Fields.Item("infotext").Value))) %>
löste ju allt som ni skrev tidigare.
/me skäms :)