我有如下代码，我想在里面加入css样式，名为 txt12 请问怎样用呢？加到什么地方
Sub ShowJSCS()
if len(rs("ProductJ"))<>0 then
Response.Write(replace(rs("ProductJ"),chr(13),"<BR>"))
else
Response.Write(" ")
end if
End Sub

Response.Write("HTML代码"&replace(rs("ProductJ"),chr(13),"<BR>")&"HTML代码")