Just nu i M3-nätverket
Jump to content

webservern skriver inte ut å ä ö


Jonas__B

Recommended Posts

[log]

Function HTMLDecode(Expression) 
Dim sTemp 
sTemp = Expression 
sTemp=Replace(sTemp,"ä","ä")
sTemp=Replace(sTemp,"´","á")
sTemp=Replace(sTemp,"&ecute;","é")
sTemp=Replace(sTemp,"å","å")
sTemp=Replace(sTemp,"ö","ö")
sTemp=Replace(sTemp,"æ","æ")	
sTemp=Replace(sTemp,"ø","ø")	
sTemp=Replace(sTemp,"Ä","Ä")
sTemp=Replace(sTemp,"&Acute;","Á")
sTemp=Replace(sTemp,"&Ecute;","É")
sTemp=Replace(sTemp,"Å","Å")
sTemp=Replace(sTemp,"Æ","Æ")
sTemp=Replace(sTemp,"Ö","Ö")		
sTemp=Replace(sTemp,"Ø","Ø")
sTemp=Replace(sTemp,"”","""")
sTemp=Replace(sTemp,""","""")
sTemp=Replace(sTemp," "," ")	
HTMLDecode = sTemp 
End Function 

[/log]

 

Vad i självaste fungerar inte koden ovan för?

Den tar bort tecknen istället för att ersätta

 

Klappar & Julting. Utställning / försäljning, Köpmansgården i Höganäs

 

blir alltså;

Klappar & Julting. Utstllning / frsljning, Kpmansgrden i Hgans

 

Det är inte funktionen och inte replace, utan det måste vara servern då jag testat att skriva ut response.write "äää" utan att det fungerar heller.

Gôr-skumt.

 

Använder Loopia

 

Link to comment
Share on other sites

det var eforums fel...

 

[log]

[color="#0000ff"]Function[/color] HTMLDecode(Expression) 
[color="#0000ff"]Dim[/color] sTemp 
sTemp = Expression 
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& auml;"[/GRÅ],[GRÅ]"ä"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& acute;"[/GRÅ],[GRÅ]"á"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& ecute;"[/GRÅ],[GRÅ]"é"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& aring;"[/GRÅ],[GRÅ]"å"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& ouml;"[/GRÅ],[GRÅ]"ö"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& aelig;"[/GRÅ],[GRÅ]"æ"[/GRÅ])	
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& oslash;"[/GRÅ],[GRÅ]"ø"[/GRÅ])	
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& Auml;"[/GRÅ],[GRÅ]"Ä"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& Acute;"[/GRÅ],[GRÅ]"Á"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& Ecute;"[/GRÅ],[GRÅ]"É"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& Aring;"[/GRÅ],[GRÅ]"Å"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& AElig;"[/GRÅ],[GRÅ]"Æ"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& Ouml;"[/GRÅ],[GRÅ]"Ö"[/GRÅ])		
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& Oslash;"[/GRÅ],[GRÅ]"Ø"[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& rdquo;"[/GRÅ],[GRÅ]""[/GRÅ][GRÅ]""[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& quot;"[/GRÅ],[GRÅ]""[/GRÅ][GRÅ]""[/GRÅ])
sTemp=[color="#0000ff"]Replace[/color](sTemp,[GRÅ]"& nbsp;"[/GRÅ],[GRÅ]" "[/GRÅ])	
HTMLDecode = sTemp 
[color="#0000ff"]End[/color] [color="#0000ff"]Function[/color] 

[/log]

 

[inlägget ändrat 2007-02-13 13:37:46 av Jonas_Bo]

Link to comment
Share on other sites

Lite märkligt är det...

Jag testade din funktion på en kunds konto hos Loopia och det gick bra.

 

Response.Write HTMLDecode("Micke är "Skåning" och längtar efter semester")

 

blev

Micke är "Skåning" och längtar efter semester

 

Varför vill du byta ut t ex & auml; mot ett ä och inte tvärtom?

 

Testade även Response.Write "åäö" och det gick bra.

 

[inlägget ändrat 2007-02-13 13:50:58 av Micke_skane]

Link to comment
Share on other sites

Jag ser nu att det funkar på en sida men inte på den jag jobbar på nu.

jag skall testa lite till får vi se vad det kan vara.

 

Link to comment
Share on other sites

Jag strippade ner koden till minimalt och då fungerar det.

 

Måste varit någon annan funktion som stört på något sätt.

Nu får jag bygga upp allt igen :)

 

Link to comment
Share on other sites

Det är bara att klipp och klistra, om du nu sparade koden i ett extra dokument, så ser du när det blir fel...

Lycka till och du är nog klar nu till 14.20 :)

 

Link to comment
Share on other sites

efter mycket om och men löste det sig genom att spara om filen till UTF-8 och tvinga till Response.Charset = "UTF-8" där också :S

 

Link to comment
Share on other sites

Varför vill du byta ut t ex & auml; mot ett ä och inte tvärtom?

jag skall göra en editor som skall generera nyheter till som visas i flash.

 

Editorn är egentligen HTMLeditor som html.encodar tecken direkt men det stödjs inte av flash när man hämtar det ur en textfil.

Kruxigt, jag vet.

 

[inlägget ändrat 2007-02-13 20:20:51 av Jonas_Bo]

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...