/ Forside / Teknologi / Udvikling / ASP / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
Linieskift og replace - igen igen
Fra : Karl Zinglersen


Dato : 05-01-03 18:04

Jeg har læst og benyttet indlæggene her, faq'en og link til
www.asp-faq.dk angående visning af linieskift fra Access til asp.

Imidlertid er det ikke lykkedes mig endnu under afprøvningen.
url på min test: http://boeps.dk/test.asp

Hvad præcis skal jeg skrive i mit tilfælde, og hvor?

På forhånd tak
Karl Zinglersen

Her er koden fra test-siden:

<%@LANGUAGE="VBSCRIPT"%>
<%
Dim Recordset1__MMColParam
Recordset1__MMColParam = "1"
if (Request.QueryString("AktivtID") <> "") then
Recordset1__MMColParam = Request.QueryString("AktivtID")
%>
<%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_Boeps2_STRING
Recordset1.Source = "SELECT * FROM Aktivitet WHERE AktivtID = " +
Replace(Recordset1__MMColParam, "'", "''") + ""
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>

<html>

<table width="625" border="0" height="76">
<tr>
<td height="46">
<%=(Recordset1.Fields.Item("AktivIndhold").Value)%></td>
</tr>
</table>
</body>
</html>
<%
Recordset1.Close()
%>


--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP ???
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

 
 
Jens Gyldenkærne Cla~ (05-01-2003)
Kommentar
Fra : Jens Gyldenkærne Cla~


Dato : 05-01-03 23:16

Karl Zinglersen skrev:

> Jeg har læst og benyttet indlæggene her, faq'en og link til
> www.asp-faq.dk angående visning af linieskift fra Access til asp.

Altså også <http://www.asp-faq.dk/article/?id=3>?


> Hvad præcis skal jeg skrive i mit tilfælde, og hvor?

Eksemplet fra asp-faq.dk står således:

   dim strReplace
   dim strText
   strText = <en eller anden tekst fra din database>
   strReplace = Replace(strText,vbCrLf,"<br>")

Det du skal identificere er hvad der i dit tilfælde skal stå i
stedet for "<en eller anden tekst fra din database>".

> <%=(Recordset1.Fields.Item("AktivIndhold").Value)%>

Her udskriver du din tekst. Det er denne værdi der skal erstattes.
Hvis du benytter syntaksen fra asp-faq.dk bliver det:

   dim strReplace
   dim strText
   strText = Recordset1("AktivIndhold")
   strReplace = Replace(strText,vbCrLf,"<br>")

(bemærk at Recordset1("AktivIndhold") er præcis det samme som
Recordset1.Fields.Item("AktivIndhold").Value)

Det kan du skrive ind der hvor du åbner dit recordset. Der hvor
teksten skal skrives ud skriver du så:

   <%= strReplace %>

NB: Du tjekker ikke om recordsettet er tomt inden du henter data
fra det. Det kan resultere i kørselsfejl (alt afhængig af hvilke
data du kan risikere at få via din querystring).
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

Karl Zinglersen (06-01-2003)
Kommentar
Fra : Karl Zinglersen


Dato : 06-01-03 01:10



Jens GyldenkærneClausen wrote in
dk.edb.internet.webdesign.serverside.asp:
> Karl Zinglersen skrev:
>
> > Jeg har læst og benyttet indlæggene her, faq'en og link til
> > www.asp-faq.dk angående visning af linieskift fra Access til asp.
>
> Altså også <http://www.asp-faq.dk/article/?id=3>?
>
>
> > Hvad præcis skal jeg skrive i mit tilfælde, og hvor?
>
> Eksemplet fra asp-faq.dk står således:
>
>    dim strReplace
>    dim strText
>    strText = <en eller anden tekst fra din database>
>    strReplace = Replace(strText,vbCrLf,"<br>")
>
> Det du skal identificere er hvad der i dit tilfælde skal stå i
> stedet for "<en eller anden tekst fra din database>".
>
> > <%=(Recordset1.Fields.Item("AktivIndhold").Value)%>
>
> Her udskriver du din tekst. Det er denne værdi der skal erstattes.
> Hvis du benytter syntaksen fra asp-faq.dk bliver det:
>
>    dim strReplace
>    dim strText
>    strText = Recordset1("AktivIndhold")
>    strReplace = Replace(strText,vbCrLf,"<br>")
>
> (bemærk at Recordset1("AktivIndhold") er præcis det samme som
> Recordset1.Fields.Item("AktivIndhold").Value)
>
> Det kan du skrive ind der hvor du åbner dit recordset. Der hvor
> teksten skal skrives ud skriver du så:
>
>    <%= strReplace %>
>
> NB: Du tjekker ikke om recordsettet er tomt inden du henter data
> fra det. Det kan resultere i kørselsfejl (alt afhængig af hvilke
> data du kan risikere at få via din querystring).
> --
> Jens Gyldenkærne Clausen
> Svar venligst under det du citerer, og citer kun det der er
> nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
> hvordan på http://usenet.dk/netikette/citatteknik.html

Meget smukt. Tak for det. Ser ud til at virke fint.
Karl

--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP ???
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! => http://www.html.dk/tutorials

Jens Gyldenkærne Cla~ (06-01-2003)
Kommentar
Fra : Jens Gyldenkærne Cla~


Dato : 06-01-03 01:47

Karl Zinglersen skrev:

> Meget smukt. Tak for det. Ser ud til at virke fint.

Velbekomme. Hvis du vil gøre lidt til gengæld kan du bruge et par
minutter på at læse min signatur samt det link der er i den. Det er
lettere og hurtigere at følge en diskussion hvis man nøjes med at
citere det nødvendige.
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html

Christian M. Nielsen (06-01-2003)
Kommentar
Fra : Christian M. Nielsen


Dato : 06-01-03 17:34

"Karl Zinglersen" <karlbrix@tiscali.dk> wrote in message
news:av9ohm$28$1@sunsite.dk...
> Jeg har læst og benyttet indlæggene her, faq'en og link til
> www.asp-faq.dk angående visning af linieskift fra Access til asp.
>
> Imidlertid er det ikke lykkedes mig endnu under afprøvningen.
> url på min test: http://boeps.dk/test.asp
>

> <table width="625" border="0" height="76">
> <tr>
> <td height="46">
> <%=(Recordset1.Fields.Item("AktivIndhold").Value)%></td>
> </tr>
> </table>



dim strText, strReplace

strText = Recordset1.Fields.Item("AktivIndhold").Value
strReplace = Replace(strText,vbCrLf,"<br>")

> <table width="625" border="0" height="76">
> <tr>
> <td height="46"><%strReplace %><td>
> </tr>
> </table>

Dog er jeg ikke sikker på "Recordset1.Fields.Item("AktivIndhold").Value" men
det kan du skifte ud med det felt i databasen du vil have.

http://www.asp-faq.dk/article/?id=3

--

Mvh / Regards

-=< Christian >=-

What capital has 164 letters in its name? See my web page to find out.
http://www.cmnielsen.dk ICQ: 25308942
Destiny is not a matter of chance it is a matter of choice



Søg
Reklame
Statistik
Spørgsmål : 177559
Tips : 31968
Nyheder : 719565
Indlæg : 6408937
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste