---
title: "Advanced? Radbyte"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/59965-advanced-radbyte"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "NBT"
published: "2002-11-22T23:02:08.000Z"
updated: "2002-11-23T14:51:54.000Z"
replies: 9
views: 375
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/59965-advanced-radbyte"
---

# Advanced? Radbyte

## #1 — NBT, 2002-11-22T23:02Z

Tjena boys n gals!

Okej, knäck denhära då om ni kan =)

Jag har lagrat en del text i en databas.
Hämtar upp datat och  

Använder idag följande kod för att få till radbyte. 

\<% =Replace(strSpoinkmannen,vbCrlf,"\<br\>") %\>

Skapar därefter ett mail där jag hämtar in ovan nämnda text, men även "\<br\>-fnutten" hänger med in i själva mailet.

Det kan se ut såhär: 
"Lite text\<br\>och sen lite till text..."

Hur undviker jag detta?

Tack på förhand!
mvh Stefan

Permalänk: https://www.webforum.nu/p/59965

## #2 — Viktor, 2002-11-22T23:05Z

Vad vill du göra? Byta \<br\> mot vbCrlf eller tvärt om?
\<br\> fungerar bara om du har HTML mail, om du har vanliga mail (text) så syns \<br\> som vanlig text och då ska du använda vbCrlf för att få radbrytning.

/Viktor

Permalänk: https://www.webforum.nu/p/862634

## #3 — NBT, 2002-11-22T23:17Z

Jag vill kort och gott undvika att "\<br\>" hänger med in i mailet.
Kan jag lägga in någon slags Unicode-kod (%250A) eller liknande för att klara detta?

Permalänk: https://www.webforum.nu/p/862641

## #4 — Viktor, 2002-11-22T23:21Z

Byter ut \<br\> mot "ny rad"

```
<% =Replace(strSpoinkmannen,"<br>",vbCrlf) %>
```

byter ut \<br\> mot ""

```
<% =Replace(strSpoinkmannen,"<br>","") %>
```

/Viktor

Permalänk: https://www.webforum.nu/p/862644

## #5 — Jesper T, 2002-11-22T23:36Z

Denna regexp skall ta bort allt inom samtliga htmltaggar. Det kanske är något att tänka på?!
Det bästa är kanske att inte  lägga in någor html överhudvudtaget om du skall skicka´t med mail.

```
x = "Din Text här"
Set objRe = New regExp
objRe.IgnoreCase = True
objRe.Global = True

objRe.Pattern = "<[^>]*>" 
x = objRe.Replace(x," ")
```

Permalänk: https://www.webforum.nu/p/862650

## #6 — NBT, 2002-11-22T23:40Z

Njaee... kan fortfarande inte få det att funka sjysst.
Radbrytningen vill fortfarande vara kvar i mailet.

Jag lägger in lite kod så kanske det hela blir lättare? =)

\-------
functions.inc
\-------

' En funktion som snyggar till text som skrivs ut från databasen
Function fixText(strText)

	strText		= server.HTMLEncode(strText)
	strText		= Replace(strText,vbCrlf,"\<br\>")
	
	fixText		= strText

End Function

\-------
sendmail.asp
\-------
kodsnutt:

Rubrik:%250A
\<%=fixText(strProposal)%\> %250A %250A %250A   

Och resultatet är:

Här har jag klistrat in en jättelång radda med åtgärdsförslagHär har jag klistrat in en jättelång radda med åtgärdsförslagHär har jag klistrat in en jättelång radda med åtgärdsförslagHär har jag klistrat in en jättelång 

Som ni ser, inga radbrytningar eller liknande...

vad gör jag för fel? Vad har jag missat?

Permalänk: https://www.webforum.nu/p/862653

## #7 — Jesper T, 2002-11-22T23:44Z

server.HTMLEncode() Skall du väl inte ha när du skriver ut saker ur databasen eller?
Skall du inte vända på :
strText = Replace(strText,vbCrlf,"\<br\>") 
Till:
strText = Replace(strText,"\<br\>",vbCrlf)

Permalänk: https://www.webforum.nu/p/862658

## #8 — NBT, 2002-11-22T23:52Z

blir fasiken inte klok på dethär... =)

Permalänk: https://www.webforum.nu/p/862662

## #9 — NBT, 2002-11-23T11:33Z

Efter mycket om och men så löste det sig, trots allt, med Unicode =)

	strText		= Replace(strText,vbCrlf,"%250A")

tack för er hjälp!

mvh Stefan

Permalänk: https://www.webforum.nu/p/862745

## #10 — NBT, 2002-11-23T14:51Z

Det vore intressant att veta hur jag kan generera HTML-mails, med olika färger osv. direkt till outlook. Berätta gärna mer om detta!

Här nedan är lite kod =)

'Funktion som snyggar till mailet

Function fixMailText(strText)

    strText        = server.HTMLEncode(strText)
    strText        = Replace(strText,vbCrlf,"%250B")
    
    fixMailText        = strText

End Function

\<a href="mailto: blablabla

&Body=
PÅ STATION ' \<%=strStation%\> ' HAR FÖLJANDE AVVIKELSE ÄGT RUM:

%250A %250A %250A

"\>Send mail\</a\>

Nu märker jag att mailet inte ser likadant ut i exakt identiska versioner av Outlook. Vad kan detta bero på?

I den ena maskinen ser det perfekt! ut
I den andra maskrinen fortlöper all text, utan radbryten osv.
Någon inställning jag missat någonstans?

Permalänk: https://www.webforum.nu/p/862852

---

Tråden på webben: https://www.webforum.nu/amne/asp/59965-advanced-radbyte