ASP表单提交数据到数据库成功，但是上面多出一行空记录

<%

      Dim OrderID,Name,Province,City,Address,Zip,Phon,Email
OrderID=Session("OrderID")
If OrderID="" Then OrderID=0
Name=trim(request.Form("Name"))
Province=trim(request.Form("Province"))
City=trim(request.Form("City"))
Address=trim(request.Form("Address"))
Zip=request.Form("Zip")
Phon=request.Form("Phon")
Email=request.Form("Email")

set rs=server.createobject("adodb.recordset")
sql="select * from Orders where OrderID="&OrderID
rs.open sql,Conn,1,3
 If rs.EOF Then
      rs.addnew
         rs("Name")=Name
         rs("Province")=Province
         rs("City")=City
         rs("Address")=Address
        rs("Zip")=Zip
         rs("Phon")=Phon
         rs("Email")=Email
        rs("Date")=Date()
        rs.update
    end If
         rs.MoveLast
   rs.Close
    Set rs=Nothing
   
   Set Conn=Nothing
%>