こんにちは。入力した情報をデータベースに書き込んで、
別枠から履歴として表示させる処理を書いたのですが、
新しい情報を入力すると以前に登録してあるものも一緒に表示されてしまいます。以下がソースです。（幾分か省略してます)　
どこを直したら抜け出せるのでしょうか？どうかご教授お願いします。
<% Do While Not rsTemp.EOF
strSlipDate = FormatDateEx(rsTemp.Fields("slipdate").Value)
curSubTotal = rsTemp.Fields("amount").Value
curTotalTax = rsTemp.Fields("tax").Value
curTotal = rsTemp.Fields("total").Value
strRemark = rsTemp.Fields("remark").Value
Select Case ValEx(rsTemp.Fields("orderflag").Value)
Case 1
strOrderNote = "未処理"
Case 2
strOrderNote = "処理済"
End Select
strSQL = "SELECT " & _
"saldetails.rownumber,saldetails.itemcode,saldetails.quantity," & _
"items.name1 as ItemName,saldetails.totalprice,saldetails.tax " & _
"FROM sales,saldetails,items,customers " & _
"WHERE saldetails.itemcode=items.code " & _
"AND sales.id=saldetails.slipid " & _
"AND sales.cuscode=customers.code AND sales.orderflag > 0 " & _
"AND customers.code='" & strUserCode & "' " & _
"ORDER BY sales.id,saldetails.rownumber"
'Response.Write strSQL
Set rsTemp2 = cnMain.Execute(strSQL)%>
<% Do While Not rsTemp2.EOF
intRowNumber = ValEx(rsTemp2.Fields("rownumber").Value) + 1
strItemName = rsTemp2.Fields("ItemName").Value
curQuantity = rsTemp2.Fields("quantity").Value
curAmount = rsTemp2.Fields("totalprice").Value
curTax = rsTemp2.Fields("tax").Value%>
<% rsTemp2.MoveNext
Loop %>