Forum
Adding data fields in order form - Από {dimhar}
Θα ηθελα σε μια φορμα παραγγελιας να πολλαπλασιαζεται η "ποσοτητα" με την "τιμη"
και να συμπληρωνεται αυτοματα σε ενα πεδιο σαν line total,καθως και αθροιζωνται ολα τα
πεδια σε ενα "γενικο συνολο"
Ολα αυτα θα τα εισαγω σε μια βαση(.mdb)
Η σελιδα που εχω κανει recordset τα προιοντα απο την βαση μου :
<%
Dim Conn, rs
Dim curDir
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.ConnectionTimeout = 15
Conn.CommandTimeout = 30
'MSCS.Open mscsManagerSite.DefaultConnectionString
curDir = Server.MapPath("\Dimitris\Dynamic Web Site\database\voutsinas.mdb")
Conn.Open "DBQ=" & curDir & ";Driver={Microsoft Access Driver (*.mdb)};"
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.Open "SELECT * FROM products ", conn
%>
<% Do While NOT rs.EOF %>
PRODUCT NAME
UNIT PRICE
QUANTITY
LINE TOTAL
">
">
<% rs.MoveNext %>
<% If rs.EOF Then Exit Do %>
<%
rs.MoveNext
Loop
%>
TOTAL
<%
rs.Close
Set rs=Nothing
Conn.Close
Set Conn = Nothing
%>
Απάντηση από:Alex
Κατέβασε ένα καλάθι από εδώ και δες τον τρόπο.
http://www.tip.gr/dev/downloads/showlink.asp?CatID=204&parentID=9
tip: Όποιος νομίζει ότι γνωρίζει τα πάντα είναι ενοχλητικός σε όλους και ειδικά σε όσους γνωρίζουν περισσότερα . * F5 για νέο tip