<%@ Language=VBScript %> <% ' VI 6.0 Scripting Object Model Enabled %> <% if StartPageProcessing() Then Response.End() %>
<% Sub thisPage_OnEnter() 'This function puts the page in add record mode when 'it comes up only if the Textbox1 was not filled in. The 'Textbox1 would not be filled in on the first visit 'so the add record runs, however on all other posts Textbox1 'would have data so the addRecord never runs. If IsEmpty(Request.Form("Textbox1").Item) then Recordset1.addRecord End if End Sub %> First Name: <% Textbox1.display %>
Test: <% Textbox2.display %>
<% btnSubmit.display %> <% ' VI 6.0 Scripting Object Model Enabled %> <% EndPageProcessing() %>