ersätta apostrofer m.m.

7 svar · 286 visningar · startad av i-or 14 nov. 2001

i-orMedlem sedan nov. 2001294 inlägg

Trådstart14 nov. 2001 22:44#1

dessa ändringar går ju inte med server.url-grejen utan måste göras med en separat funktion.

om jag nu har min omgjorda text och lägger in den i adressfältet och på nästa sida i selectuttrycket ska välja ut de poster i en databas där denna omgjorda text överrensstämmer med en viss kolumn. (Subject = '" & Request.QueryString("subject") & "') stämmer ju inte längre detta för att den omgjorde texten innehåller htmlkod istället för vanlig text.

hur gör jag för att lösa detta?

M@rtinMedlem sedan dec. 19992 085 inlägg

14 nov. 2001 22:46#2

Varför innehåller den html-kod?

Känns som att du bara postat typ halva inlägget eller är det bara jag som inte förstår?

i-orMedlem sedan nov. 2001294 inlägg

14 nov. 2001 22:56#3

oj då, början försvann visst....

problemet är att jag har ersatt apostrofer och dylikt med html-kod så att det hela ska fungera och inte avslutas vid apostrofen.

nu hoppas jag att du fattar bättre.

[Redigerat av i-or den 14 nov 2001]

M@rtinMedlem sedan dec. 19992 085 inlägg

14 nov. 2001 23:05#4

Okej då blev det bättre

Du får mellanlagra querystringen och avkoda den på precis motsatta sättet som du la dit koden. Sedan är det bara att hämta från databsen med det avkodade värdet. Om det inte skapar problem i SQL satsen oxå?

i-orMedlem sedan nov. 2001294 inlägg

15 nov. 2001 13:09#5

Hur lyckas man avkoda querystringen??

M@rtinMedlem sedan dec. 19992 085 inlägg

15 nov. 2001 13:12#6

Hur ser din kod ut för att _koda_ strängen?

Bara att göra tvärt om.

i-orMedlem sedan nov. 2001294 inlägg

15 nov. 2001 19:12#7

<% Function FixaTecken(strText) 
  
IF isNull(strText) Then 
FixaTecken = strText 
  
Else 
  
strText = Replace(strText,"'","''") 
strText = Replace(strText,"&#0124;","&#0124;") 
strText = Replace(strText, """",""") 
  
FixaTecken = strText 
End if 
  
End Function 
%>

alá webbmastern (idg)

sedan skriver jag:
TextSträng = FixaTecken(Request("textsträng"))

när jag fill koda något.

tack så mycket för din hjälp.

ps. vet fortfarande inte hur man gör detta tvärt om.

@ndersMedlem sedan juni 200032 967 inlägg

15 nov. 2001 19:22#8

Tvärtom är det bara att vända på argumenten till Replace().

Exempel, för att byta ut bengt mot sven:

strText = Replace(strText, "bengt", "sven")

Och för att byta tillbaka:

strText = Replace(strText, "sven", "bengt")

Mvh,