’

quote:

---

If you use a left-to-right language you don't need to do anything.

Otherwise, look here:
http://www.w3.org/TR/REC-CSS2/text.html#propdef-text-align

---

<textarea name="content<%=a%>" id="content<%=a%>" cols="100" rows="5" wrap="PHYSICAL" style="font-family:Verdana, Arial, Helvetica, sans-serif; text-align:left">
        <%
        
        if left(rulexml.selectnodes("rules").item(0).selectnodes("fare_rule_lines").item(a).selectnodes("content").item(0).text,15) <> "<table><tr><td>" then
        response.write "<table border=1><tr><td>"
        end if
        %> 
        <%=fix_characters(rulexml.selectnodes("rules").item(0).selectnodes("fare_rule_lines").item(a).selectnodes("content").item(0).text)%>
        <%
        ' if there is no end table tag then create one to end the table
        if right(rulexml.selectnodes("rules").item(0).selectnodes("fare_rule_lines").item(a).selectnodes("content").item(0).text,18) <> "</td></tr></table>" then
        response.write "</td></tr></table>"
        end if 
        %>
        </textarea>

        <textarea name="Content" cols="100" rows="6" wrap="PHYSICAL" style="font-family:Verdana, Arial, Helvetica, sans-serif; text-align:left"><%=trim(rs("Content"))%></textarea>

<table bgcolor="#ececec" border="1" bordercolor="#000000" align="center">
    <tr bordercolor="#ececec">
      <td colspan="3"><div align="center"><span class="style6">Rule <%=cint(a)+1%> </span></div></td>
    </tr>
    <tr bordercolor="#ececec">
      <td width="185"><div align="right" class="style3">Heading</div></td>
      <td width="1">&nbsp;</td>
      <td width="559"><div align="left">
      <!-- Insert the Heading into the textbox and remove all problematic characters e.g. Apostrophes and Colons -->
      <!-- Change to UpperCase and remove any whitespace -->
<input name="heading<%=a%>" id="heading<%=a%>" type="text" size="100" value="<%=fix_characters(ucase(trim(rulexml.selectnodes("rules").item(0).selectnodes("fare_rule_lines").item(a).selectnodes("heading").item(0).text)))%>" style="font-weight:bold; font-family:Verdana, Arial, Helvetica, sans-serif">
      </div></td>
    </tr>
    <tr bordercolor="#ececec">
      <td><div align="right" class="style3">Content</div></td>
      <td>&nbsp;</td>
      <td align="left"><div align="left">
        <textarea name="content<%=a%>" id="content<%=a%>" cols="100" rows="5" wrap="PHYSICAL" style="font-family:Verdana, Arial, Helvetica, sans-serif; text-align:left">
        <%
        
        if left(rulexml.selectnodes("rules").item(0).selectnodes("fare_rule_lines").item(a).selectnodes("content").item(0).text,15) <> "<table><tr><td>" then
        
            '... if the airline is CSA Czech Airlines then create a table 
            '... with a border
            if airline_code = "OK" then
            response.write "<table border=1 bordercolor=000000><tr>"
            else
            not_CSA_CzechAirlines = true
            response.write "<table><tr><td>" ' border=1 bordercolor=#000000
            end if
        
        end if
        %> 
        <%=fix_characters(rulexml.selectnodes("rules").item(0).selectnodes("fare_rule_lines").item(a).selectnodes("content").item(0).text)%>
        <%
        ' if there is no end table tag then create one to end the table
        if right(rulexml.selectnodes("rules").item(0).selectnodes("fare_rule_lines").item(a).selectnodes("content").item(0).text,18) <> "</td></tr></table>" then
        response.write "</td></tr></table>"
        end if 
        %>
        </textarea>
      </div></td>
    </tr>
    <% 'end if %>
    <tr bgcolor="#000000" height="3">
      <td colspan="3"></td>
    </tr>

  
 
<%
Set rs = con.Execute("select Max(RuleSeq) Ref from farerulelines where RuleId = '" &trim(request.form("contract_id"))& "' and CompanyId='"& comp_code &"'")
            'response.write "Ref = " & rs("Ref") & "<br>" 
            If isNull(rs("Ref")) Then
                iMaxKeyRef = 0
            Else
                iMaxKeyRef = CLng(rs("Ref"))
            End If
            iMaxKeyRef = iMaxKeyRef + 1
            fare_id = right("0000" & iMaxKeyRef, 4)     

'if count_rows = 0 then
set rs=con.execute("insert farerulelines (RuleId, RuleSeq, CompanyId) values ('" & trim(request.form("contract_id")) & "', '" & fare_id & "'  , '"& comp_code &"' )")
'response.Write ("insert farerulelines (RuleId, RuleSeq, CompanyId) values ('" & trim(request.form("contract_id")) & "', '" & fare_id & "'  , '"& comp_code &"' )")&"<br>"
set rs1=con.Execute ("update farerulelines set Heading = '"&fix_characters(request.form("heading"&a))&"', Content = '"&fix_characters(request.form("content"&a))&"' where RuleId='" & trim(request.form("contract_id")) & "' and RuleSeq ='" & fare_id & "' and CompanyId ='"& comp_code &"'")
'response.Write ("update farerulelines set Heading = '"&fixquotes(request.form("heading"&a))&"', Content = '"&fixquotes(request.form("content"&a))&"' where RuleId='" & trim(request.form("contract_id")) & "' and RuleSeq ='" & fare_id & "' and CompanyId ='"& comp_code &"'")
'end if
next 
' main loop
%>
 
    <tr>
      <td align="center" colspan="10">
      <div align="center">   
      <input type="hidden" name="show_extras" id="show_extras" value="no">    
<input type="submit" name="Submit" value="Submit" onmouseover="style.cursor='hand'">
<!-- onClick="<%'=response.Write("test")%>"-->
      </div></td>
    </tr>
    <% if show_extras = "no" then %>
    <tr>
      <td colspan="10">
      <div align="center">       
<a href="fareloaderrules_edit.asp?contract_id=<%=trim(request.Form("contract_id"))%>">VIEW</a>
      </div></td>
    </tr>
    <% end if %>
      </table>

<div id='markup' style='display: none;'>
<!-- ASP generated content goes here -->
</div>
<textarea id='whatever_name' name='whatever_name'></textarea>
<script type='text/javascript'>
     // Populate the textarea with the contents of the div.
     document.getElementById('whatever_name').value = document.getElementById('markup').innerHTML;
</script>