exakt vad får du för problem?
Trådstart#1
Hejsan!
Är det någon som vet varför jag får problem med följande kod?:
Function fixatext(str)
fixatext = Replace(str, "[b]", "<b>")
End Function
Är väl säkert något skitfel som vanligt 
/Mika3l
Problem med Replace!
14 svar · 225 visningar · startad av Mika3l
Kan du ge något exempel där den inte fungerar som du förväntar dig?
Funkar inte om ett null värde eller en tom sträng "passas" in.
Function fixatext(str)
[b]If Len(str) = 0 Then Exit Function[/b]
fixatext = Replace(str, "[b]", "<b>")
End Function
Om det inte är det felet bör vi nog få lite mer info om felet som uppstår.
cya,
PatrikB
Men du PatrikB. Len(Null) blir Null och inte 0.
Man blir tvungen att skriva Len(str & "").
Det går även att skriva Replace(str & "", "", "<b>")
Jag får felmeddelandet Körningsfel i Microsoft VBScript (0x800A005E)
Ogiltig användning av Null: 'Replace'
fast posten är INTE tom!
Rad 4 är fixatext = Replace(str, "", "<b>").
LarsG: Ska använda det till ett forum.
/Mika3l
Kolla igen. Fältvärdet du skickar till funktionen verkar helt klart vara null, så jag skulle kontrollera värdet en gång till.
Mvh,
Det är inte tomt!
Vet inte varför det inte fungerar, knepigt som *pip*! 
Det är inget fel i koden då?
/Mika3l
Den kod du visar är det inget fel på.
Om du istället för att köra funktionen bara skriver ut värdet, hur ser det ut då?
Mvh,
Texten skrivs ut på sidan utan problem.
Om jag använder funktionen igen så får jag felmeddelandet igen(som jag skrev i mitt förra inlägg).
/Mika3l
Försöker du använda funktionen på ett pm-fält från en databas?
Det går bara att hämta dom en gång från ett recordset så du får lagra värdet i en lokal variabel först i så fall.
Ja, lägg text ifrån det fältet i en variabel som du sedan använder.