经典Asp + Ajax进销存

Question

我需要一张发票表格，

请帮我解释一下如何将所有的数据一次性插入发票表。

我正在使用文本框来获取项目的所有详细信息。

这里是从表中获取项目的细节的代码。

enter code here<% While ((Repeat1__numRows <> 0) AND (NOT Recordset1.EOF))%> 
      <tr> 
      <td><input name="dipatchid" type="text" id="dipatchid" value="<%=(Recordset1.Fields.Item("dispatchid").Value)%>" size="5" /></td> 
      <td><input name="dispatchdate" type="text" id="dispatchdate" value="<%=(Recordset1.Fields.Item("dis_date").Value)%>" /></td> 
      <td><input type="hidden" name="custid_" id="custid_" /> 
       <input name="From_" type="text" id="From_" value="<%=(Recordset1.Fields.Item("from_").Value)%>" /></td> 
      <td><input name="to_" type="text" id="to_" value="<%=(Recordset1.Fields.Item("To_").Value)%>" /></td> 
      <td><input name="hrs" type="text" id="hrs" value="<%=(Recordset1.Fields.Item("total_hrs").Value)%>" size="5" /></td> 
      <td><input name="rate_" type="text" id="rate_" size="8" /></td> 
      <td><input name="totalamt" type="text" id="totalamt" size="10" /></td> 
      <td><img src="imgs/error_icon.png" width="16" height="16" alt="Remove" /></td>    </tr> 
      <% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 Recordset1.MoveNext() Wend %> 

Answer 1

要做到这一点，你需要保持的两件事情轨迹：

• 是将要插入每一行的
• 的数据行数

这样做的窍门很简单。在显示数据时，用循环数增加一个变量。

<% 
iNumberOfRecords = 0 
Do Until Recordset1.EOF 
    %> 
    <tr> 
    <td> 
     <input name="dipatchid" type="text" id="..." value="<%=Recordset1("dispatchid")%>" /> 
    </td> 
    ... 
    </tr> 
    <% 
    iNumberOfRecords = iNumberOfRecords + 1 
Recordset1.MoveNext 
loop 
Recordset1.Close 
%>

在关闭<form>标记之前，将其放在隐藏字段中。

<input type="hidden" name="iNumberOfRecords" value="<%=iNumberOfRecords%>" />

---

接下来，您提交给，你循环iNumberOfRecords次插入的所有行的页面上。

<% 
for i = 1 to CInt(Request.Form("iNumberOfRecords")) 
    idOfRecord = GetFormValue("dipatchid", i) 
    otherField = GetFormValue("otherField", i) 

    SQL = "INSERT INTO tblInvoices(dispatchid, otherfield) VALUES (" & idOfRecord & ", " & otherfield & ")" 
    Connectionobject.Execute(SQL) 
next 

Function GetFormValue(sFormname, iIndex) 
    If Request.Form(sFormname).Count >= iIndex And iIndex > 0 Then 
    GetFormValue = Request.Form(sFormname)(iIndex) 
    Else 
    GetFormValue = "" 
    End If 
End Function 
%>

的(i)获取正确的Request.Form("...")项目适合你。