<script runat="server">
 Public Sub Page_Load(sender As object, e As System.EventArgs)
 
  If Page.IsPostBack Then
   Editor1.SaveFile("/httpdocs/new/document.htm")
   textbox1.Text = Editor1.Text
  Else
   Editor1.LoadHtml("/httpdocs/new/document.htm")
  End If
  
 End Sub
 public Sub Submit(sender As object, e As System.EventArgs)
  Editor1.SaveFile("/httpdocs/new/document.htm")
  textbox1.Text = Editor1.Text 
 End Sub
</script>