Ayuda con replace

[u_goldman]

No creo que se trate de un simple replace, tienes que parsear un poco tu cadena, aqui te dejo esta función, no la he probado pero con uno que otro cambio debería funcionar.

Código:

<%
Function AgregaDominio(cadena, caracter)
	Dim pos, cadena2, mi_dominio, cadena_dominio
	pos = instr(1, cadena, caracter) + 1
	cadena2 = mid(cadena, pos, len(cadena))
	mi_dominio = "http://www.midominio.com/"
	cadena_dominio = mid(cadena, 1, pos -1)
	cadena_dominio = cadena_dominio & mi_dominio & cadena2
	AgregaDominio = cadena_dominio
End Function

var = "Blalblabla...<img src=path/imagen.gif>blaaaa"
var = AgregaDominio(var, "=")
Response.Write var
%>

Salu2,