请教在textarea中字符串，转换时首行的空格不能装换

请问在textarea中字符串，转换时首行的空格不能装换？
我将textarea中的字符存入数据库中时，使用了一个转换函数,代码如下：
function   convert(str)
if   str <> " "   then
str=replace(str,chr(13), " <br> ")
str=replace(str,chr(32), "&nbsp; ")
end   if
convert=str
end   function
其他字符转换正常，唯独首行加入的空格不能够转换，请问是为什么，如何解决。

例如：
          我爱我们的国家。
首行的两个空格无法存储

------解决方案--------------------
两种方法：
一种：是先输入数据（你自己手工排版好的），再在显示页时用函数转化
我写了一个函数，你可参考一下
<%
function keepformat(content)
if typename(content)= "Null " then
keepformat= " "
else
str=replace(content, " ", "&nbsp;&nbsp; ")
keepformat=replace(str,chr(13)+chr(10), " <br> ")
end if
end function
%>
显示直接调用：keepformat(你的内容)
二种就是你所说的，不过这样好像不是很好哦，个人建议而已