<% Dim strAncho strAncho = "style='width: 100%'" %> <textarea rows="2" name="algo" <% Response.Write strAncho %> ></textarea>