Multidesk.be » Forums » ASP » function werkt niet (gesloten)

Helpinformatie
Dit onderwerp bevindt zich in het archief.
Het is bijgevolg niet mogelijk er nog op te reageren.
  • Pagina
  • 1 van 1
  • RSS
  • Eerste ongelezen reactie
  • Plaats een reactie
  • Abonneer mij
  • Onderwerp sluiten
0 gasten lezen dit onderwerp.
^ Onderwerp geschreven door Suriv op maandag 9 oktober 2006 om 22:09:57.
Suriv's avatar
Multiviteit: 7607
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Wat is er mis aan deze function?
CODE
  1.  
  2. public function Vervang(strString)
  3.         dim txt
  4.         txt = ""
  5.        
  6.         txt = replace(strString, "", "é")
  7.         txt = replace(strString, "", "ë")
  8.         txt = replace(strString, "", "ï")
  9.        
  10.         Vervang = txt
  11. end function
  12.  


Als ik hem op de volgende manier aanroep:
CODE
  1.  
  2. dim strTekst
  3.  
  4. strTekst = ""
  5. Vervang(strTekst)
  6.  
  7. response.write(strTekst)
  8.  


Als ik dan in de sourcecode kijk, zie ik nog steeds staan , ipv & eacute;& euml;& iuml; ....:(
^ Reactie #1 geschreven door Suriv op dinsdag 10 oktober 2006 om 07:42:44.
Suriv's avatar
Multiviteit: 7607
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Kheb het nu wat anders gedaan (stomme fout eruitgehaald):
CODE
  1. public function Vervang(strString)
  2.         dim txt
  3.         txt = strString
  4.        
  5.         txt = replace(txt, "", "é")
  6.         txt = replace(txt, "", "ë")
  7.         txt = replace(txt, "", "ï")
  8.        
  9.         Vervang = txt
  10. end function


Maar nog steeds werkt het niet:s
^ Reactie #2 geschreven door Martijn op dinsdag 10 oktober 2006 om 08:35:26.
Martijn heeft nog geen avatar toegevoegd
Multiviteit: 13785
Beheerder
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Gaat dat niet via
CODE
  1. <%
  2. Server.HTMLencode("foo bar")
  3. %>
Met vriendelijke groeten,
Martijn Wouters
^ Reactie #3 geschreven door Suriv op dinsdag 10 oktober 2006 om 19:13:04.
Suriv's avatar
Multiviteit: 7607
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Huh, met server.htmlencode("") werkt het niet:s
Das trouwens wat ik nodig heb, maar het werkt niet....

Maar niet alleen dat, ook iets waarbij ik dit kan doen bv.
CODE
  1. public function Vervang(strString)
  2.     dim txt
  3.     txt = strString
  4.    
  5.     txt = replace(txt, "_", " ")
  6.     txt = replace(txt, "tekst", "<i>tekst</i>")
  7.    
  8.     Vervang = txt
  9. end function

Dus dat ik gelijk welke string door gelijk welke string kan vervangen.
Deze tekst werd het laatst bewerkt voor 2.59 % door Suriv op dinsdag 10 oktober 2006 om 19:13:23.
^ Reactie #4 geschreven door Martijn op dinsdag 10 oktober 2006 om 19:17:10.
Martijn heeft nog geen avatar toegevoegd
Multiviteit: 13785
Beheerder
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Lukt een gewone replace ook niet?
Met vriendelijke groeten,
Martijn Wouters
^ Reactie #5 geschreven door SMG op dinsdag 10 oktober 2006 om 19:29:27.
SMG's avatar
Multiviteit: 12000
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Dit is wel een serieuse omkeer van de replace functie (deze heb ik van een upload scriptje en zou ook moeten werken):
CODE
  1. Function SubstNoReg(initialStr, oldStr, newStr)
  2.         Dim currentPos, oldStrPos, skip
  3.         If IsNull(initialStr) Or Len(initialStr) = 0 Then
  4.                 SubstNoReg = ""
  5.                 ElseIf IsNull(oldStr) Or Len(oldStr) = 0 Then
  6.                         SubstNoReg = initialStr
  7.                 Else
  8.                         If IsNull(newStr) Then newStr = ""
  9.                         currentPos = 1
  10.                         oldStrPos = 0
  11.                         SubstNoReg = ""
  12.                         skip = Len(oldStr)
  13.                         Do While currentPos <= Len(initialStr)
  14.                                 oldStrPos = InStr(currentPos, initialStr, oldStr)
  15.                                 If oldStrPos = 0 Then
  16.                                         SubstNoReg = SubstNoReg & Mid(initialStr, currentPos, Len(initialStr) - currentPos + 1)
  17.                                         currentPos = Len(initialStr) + 1
  18.                                 Else
  19.                                         SubstNoReg = SubstNoReg & Mid(initialStr, currentPos, oldStrPos - currentPos) & newStr
  20.                                         currentPos = oldStrPos + skip
  21.                                 End If
  22.                         Loop
  23.         End If
  24. End Function

Dan roep je de functie aan via:
CODE
  1. Variabele = SubstNoReg(Variabele, "", "lalaboe")


Wel raar dat de replace functie niet werkt
^ Reactie #6 geschreven door Suriv op dinsdag 10 oktober 2006 om 19:48:05.
Suriv's avatar
Multiviteit: 7607
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Als ik dit doe:
CODE
  1. dim strTekst
  2.  
  3. strTekst = ""
  4. Replace(strTekst, "", "&eacute;")
  5.  
  6. response.write(strTekst)

Dan krijg ik wl de juiste output.

Maar met dit:
CODE
  1. function Vervang(strString)
  2.     dim txt
  3.     txt = strString
  4.    
  5.     txt = replace(strString, "", "&eacute;")
  6.    
  7.     Vervang = txt
  8. end function

en dan verder in pagina:
CODE
  1. vervang(strTekst)


Dan werkt het niet:s

rgens kan het gwn niet...
Normaalgezien zou dit:

Dixit

CODE
  1. function Vervang(strString)
  2.     dim txt
  3.     txt = strString
  4.    
  5.     txt = replace(strString, "", "&eacute;")
  6.    
  7.     Vervang = txt
  8. end function

en dan verder in pagina:
CODE
  1. vervang(strTekst)

Toch moeten werken...


@ smg: je code werkt wel, maar als ik zo voor elk woorddeel dat ik wil replacen zo'n nieuwe function moet gebruiken...
^ Reactie #7 geschreven door Martijn op dinsdag 10 oktober 2006 om 19:53:22.
Martijn heeft nog geen avatar toegevoegd
Multiviteit: 13785
Beheerder
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Vang je bij die functie vervang(strTekst) de output ook op?
Met vriendelijke groeten,
Martijn Wouters
^ Reactie #8 geschreven door Suriv op dinsdag 10 oktober 2006 om 19:55:38.
Suriv's avatar
Multiviteit: 7607
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Ja:
CODE
  1. vervang(strTekst)
  2. response.write(strTekst)


En daarna in de source code kijken, en daar zie ik ipv & eacute; een staan.
^ Reactie #9 geschreven door SMG op dinsdag 10 oktober 2006 om 20:10:37.
SMG's avatar
Multiviteit: 12000
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Eenmaal je de eerste code die ik gegeven heb in een extra inc bestand heb gezet en een include file doet in de HTML code
CODE
  1.  
  2. <!-- #include file ="replace.inc" -->
  3.  
mag je gerust gebruik maken van volgende regel:
CODE
  1. Variabele = SubstNoReg(Variabele, "", "lalaboe")

Dit is natuurlijk wel geen oplossing voor je probleem! Het is eerder het probleem ontwijken. De replace functie bestaat in ASP voor iets :p
^ Reactie #10 geschreven door Martijn op dinsdag 10 oktober 2006 om 20:10:45.
Martijn heeft nog geen avatar toegevoegd
Multiviteit: 13785
Beheerder
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid
Neen, dat klopt niet.

CODE
  1. strTekst = vervang(strTekst)
  2. response.write(strTekst)


Probeer dat eens :).
Met vriendelijke groeten,
Martijn Wouters
^ Reactie #11 geschreven door Suriv op dinsdag 10 oktober 2006 om 20:17:24.
Suriv's avatar
Multiviteit: 7607
Moderator
  • Bewerken
  • Citeren
  • Reageren
  • Verwijderen
  • Waarschuw een crewlid

Dixit

Dixit Martijn op 10/10/2006 20:10:45:
CODE
  1. strTekst = vervang(strTekst)
  2. response.write(strTekst)



Ah, crap, dat ik daar niet aan gedacht heb(blush)
Nu werkt het idd...
  • Pagina
  • 1 van 1
  • RSS
  • Eerste ongelezen reactie
  • Plaats een reactie
  • Abonneer mij
  • Onderwerp sluiten