|
|
|
|
|
|
|
|
Dicas
|
|
|
ASP - Active Server Page (Miscelâneas)
|
|
 |
Título da Dica: Destacar texto em procura em VBScript
|
 |
|
|
|
Postada em 11/9/2007 por Vilmar Brazão
>>DESCOMENTE AS LINHAS DE SCRIPT PARA PODER USAR O EXEMPLO<<
<html>
<head>
<title>Destacar texto em procura</title>
</head>
<body>
'Troque SSscript ..... Por: script
<SSscript language="vbscript">
'Obs: para usar no ASP com banco de dados,
'Troque: strPSEUDORSCampo ..... Por: objRS("Campo")
' Dim CampoNaTela,strBusca,strPSEUDORSCampo
' strPSEUDORSCampo = "Frase eu gosto de procurar, e procurar, e depois procurar........"
' strBusca = "procurar"
' CampoNaTela = Replace(strPSEUDORSCampo,strBusca,"<span style='background-color: red;'><font color='white'>" & strBusca & "</font></span>")
' document.write(CampoNaTela)
</SSscript>
</body>
</html>
|
|
|
|
|
