經典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("...")項目適合你。