Ini tampaknya berfungsi, meskipun saya hanya mencobanya pada satu string (yang memiliki set font di 2 tempat). Saya mulai dengan kode yang menghapus SEMUA html dan memodifikasinya untuk hanya mencari dan mengubah 'ukuran font:*'. Saya menduga akan ada masalah jika ukuran font 9 atau kurang (1 karakter) dan saya mengubahnya menjadi 10 (2 karakter), tetapi tampaknya berhasil juga.
ALTER FUNCTION [dbo].[udf_ChangeFont]
(@HTMLText VARCHAR(MAX), @FontSize VARCHAR(2))
RETURNS VARCHAR(MAX)
AS
BEGIN
DECLARE @Start INT
DECLARE @End INT
DECLARE @Length INT
SET @Start = CHARINDEX('font-size:',@HTMLText)
SET @End = CHARINDEX(';',@HTMLText,CHARINDEX('font-size:',@HTMLText))
SET @Length = (@End - @Start) + 1
WHILE @Start > 0
AND @End > 0
AND @Length > 0
BEGIN
SET @HTMLText = STUFF(@HTMLText,@Start,@Length,'font-size:' + @FontSize + ';')
SET @Start = CHARINDEX('font-size:',@HTMLText, @End+2)
SET @End = CHARINDEX(';',@HTMLText,CHARINDEX('font-size:',@HTMLText, @End+2))
SET @Length = (@End - @Start) + 1
END
RETURN LTRIM(RTRIM(@HTMLText))
END
