js控制textarea根据文字长度自动伸缩

function Textarea_Size(num,objname)
{
 var obj=document.getElementById(objname)
 if (parseInt(obj.rows)+num>=3) {
  obj.rows = parseInt(obj.rows) + num; 
 }
 if (num>0)
 {
  obj.width="90%";
 }
}

</script>

<form id="form1" name="form1" method="post" action="" onsubmit="return form1_onsubmit()">
  <table width="700" border="0" align="center">
    <tr>
      <td width="120" align="right">网站名称：</td>
      <td><input name="SiteName" type="text" value="<%=RsSiteConfig.getString("fSiteName")%>" size="40"/></td>
    </tr>
    <tr>
      <td align="right">网站网址：</td>
      <td><input name="SiteUrl" type="text" value="<%=RsSiteConfig.getString("fSiteUrl")%>" size="30"/>
      &nbsp;&nbsp;* 输入 http:// </td>
    </tr>

    <tr>
      <td align="right">公司名称：</td>
      <td><input name="SiteTitle" type="text" value="<%=RsSiteConfig.getString("fSiteTitle")%>" size="40" /></td>
    </tr>
 <tr>
      <td align="right">公司电话：</td>
   <td><input name="ftel" type="text" value="<%=RsSiteConfig.getString("ftel")%>" size="20" /></td>
    </tr>
 <tr>
      <td align="right">公司传真：</td>
   <td><input name="ffax" type="text" value="<%=RsSiteConfig.getString("ffax")%>" size="20" /></td>
    </tr>
    <tr>
      <td align="right">公司邮箱：</td>
      <td><input name="email" type="text" value="<%=RsSiteConfig.getString("email")%>" size="30" /></td>
    </tr>
 <tr>
      <td align="right">公司地址：</td>
      <td><input name="address" type="text" value="<%=RsSiteConfig.getString("address")%>" size="30" /></td>
    </tr>   
 <tr>
      <td align="right">邮   编：</td>
      <td><input name="fcode" type="text" value="<%=RsSiteConfig.getString("fcode")%>" size="15" /></td>
    </tr>   
    <tr>
      <td align="right">站点关键字:</td>
      <td><textarea name="MetaKeywords" cols="60" rows="6" id="MetaKeywords"><%=RsSiteConfig.getString("fMetaKeywords")%></textarea>
   <a href="javascript:Textarea_Size(-5,'MetaKeywords')" title="减小编辑区">
   <font face="Wingdings" size="3" color="#0000FF">ñ</font></a>
   <a href="javascript:Textarea_Size(5,'MetaKeywords')" title="增高编辑区">
   <font face="Wingdings" size="3" color="#0000FF">ò</font></a>
   </td>
    </tr>
    <tr>
      <td align="right">站点描述:</td>
      <td>
        <textarea name="MetaDescription" cols="60" rows="6" id="MetaDescription"><%=RsSiteConfig.getString("fMetaDescription")%></textarea>
     
   <a href="javascript:Textarea_Size(-5,'MetaDescription')" title="减小编辑区">
   <font face="Wingdings" size="3" color="#0000FF">ñ</font></a>
   <a href="javascript:Textarea_Size(5,'MetaDescription')" title="增高编辑区">
   <font face="Wingdings" size="3" color="#0000FF">ò</font></a>
   </td>
    </tr>
 

 
    <tr>
      <td></td>
      <td><input type="submit" name="Submit" value="修 改" />
        &nbsp;
      <input type="reset" name="Reset" value="重 置" /></td>
    </tr>
  </table>
</form>