I have records where I need to replace one letter with another. Can I modify this highlighting code to do that?
What I need to do is to update my table of database where a column has to replace one letter with another.
WHat I have is the "insert into" statement where I duplicated the table (not shown below).
I need your advice on this.
Code:
<SCRIPT LANGUAGE="VBSCRIPT" RUNAT="SERVER">
Function Highlight(strText, strFind, strBefore, strAfter)
Dim nPos
Dim nLen
Dim nLenAll
nLen = Len(strFind)
nLenAll = nLen + Len(strBefore) + Len(strAfter) + 1
Highlight = strText
If nLen > 0 And Len(Highlight) > 0 Then
nPos = InStr(1, Highlight, strFind, 1)
Do While nPos > 0
Highlight = Left(Highlight, nPos - 1) & _
strBefore & Mid(Highlight, nPos, nLen) & strAfter &_
Mid(Highlight, nPos + nLen)
nPos = InStr(nPos + nLenAll, Highlight, strFind, 1)
Loop
End If
End Function
</SCRIPT>
<%
'OPTION EXPLICIT
Dim strText, strFind
strFind=Keyword
strText=RS("new_text_data")
strText= Highlight(strText, strFind,"<font color='red'><b>", "</b></font>")
Response.Write strText
%>
dBforums
>
I have records where I need to replace one letter with another.
03-10-05, 21:00
Linear Mode
