Multi Inset to a Database

[MikeyHughes]

How can I Multi Inset to a Database? I have been working on but cant seem to get it right. I have a form with unique field names. I am having an issue where I can insert multi records but its inserting blank info too.


-- Form

<form name="inbound_form" action="Save.asp" method="post">
 
<table width="1226">
<tr>
  <td width="302" class="theader">Provider</td>
  <td width="302" class="theader">Number Type</td>
  <td width="302" class="theader">Network Carrier</td>
  <td width="302" class="theader">Number Function</td>
</tr>
<tr>
  <td><input name="NumberProvider1" type="text" class="textfield" id="NumberProvider" value="" /></td>
  <td><input name="NumberType1" type="text" class="textfield" id="NumberType1" value="" maxlength="" /></td>
  <td><input name="NetworkCarrier1" type="text" class="textfield" id="NetworkCarrier1" value="" /></td>
  <td><input name="NumberFunction1" type="text" class="textfield" id="NumberFunction1" value="" /></td>
  </tr>
<tr>
  <td><input name="NumberProvider2" type="text" class="textfield" id="NumberProvider2" value="" /></td>
  <td><input name="NumberType2" type="text" class="textfield" id="NumberType2" value="" maxlength="" /></td>
  <td><input name="NetworkCarrier2" type="text" class="textfield" id="NetworkCarrier2" value="" /></td>
  <td><input name="NumberFunction2" type="text" class="textfield" id="NumberFunction2" value="" /></td>
  </tr>
<tr>
  <td><input name="NumberProvider3" type="text" class="textfield" id="NumberProvider3" value="" /></td>
  <td><input name="NumberType3" type="text" class="textfield" id="NumberType3" value="" maxlength="" /></td>
  <td><input name="NetworkCarrier3" type="text" class="textfield" id="NetworkCarrier3" value="" /></td>
  <td><input name="NumberFunction3" type="text" class="textfield" id="NumberFunction3" value="" /></td>
  </tr>
<tr>
  <td><input name="NumberProvider4" type="text" class="textfield" id="NumberProvider4" value="" /></td>
  <td><input name="NumberType4" type="text" class="textfield" id="NumberType4" value="" maxlength="" /></td>
  <td><input name="NetworkCarrier4" type="text" class="textfield" id="NetworkCarrier4" value="" /></td>
  <td><input name="NumberFunction4" type="text" class="textfield" id="NumberFunction4" value="" /></td>
  </tr>
<td><input type="submit" name="hidden" id="Save" value="Save &amp; Close" /></td>
  </tr>
</table>
</form>

-- Code

<%    
    'Dealcare the variables 
            'Dim Conn4, Rs4, NumberProvider, NumberType, NextworkCarrier, NumberStatus, NumberFunction
 
            ' Open objects 
            Set Conn4 = Server.CreateObject("ADODB.Connection")
            Conn4.Open  "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db.mdb")
 
            'For row = 1 Request.Form("NumberProvider").count
            For row = 1 To 16
            NumberProvider = Left(Request.Form("NumberProvider" & row), 14)
            If IsNull(NumberProvider) OR IsEmpty(NumberProvider) Then Exit For
            NumberProvider = Left(Request.Form("NumberProvider" & Row),14)  
            NumberType = Left(Request.Form("NumberType" & Row),10)  
            NetworkCarrier = Left(Request.Form("NetworkCarrier"& Row),15)  
            NumberStatus = Left(Request.Form("NumberStatus"& Row),12)  
            NumberFunction =  Left(Request.Form("NumberFunction"& Row),14)  
 
            FootPrint_AddedDate = Now
 
            ' Check that field values that are null 
             Response.Write "<br/>"
            Response.Write (NumberProvider)
            Response.Write "<br/>"
            Response.Write (NumberType)
            Response.Write "<br/>"
            Response.Write (NetworkCarrier)
            Response.Write "<br/>"
            Response.Write (NumberStatus)
            'Response.Write "<br/>"
            Response.Write (NumberFunction)
            Response.Write "<br/>"
 
 
            sql4 = "INSERT INTO InventoryStockInbound (NumberProvider, NumberType, NetworkCarrier, NumberStatus, NumberFunction, FootPrint_AddedDate, ShowStock)" _
                    &"VALUES ('"&NumberProvider&"','"&NumberType&"','"&NetworkCarrier&"','"&NumberStatus&"','"&NumberFunction&"','"&FootPrint_AddedDate&"', True)"     
            'SQl4 Debug
            'Response.Write(sql4)
 
            Conn4.Execute sql4
            'End If
            Next
            Conn4 = Close
%>

[Rabbit]

Please use code tags when posting code.

You're only running one INSERT statement so it's only going to insert one row. If you want to insert multiple rows, you'll need to run it multiple times.