Solved

Buttons desapearing on asp generated from when updated???

Posted on 2004-08-26
6
226 Views
Last Modified: 2008-02-26
I have a form generated by ASP, it is an invoice (or a shopping cart) from witch user can adjust product quantities then click update, or just click delete to remove an item.

The problem is that when you press the Recalculate button (Recalculer in french) the buttons sometimes disapears but not always.

Here is some code, the document name is cart.asp

<%
If Session("Authenticated")=0 then
      Response.Redirect("login.asp")
end if

<.......some long html here.............>
<......here I get the action to do, wich item to update and quantity to add...........>

IF Request.QueryString("action")="add" THEN
      item=Request.QueryString("item")
      qtt=Request.QueryString("qtt")

      MySQL="SELECT * FROM DetailsCommande WHERE NoComm=" & CommandeRS.fields("NoCommande") & " AND UPC='" & item & "'"
      SET ProductExists=MyConn.Execute(MySQL)
      
      IF ProductExists.EOF THEN
            MySQL="INSERT INTO DetailsCommande (NoComm, UPC, Quantite) VALUES ('" & CommandeRS.fields("NoCommande") & "', '" & item & "', '" & qtt & "')"
            MyConn.Execute(MySQL)
      ELSE
            MySQL="SELECT * FROM DetailsCommande WHERE UPC='" & item & "'"
            Set DetailsCommande=MyConn.Execute(MySQL)
            oldqtt=DetailsCommande.fields("Quantite")
            MySQL="UPDATE DetailsCommande SET Quantite=" & qtt+oldqtt & " WHERE UPC='" & item & "'"
            MyConn.Execute(MySQL)
      END IF
END IF

<.............here is what to do if the user clicked Recalculate................>

IF Request.QueryString("SUBMIT")="Recalculer" THEN
      MySQL="UPDATE DetailsCommande SET Quantite=" & Request.QueryString("qtt") & " WHERE UPC='" & Request.QueryString("item") & "'"
      MyConn.Execute(MySQL)
      Response.Redirect("cart.asp")
END IF

MySQL="SELECT * FROM DetailsCommande WHERE NoComm=" & CommandeRS.fields("NoCommande")
Set DetailsRS=MyConn.Execute(MySQL)

%>

<..................there is a lot of html table setup here...........>
<.................And down here is the problematic code (I suppose).............>

<%
      MySQL="SELECT D.UPC, P.NomProduit, D.Quantite, P.PrixUnit, P.PrixUnit*D.Quantite AS TotalUnit FROM DetailsCommande AS D, Produits AS P WHERE P.UPC=D.UPC AND D.NoComm=" & CommandeRS.fields("NoCommande") & " AND D.Quantite < 10"
      Set DetailsRS=MyConn.Execute(MySQL)
      WHILE NOT DetailsRS.EOF
%>
 <FORM ACTION=cart.asp METHOD=GET>
  <tr height=23>
  <td height=17 class=xl58 style='height:12.75pt'>|</td>
  <td colspan=2 class=xl33 x:num="301.02100000000002"><% Response.Write(DetailsRS.fields("UPC")) %><INPUT TYPE=HIDDEN NAME=item VALUE=<%=DetailsRS.fields("UPC")%>></td>
  <td class=xl58>|</td>
  <td colspan=5 class=xl88 width=284 style='width:215pt'><% Response.Write(DetailsRS.fields("NomProduit")) %></td>
  <td class=xl58>|</td>
  <td align=right x:num><INPUT SIZE=3 TYPE=TEXT NAME=qtt VALUE=<%=DetailsRS.fields("Quantite")%>></td>
  <td class=xl58>|</td>
  <td class=xl67 x:num="3.5"><% Response.Write(FormatCurrency(DetailsRS.fields("PrixUnit"))) %></td>
  <td class=xl68>|</td>
  <td class=xl67 x:num="35"><% Response.Write(FormatCurrency(DetailsRS.fields("TotalUnit"))) %></td>
  <td class=xl59>|</td>
  <td class=xl88 colspan=500><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE="Recalculer"><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE=Suprimer></td>
 </FORM>
 </tr>      

<%
      Items=Items+DetailsRS.fields("Quantite")
      Total=Total+DetailsRS.fields("quantite")*DetailsRS.fields("PrixUnit")
      DetailsRS.MoveNext
      WEND


Any solution to why these buttons desapear will be apreciated.

If you want to try it, I setup a test account so you can login to that page.
go to www.electroniquehifi.com/login.asp
then put EE as login and EE as password
after you logged in, order any product there and you will get to the problematic shopping cart...
Don't worry, I wont charge you the price you will see in the shopping cart.

By the way, page is in French so if you have any problem understanding something on the page, just ask me.

Thank you in advance...
0
Comment
Question by:Valadas2
  • 3
  • 3
6 Comments
 
LVL 22

Accepted Solution

by:
neeraj523 earned 500 total points
ID: 11909796
Hello

This is eth formatting problem in HTML tags.. This page is not formatted properly.. If u provide me full code of the page.. i an try to reformat it for u..

Still trying to find if u can sort this issue without reformatt whole page..

neerah523
0
 
LVL 22

Expert Comment

by:neeraj523
ID: 11909807

Try replacing part of ur code with this

<%
WHILE NOT DetailsRS.EOF
%>
 <FORM ACTION=cart.asp METHOD=GET>
  <tr height=23>
  <td height=17 class=xl58 style='height:12.75pt'>|</td>
  <td colspan=2 class=xl33 x:num="301.02100000000002"><% Response.Write(DetailsRS.fields("UPC")) %><INPUT TYPE=HIDDEN NAME=item VALUE=<%=DetailsRS.fields("UPC")%>></td>
  <td class=xl58>|</td>
  <td colspan=5 class=xl88 width=284 style='width:215pt'><% Response.Write(DetailsRS.fields("NomProduit")) %></td>
  <td class=xl58>|</td>
  <td align=right x:num><INPUT SIZE=3 TYPE=TEXT NAME=qtt VALUE=<%=DetailsRS.fields("Quantite")%>></td>
  <td class=xl58>|</td>
  <td class=xl67 x:num="3.5"><% Response.Write(FormatCurrency(DetailsRS.fields("PrixUnit"))) %></td>
  <td class=xl68>|</td>
  <td class=xl67 x:num="35"><% Response.Write(FormatCurrency(DetailsRS.fields("TotalUnit"))) %></td>
  <td class=xl59>|</td>
  <td class=xl88 colspan=500><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE="Recalculer"><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE=Suprimer></td>
 </tr>    
 </FORM>

<%
     Items=Items+DetailsRS.fields("Quantite")
%>

neeraj523
0
 

Author Comment

by:Valadas2
ID: 11910086
Ok, I tried to swap those </tr> and </form> but still the same problem.

This file is huge because it as been exported by MS Exel and modified with ASP.

Let me post it anyway...
Here it goes:

<html xmlns:o="urn:schemas-microsoft-com:office:office"
xmlns:x="urn:schemas-microsoft-com:office:excel"
xmlns="http://www.w3.org/TR/REC-html40">

<head>
<meta http-equiv=Content-Type content="text/html; charset=windows-1252">
<meta name=ProgId content=Excel.Sheet>
<meta name=Generator content="Microsoft Excel 10">
<link rel=File-List href="cart2_fichiers/filelist.xml">
<link rel=Edit-Time-Data href="cart2_fichiers/editdata.mso">
<link rel=OLE-Object-Data href="cart2_fichiers/oledata.mso">
<!--[if gte mso 9]><xml>
 <o:DocumentProperties>
  <o:Author>Daniel Valadas</o:Author>
  <o:LastAuthor>Daniel Valadas</o:LastAuthor>
  <o:LastPrinted>2004-08-24T03:53:01Z</o:LastPrinted>
  <o:Created>2004-08-23T02:52:46Z</o:Created>
  <o:LastSaved>2004-08-24T04:01:41Z</o:LastSaved>
  <o:Company>Électronique Hi-Fi</o:Company>
  <o:Version>10.3311</o:Version>
 </o:DocumentProperties>
 <o:OfficeDocumentSettings>
  <o:DownloadComponents/>
  <o:LocationOfComponents HRef="file:///E:\"/>
 </o:OfficeDocumentSettings>
</xml><![endif]-->
<style>
<!--table
      {mso-displayed-decimal-separator:"\.";
      mso-displayed-thousand-separator:" ";}
@page
      {margin:0in 0in 0in 0in;
      mso-header-margin:0in;
      mso-footer-margin:0in;
      mso-horizontal-page-align:center;
      mso-vertical-page-align:center;}
tr
      {mso-height-source:auto;}
col
      {mso-width-source:auto;}
br
      {mso-data-placement:same-cell;}
.style21
      {color:blue;
      font-size:10.0pt;
      font-weight:400;
      font-style:normal;
      text-decoration:underline;
      text-underline-style:single;
      font-family:Arial;
      mso-generic-font-family:auto;
      mso-font-charset:0;
      mso-style-name:"Lien hypertexte";
      mso-style-id:8;}
a:link
      {color:blue;
      font-size:10.0pt;
      font-weight:400;
      font-style:normal;
      text-decoration:underline;
      text-underline-style:single;
      font-family:Arial;
      mso-generic-font-family:auto;
      mso-font-charset:0;}
a:visited
      {color:purple;
      font-size:10.0pt;
      font-weight:400;
      font-style:normal;
      text-decoration:underline;
      text-underline-style:single;
      font-family:Arial;
      mso-generic-font-family:auto;
      mso-font-charset:0;}
.style0
      {mso-number-format:General;
      text-align:general;
      vertical-align:bottom;
      white-space:nowrap;
      mso-rotate:0;
      mso-background-source:auto;
      mso-pattern:auto;
      color:windowtext;
      font-size:10.0pt;
      font-weight:400;
      font-style:normal;
      text-decoration:none;
      font-family:Arial;
      mso-generic-font-family:auto;
      mso-font-charset:0;
      border:none;
      mso-protection:locked visible;
      mso-style-name:Normal;
      mso-style-id:0;}
td
      {mso-style-parent:style0;
      padding-top:1px;
      padding-right:1px;
      padding-left:1px;
      mso-ignore:padding;
      color:windowtext;
      font-size:10.0pt;
      font-weight:400;
      font-style:normal;
      text-decoration:none;
      font-family:Arial;
      mso-generic-font-family:auto;
      mso-font-charset:0;
      mso-number-format:General;
      text-align:general;
      vertical-align:bottom;
      border:none;
      mso-background-source:auto;
      mso-pattern:auto;
      mso-protection:locked visible;
      white-space:nowrap;
      mso-rotate:0;}
.xl24
      {mso-style-parent:style0;
      mso-number-format:"True\/False";}
.xl25
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ _$";}
.xl26
      {mso-style-parent:style0;
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:black gray-75;}
.xl27
      {mso-style-parent:style0;
      border-top:1.5pt solid windowtext;
      border-right:1.5pt solid windowtext;
      border-bottom:none;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:black gray-75;}
.xl28
      {mso-style-parent:style0;
      mso-number-format:"True\/False";
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:black gray-75;}
.xl29
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ _$";
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:black gray-75;}
.xl30
      {mso-style-parent:style0;
      font-size:16.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;}
.xl31
      {mso-style-parent:style0;
      font-size:16.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      text-align:left;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl32
      {mso-style-parent:style0;
      font-size:16.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      text-align:right;}
.xl33
      {mso-style-parent:style0;
      text-align:left;}
.xl34
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl35
      {mso-style-parent:style0;
      text-align:right;}
.xl36
      {mso-style-parent:style0;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl37
      {mso-style-parent:style21;
      color:blue;
      text-decoration:underline;
      text-underline-style:single;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl38
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl39
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:1.5pt solid windowtext;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:auto none;}
.xl40
      {mso-style-parent:style0;
      mso-number-format:"True\/False";
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl41
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ _$";
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl42
      {mso-style-parent:style0;
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:auto none;}
.xl43
      {mso-style-parent:style0;
      border-top:1.5pt solid windowtext;
      border-right:1.5pt solid windowtext;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl44
      {mso-style-parent:style0;
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl45
      {mso-style-parent:style0;
      text-align:left;
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl46
      {mso-style-parent:style0;
      text-align:left;
      border-top:1.5pt solid windowtext;
      border-right:1.5pt solid windowtext;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl47
      {mso-style-parent:style0;
      text-align:left;
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:auto none;}
.xl48
      {mso-style-parent:style0;
      mso-number-format:"True\/False";
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl49
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ _$";
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl50
      {mso-style-parent:style0;
      border-top:none;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:auto none;}
.xl51
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:auto none;}
.xl52
      {mso-style-parent:style0;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:none;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl53
      {mso-style-parent:style0;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:auto none;}
.xl54
      {mso-style-parent:style0;
      font-size:8.0pt;
      text-align:center;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl55
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl56
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:1.5pt solid windowtext;
      background:black;
      mso-pattern:auto none;}
.xl57
      {mso-style-parent:style0;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl58
      {mso-style-parent:style0;
      text-align:center;}
.xl59
      {mso-style-parent:style0;
      mso-number-format:"True\/False";
      text-align:center;}
.xl60
      {mso-style-parent:style0;
      text-align:center;
      border-top:none;
      border-right:none;
      border-bottom:.5pt solid windowtext;
      border-left:none;
      background:silver;
      mso-pattern:auto none;}
.xl61
      {mso-style-parent:style0;
      font-size:12.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      text-align:center;
      border-top:none;
      border-right:none;
      border-bottom:.5pt solid windowtext;
      border-left:none;
      background:silver;
      mso-pattern:auto none;}
.xl62
      {mso-style-parent:style0;
      font-size:12.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      mso-number-format:"True\/False";
      text-align:center;
      border-top:none;
      border-right:none;
      border-bottom:.5pt solid windowtext;
      border-left:none;
      background:silver;
      mso-pattern:auto none;}
.xl63
      {mso-style-parent:style0;
      font-size:12.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      mso-number-format:"\#\,\#\#0\.00\\ _$";
      text-align:center;
      border-top:none;
      border-right:none;
      border-bottom:.5pt solid windowtext;
      border-left:none;
      background:silver;
      mso-pattern:auto none;}
.xl64
      {mso-style-parent:style0;
      font-size:12.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;}
.xl65
      {mso-style-parent:style0;
      font-size:12.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      mso-number-format:"True\/False";}
.xl66
      {mso-style-parent:style0;
      font-size:12.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      mso-number-format:"\#\,\#\#0\.00\\ _$";}
.xl67
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";
      text-align:right;}
.xl68
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";
      text-align:center;}
.xl69
      {mso-style-parent:style0;
      color:blue;
      mso-number-format:"True\/False";
      text-align:center;}
.xl70
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";}
.xl71
      {mso-style-parent:style0;
      text-align:center;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl72
      {mso-style-parent:style0;
      mso-number-format:"True\/False";
      text-align:center;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl73
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl74
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";
      text-align:center;
      border-top:none;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;
      background:black;
      mso-pattern:auto none;}
.xl75
      {mso-style-parent:style0;
      mso-number-format:Percent;
      text-align:right;}
.xl76
      {mso-style-parent:style0;
      font-weight:700;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";
      text-align:right;
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:1.5pt solid windowtext;}
.xl77
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";
      text-align:center;
      border-top:1.5pt solid windowtext;
      border-right:none;
      border-bottom:1.5pt solid windowtext;
      border-left:none;}
.xl78
      {mso-style-parent:style0;
      font-weight:700;
      mso-number-format:"\#\,\#\#0\.00\\ \0022$\0022";
      border-top:1.5pt solid windowtext;
      border-right:1.5pt solid windowtext;
      border-bottom:1.5pt solid windowtext;
      border-left:none;}
.xl79
      {mso-style-parent:style0;
      font-size:16.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      text-align:left;}
.xl80
      {mso-style-parent:style0;
      font-size:16.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      text-align:left;
      border-top:none;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;}
.xl81
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:1.5pt solid black;
      border-bottom:none;
      border-left:none;}
.xl82
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;}
.xl83
      {mso-style-parent:style0;
      mso-number-format:"\#\,\#\#0\.00\\ _$";
      text-align:center;}
.xl84
      {mso-style-parent:style21;
      color:blue;
      text-decoration:underline;
      text-underline-style:single;
      text-align:left;}
.xl85
      {mso-style-parent:style21;
      color:blue;
      text-decoration:underline;
      text-underline-style:single;
      text-align:left;
      border-top:none;
      border-right:1.5pt solid black;
      border-bottom:none;
      border-left:none;}
.xl86
      {mso-style-parent:style0;
      font-size:8.0pt;
      text-align:center;
      vertical-align:middle;
      border-top:none;
      border-right:1.5pt solid windowtext;
      border-bottom:none;
      border-left:none;
      background:silver;
      mso-pattern:auto none;
      white-space:normal;}
.xl87
      {mso-style-parent:style0;
      mso-number-format:"True\/False";
      text-align:right;}
.xl88
      {mso-style-parent:style0;
      text-align:left;
      white-space:normal;}
.xl89
      {mso-style-parent:style0;
      text-align:left;
      border-top:none;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;
      white-space:normal;}
.xl90
      {mso-style-parent:style0;
      text-align:center;
      vertical-align:middle;
      border-top:none;
      border-right:none;
      border-bottom:none;
      border-left:1.5pt solid windowtext;
      background:silver;
      mso-pattern:auto none;
      white-space:normal;}
.xl91
      {mso-style-parent:style0;
      text-align:center;
      vertical-align:middle;
      background:silver;
      mso-pattern:auto none;
      white-space:normal;}
.xl92
      {mso-style-parent:style0;
      font-size:16.0pt;
      font-weight:700;
      font-family:Arial, sans-serif;
      mso-font-charset:0;
      text-align:left;
      border-top:none;
      border-right:1.5pt solid black;
      border-bottom:none;
      border-left:none;}
-->
</style>
<!--[if gte mso 9]><xml>
 <x:ExcelWorkbook>
  <x:ExcelWorksheets>
   <x:ExcelWorksheet>
    <x:Name>Feuil1</x:Name>
    <x:WorksheetOptions>
     <x:FitToPage/>
     <x:FitToPage/>
     <x:DefaultColWidth>10</x:DefaultColWidth>
     <x:Print>
      <x:ValidPrinterInfo/>
      <x:HorizontalResolution>-3</x:HorizontalResolution>
      <x:VerticalResolution>0</x:VerticalResolution>
     </x:Print>
     <x:PageBreakZoom>60</x:PageBreakZoom>
     <x:Selected/>
     <x:Panes>
      <x:Pane>
       <x:Number>3</x:Number>
       <x:ActiveRow>13</x:ActiveRow>
       <x:ActiveCol>18</x:ActiveCol>
      </x:Pane>
     </x:Panes>
     <x:ProtectContents>False</x:ProtectContents>
     <x:ProtectObjects>False</x:ProtectObjects>
     <x:ProtectScenarios>False</x:ProtectScenarios>
    </x:WorksheetOptions>
    <x:PublishObjects>
     <x:PublishObject>
      <x:Id>31712</x:Id>
      <x:DivID>cart2_31712</x:DivID>
      <x:SourceType>SourceSheet</x:SourceType>
      <x:HtmlType>HtmlStatic</x:HtmlType>
      <x:Location HRef="C:\Inetpub\work\cart3.asp.htm"/>
     </x:PublishObject>
    </x:PublishObjects>
   </x:ExcelWorksheet>
  </x:ExcelWorksheets>
  <x:WindowHeight>12270</x:WindowHeight>
  <x:WindowWidth>15195</x:WindowWidth>
  <x:WindowTopX>120</x:WindowTopX>
  <x:WindowTopY>30</x:WindowTopY>
  <x:ProtectStructure>False</x:ProtectStructure>
  <x:ProtectWindows>False</x:ProtectWindows>
 </x:ExcelWorkbook>
 <x:ExcelName>
  <x:Name>Print_Area</x:Name>
  <x:SheetIndex>1</x:SheetIndex>
  <x:Formula>=Feuil1!$A$2:$P$34</x:Formula>
 </x:ExcelName>
</xml><![endif]-->
</head>

<body link=blue vlink=purple>

<%
If Session("Authenticated")=0 then
      Response.Redirect("login.asp")
end if

Set MyConn=Server.CreateObject("ADODB.Connection")
MyConn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;" & _
"DATA SOURCE=" & server.mappath(".\Bitnit.mdb")



MySQL="SELECT * FROM Clients WHERE Login='" & Session("User") & "'"
Set ClientRS=MyConn.Execute(MySQL)

MySQL="SELECT * FROM Commandes WHERE NoClient=" & ClientRS.fields("NoClient") & " AND Statut='Incomplète'"
Set CommandeRS=MyConn.Execute(MySQL)
If CommandeRS.EOF Then
      MySQL="INSERT INTO Commandes (NoClient, Statut) VALUES ('" & ClientRS.fields("NoClient") & "', 'Incomplète')"
      MyConn.Execute(MySQL)
      MySQL="SELECT * FROM Commandes WHERE NoClient=" & ClientRS.fields("NoClient") & " AND Statut='Incomplète'"
      Set CommandeRS=MyConn.Execute(MySQL)
end if

IF Request.QueryString("action")="add" THEN
      item=Request.QueryString("item")
      qtt=Request.QueryString("qtt")

      MySQL="SELECT * FROM DetailsCommande WHERE NoComm=" & CommandeRS.fields("NoCommande") & " AND UPC='" & item & "'"
      SET ProductExists=MyConn.Execute(MySQL)
      
      IF ProductExists.EOF THEN
            MySQL="INSERT INTO DetailsCommande (NoComm, UPC, Quantite) VALUES ('" & CommandeRS.fields("NoCommande") & "', '" & item & "', '" & qtt & "')"
            MyConn.Execute(MySQL)
      ELSE
            MySQL="SELECT * FROM DetailsCommande WHERE UPC='" & item & "'"
            Set DetailsCommande=MyConn.Execute(MySQL)
            oldqtt=DetailsCommande.fields("Quantite")
            MySQL="UPDATE DetailsCommande SET Quantite=" & qtt+oldqtt & " WHERE UPC='" & item & "'"
            MyConn.Execute(MySQL)
      END IF
END IF

IF Request.QueryString("SUBMIT")="Recalculer" THEN
      MySQL="UPDATE DetailsCommande SET Quantite=" & Request.QueryString("qtt") & " WHERE UPC='" & Request.QueryString("item") & "'"
      MyConn.Execute(MySQL)
      Response.Redirect("cart.asp")
END IF

MySQL="SELECT * FROM DetailsCommande WHERE NoComm=" & CommandeRS.fields("NoCommande")
Set DetailsRS=MyConn.Execute(MySQL)



%>


<table x:str border=0 cellpadding=0 cellspacing=0 width=600 style='border-collapse:
 collapse;table-layout:fixed;width:506pt'>
 <col width=6 style='mso-width-source:userset;mso-width-alt:219;width:5pt'>
 <col width=15 style='mso-width-source:userset;mso-width-alt:548;width:11pt'>
 <col width=70 style='mso-width-source:userset;mso-width-alt:2560;width:53pt'>
 <col width=6 style='mso-width-source:userset;mso-width-alt:219;width:5pt'>
 <col width=253 style='mso-width-source:userset;mso-width-alt:9252;width:190pt'>
 <col width=6 span=3 style='mso-width-source:userset;mso-width-alt:219;
 width:5pt'>
 <col width=13 style='mso-width-source:userset;mso-width-alt:475;width:10pt'>
 <col width=6 style='mso-width-source:userset;mso-width-alt:219;width:5pt'>
 <col class=xl24 width=67 style='mso-width-source:userset;mso-width-alt:2450;
 width:50pt'>
 <col class=xl24 width=6 style='mso-width-source:userset;mso-width-alt:219;
 width:5pt'>
 <col class=xl25 width=65 style='mso-width-source:userset;mso-width-alt:2377;
 width:49pt'>
 <col class=xl25 width=6 style='mso-width-source:userset;mso-width-alt:219;
 width:5pt'>
 <col class=xl25 width=82 style='mso-width-source:userset;mso-width-alt:2998;
 width:62pt'>
 <col width=6 style='mso-width-source:userset;mso-width-alt:219;width:5pt'>
 <col width=48 style='mso-width-source:userset;mso-width-alt:1755;width:36pt'>
 <tr height=18 style='height:13.5pt'>
  <td height=18 width=6 style='height:13.5pt;width:5pt'></td>
  <td width=15 style='width:11pt'></td>
  <td width=70 style='width:53pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=253 style='width:190pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=13 style='width:10pt'></td>
  <td width=6 style='width:5pt'></td>
  <td class=xl24 width=67 style='width:50pt'></td>
  <td class=xl24 width=6 style='width:5pt'></td>
  <td class=xl25 width=65 style='width:49pt'></td>
  <td class=xl25 width=6 style='width:5pt'></td>
  <td class=xl25 width=82 style='width:62pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=48 style='width:36pt'></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 class=xl26 style='height:5.1pt'><a name="Print_Area">&nbsp;</a></td>
  <td class=xl26>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td class=xl27>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td class=xl28>&nbsp;</td>
  <td class=xl28>&nbsp;</td>
  <td class=xl29>&nbsp;</td>
  <td class=xl29>&nbsp;</td>
  <td class=xl29>&nbsp;</td>
  <td class=xl26>&nbsp;</td>
  <td></td>
 </tr>
 <tr class=xl30 height=27 style='height:20.25pt'>
  <td height=27 class=xl30 style='height:20.25pt'></td>
  <td colspan=6 class=xl79 style='border-right:1.5pt solid black'>Électronique
  Hi-Fi</td>
  <td class=xl31>&nbsp;</td>
  <td colspan=6 class=xl80 style='border-left:none'>Commande:</td>
  <td class=xl32 x:num><% Response.Write(CommandeRS.fields("NoCommande")) %></td>
  <td colspan=2 class=xl30 style='mso-ignore:colspan'></td>
 </tr>
 <tr height=17 style='height:12.75pt'>
  <td height=17 style='height:12.75pt'></td>
  <td colspan=6 class=xl33 style='border-right:1.5pt solid black'>7999 Boul.
  des Galeries d'Anjou</td>
  <td class=xl34>&nbsp;</td>
  <td colspan=2 style='mso-ignore:colspan'></td>
  <td colspan=2 class=xl24 style='mso-ignore:colspan'></td>
  <td colspan=3 class=xl35>2004-08-18<span style='mso-spacerun:yes'>  
  </span>7:41PM</td>
  <td colspan=2 style='mso-ignore:colspan'></td>
 </tr>
 <tr height=17 style='height:12.75pt'>
  <td height=17 style='height:12.75pt'></td>
  <td colspan=6 class=xl33 style='border-right:1.5pt solid black'>Anjou,
  Québec<span style='mso-spacerun:yes'>  </span>H1M 1W9</td>
  <td class=xl34>&nbsp;</td>
  <td colspan=2 style='mso-ignore:colspan'></td>
  <td colspan=2 class=xl24 style='mso-ignore:colspan'></td>
  <td colspan=3 class=xl25 style='mso-ignore:colspan'></td>
  <td colspan=2 style='mso-ignore:colspan'></td>
 </tr>
 <tr height=17 style='height:12.75pt'>
  <td height=17 style='height:12.75pt'></td>
  <td colspan=6 class=xl33 style='border-right:1.5pt solid black'>Téléphone:
  (514) 352-4434<span style='mso-spacerun:yes'>   </span>Fax: (514) 352-5534</td>
  <td class=xl34>&nbsp;</td>
  <td colspan=4 class=xl82 style='border-left:none'>Statut:</td>
  <td colspan=3 class=xl83><% Response.Write(CommandeRS.fields("Statut")) %></td>
  <td colspan=2 style='mso-ignore:colspan'></td>
 </tr>
 <tr height=17 style='height:12.75pt'>
  <td height=17 style='height:12.75pt'></td>
  <td colspan=6 class=xl84 style='border-right:1.5pt solid black'><a
  href="http://www.electroniquehifi.com/">www.electroniquehifi.com</a></td>
  <td class=xl34>&nbsp;</td>
  <td colspan=2 style='mso-ignore:colspan'></td>
  <td colspan=2 class=xl24 style='mso-ignore:colspan'></td>
  <td colspan=3 class=xl25 style='mso-ignore:colspan'></td>
  <td colspan=2 style='mso-ignore:colspan'></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 class=xl36 style='height:5.1pt'>&nbsp;</td>
  <td class=xl37><u style='visibility:hidden;mso-ignore:visibility'>&nbsp;</u></td>
  <td class=xl37><u style='visibility:hidden;mso-ignore:visibility'>&nbsp;</u></td>
  <td class=xl38>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl39>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl40>&nbsp;</td>
  <td class=xl40>&nbsp;</td>
  <td class=xl41>&nbsp;</td>
  <td class=xl41>&nbsp;</td>
  <td class=xl41>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=19 style='height:14.25pt'>
  <td height=19 colspan=3 style='height:14.25pt;mso-ignore:colspan'></td>
  <td colspan=5 class=xl33 style='mso-ignore:colspan'></td>
  <td colspan=2 style='mso-ignore:colspan'></td>
  <td colspan=2 class=xl24 style='mso-ignore:colspan'></td>
  <td colspan=3 class=xl25 style='mso-ignore:colspan'></td>
  <td colspan=2 style='mso-ignore:colspan'></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 class=xl42 style='height:5.1pt'>&nbsp;</td>
  <td class=xl43>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl45>&nbsp;</td>
  <td class=xl45>&nbsp;</td>
  <td class=xl46>&nbsp;</td>
  <td class=xl33></td>
  <td class=xl47>&nbsp;</td>
  <td class=xl43>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl48>&nbsp;</td>
  <td class=xl48>&nbsp;</td>
  <td class=xl49>&nbsp;</td>
  <td class=xl49>&nbsp;</td>
  <td class=xl49>&nbsp;</td>
  <td class=xl43>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=24 style='mso-height-source:userset;height:18.0pt'>
  <td height=24 class=xl50 style='height:18.0pt'>&nbsp;</td>
  <td rowspan=5 class=xl86 width=15 style='width:11pt'>F<br>
    A<br>
    C<br>
    T<br>
    U<br>
    R<br>
    E<br>
    R</td>
  <td colspan=3 class=xl89 width=329 style='border-left:none;width:248pt'><% Response.Write(ClientRS.fields("NomCompagnie")) %></td>
  <td class=xl34>&nbsp;</td>
  <td class=xl33></td>
  <td class=xl51>&nbsp;</td>
  <td rowspan=5 class=xl86 width=13 style='width:10pt'>L<br>
    I<br>
    V<br>
    R<br>
    E<br>
    R</td>
  <td colspan=6 class=xl89 width=232 style='border-left:none;width:176pt'><% Response.Write(ClientRS.fields("ContactLivraison")) %></td>
  <td class=xl52>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=24 style='mso-height-source:userset;height:18.0pt'>
  <td height=24 class=xl50 style='height:18.0pt'>&nbsp;</td>
  <td colspan=3 class=xl89 width=329 style='border-left:none;width:248pt'><% Response.Write(ClientRS.fields("Contact")) %></td>
  <td class=xl34>&nbsp;</td>
  <td class=xl33></td>
  <td class=xl51>&nbsp;</td>
  <td colspan=6 class=xl89 width=232 style='border-left:none;width:176pt'><% Response.Write(ClientRS.fields("AdresseFacturation")) %></td>
  <td class=xl52>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=24 style='mso-height-source:userset;height:18.0pt'>
  <td height=24 class=xl50 style='height:18.0pt'>&nbsp;</td>
  <td colspan=3 class=xl89 width=329 style='border-left:none;width:248pt'><% Response.Write(ClientRS.fields("AdresseFacturation")) %></td>
  <td class=xl34>&nbsp;</td>
  <td class=xl33></td>
  <td class=xl51>&nbsp;</td>
  <td colspan=6 class=xl89 width=232 style='border-left:none;width:176pt'><% Response.Write(ClientRS.fields("VilleLivraison") & ",&nbsp;" & ClientRS.fields("ProvinceLivraison")) %><span style='mso-spacerun:yes'>  </span><% Response.Write(ClientRS.fields("CodePostalLivraison")) %></td>
  <td class=xl52>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=24 style='mso-height-source:userset;height:18.0pt'>
  <td height=24 class=xl50 style='height:18.0pt'>&nbsp;</td>
  <td colspan=3 class=xl89 width=329 style='border-left:none;width:248pt'><% Response.Write(ClientRS.fields("Ville") & ",&nbsp;" & ClientRS.fields("Province")) %><span style='mso-spacerun:yes'>  </span><% Response.Write(ClientRS.fields("CodePostal")) %></td>
  <td class=xl34>&nbsp;</td>
  <td class=xl33></td>
  <td class=xl51>&nbsp;</td>
  <td colspan=6 rowspan=2 class=xl90 width=232 style='width:176pt'><% Response.Write(ClientRS.fields("InstructionsSpeciales")) %></td>
  <td class=xl52>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=24 style='mso-height-source:userset;height:18.0pt'>
  <td height=24 class=xl50 style='height:18.0pt'>&nbsp;</td>
  <td colspan=3 class=xl89 width=329 style='border-left:none;width:248pt'><% Response.Write("Téléphone:&nbsp" & ClientRS.fields("Telephone1")) %><span style='mso-spacerun:yes'>  </span>Fax:&nbsp;<% Response.Write(ClientRS.fields("Fax")) %></td>
  <td class=xl34>&nbsp;</td>
  <td class=xl33></td>
  <td class=xl51>&nbsp;</td>
  <td class=xl52>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 class=xl53 style='height:5.1pt'>&nbsp;</td>
  <td class=xl54>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl55>&nbsp;</td>
  <td class=xl33></td>
  <td class=xl56>&nbsp;</td>
  <td class=xl57>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl40>&nbsp;</td>
  <td class=xl40>&nbsp;</td>
  <td class=xl41>&nbsp;</td>
  <td class=xl41>&nbsp;</td>
  <td class=xl41>&nbsp;</td>
  <td class=xl57>&nbsp;</td>
  <td></td>
 </tr>
 <tr height=19 style='height:14.25pt'>
  <td height=19 colspan=10 style='height:14.25pt;mso-ignore:colspan'></td>
  <td colspan=2 class=xl24 style='mso-ignore:colspan'></td>
  <td colspan=3 class=xl25 style='mso-ignore:colspan'></td>
  <td colspan=2 style='mso-ignore:colspan'></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 class=xl44 style='height:5.1pt'>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td class=xl48>&nbsp;</td>
  <td class=xl49>&nbsp;</td>
  <td class=xl49>&nbsp;</td>
  <td class=xl49>&nbsp;</td>
  <td class=xl44>&nbsp;</td>
  <td></td>
 </tr>
 <tr class=xl58 height=21 style='height:15.75pt'>
  <td height=21 class=xl60 style='height:15.75pt'>&nbsp;</td>
  <td colspan=2 class=xl61>SKU</td>
  <td class=xl61>&nbsp;</td>
  <td colspan=5 class=xl61>Description</td>
  <td class=xl61>&nbsp;</td>
  <td class=xl61>Quantité</td>
  <td class=xl62>&nbsp;</td>
  <td class=xl63>Prix</td>
  <td class=xl63>&nbsp;</td>
  <td class=xl63>Total</td>
  <td class=xl60>&nbsp;</td>
  <td class=xl58></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 style='height:5.1pt'></td>
  <td colspan=10 class=xl64 style='mso-ignore:colspan'></td>
  <td class=xl65></td>
  <td colspan=2 class=xl66 style='mso-ignore:colspan'></td>
  <td class=xl25></td>
  <td colspan=2 style='mso-ignore:colspan'></td>
 </tr>
<%
      MySQL="SELECT D.UPC, P.NomProduit, D.Quantite, P.PrixUnit, P.PrixUnit*D.Quantite AS TotalUnit FROM DetailsCommande AS D, Produits AS P WHERE P.UPC=D.UPC AND D.NoComm=" & CommandeRS.fields("NoCommande") & " AND D.Quantite < 10"
      Set DetailsRS=MyConn.Execute(MySQL)
      WHILE NOT DetailsRS.EOF
%>
 <FORM ACTION=cart.asp METHOD=GET>
  <tr height=23>
  <td height=17 class=xl58 style='height:12.75pt'>|</td>
  <td colspan=2 class=xl33 x:num="301.02100000000002"><% Response.Write(DetailsRS.fields("UPC")) %><INPUT TYPE=HIDDEN NAME=item VALUE=<%=DetailsRS.fields("UPC")%>></td>
  <td class=xl58>|</td>
  <td colspan=5 class=xl88 width=284 style='width:215pt'><% Response.Write(DetailsRS.fields("NomProduit")) %></td>
  <td class=xl58>|</td>
  <td align=right x:num><INPUT SIZE=3 TYPE=TEXT NAME=qtt VALUE=<%=DetailsRS.fields("Quantite")%>></td>
  <td class=xl58>|</td>
  <td class=xl67 x:num="3.5"><% Response.Write(FormatCurrency(DetailsRS.fields("PrixUnit"))) %></td>
  <td class=xl68>|</td>
  <td class=xl67 x:num="35"><% Response.Write(FormatCurrency(DetailsRS.fields("TotalUnit"))) %></td>
  <td class=xl59>|</td>
  <td class=xl88 colspan=500><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE="Recalculer"><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE=Suprimer></td>
 </tr>      
</FORM>
<%
      Items=Items+DetailsRS.fields("Quantite")
      Total=Total+DetailsRS.fields("quantite")*DetailsRS.fields("PrixUnit")
      DetailsRS.MoveNext
      WEND
      MySQL="SELECT D.UPC, P.NomProduit, D.Quantite, P.Prix10, P.Prix10*D.Quantite/10 AS Total10 FROM DetailsCommande AS D, Produits AS P WHERE P.UPC=D.UPC AND D.NoComm=" & CommandeRS.fields("NoCommande") & " AND D.Quantite >= 10"
      Set Details10RS=MyConn.Execute(MySQL)
      WHILE NOT Details10RS.EOF
%>      
 <tr height=23 >
 <FORM ACTION=cart.asp METHOD=GET>
  <td height=17 class=xl58 style='height:12.75pt'>|</td>
  <td colspan=2 class=xl33 x:num="301.02300000000002"><% Response.Write(Details10RS.fields("UPC")) %><INPUT TYPE=HIDDEN NAME=item VALUE=<%=Details10RS.fields("UPC")%>></td>
  <td class=xl58>|</td>
  <td colspan=5 class=xl88 width=284 style='width:215pt'><% Response.Write(Details10RS.fields("NomProduit")) %></td>
  <td class=xl58>|</td>
  <td align=right x:num><INPUT SIZE=3 TYPE=TEXT NAME=qtt VALUE=<%=Details10RS.fields("Quantite")%>></td>
  <td class=xl59>|</td>
  <td class=xl70 align=right x:num="55"><% Response.Write(FormatCurrency(Details10RS.fields("Prix10")/10)) %></td>
  <td class=xl68>|</td>
  <td class=xl70 align=right x:num="550"><% Response.Write(FormatCurrency(Details10RS.fields("Total10"))) %></td>
  <td class=xl59>|</td>
  <td class=xl88 colspan=500><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE="Recalculer"><INPUT TYPE=SUBMIT NAME=SUBMIT VALUE=Suprimer></td>
 </tr>
</FORM>
<%
      Items=Items+Details10RS.fields("Quantite")
      Total=Total+Details10RS.fields("Total10")
      Details10RS.MoveNext
      WEND
%>

 
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 class=xl71 style='height:5.1pt'>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl38>&nbsp;</td>
  <td class=xl71>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl71>&nbsp;</td>
  <td class=xl36>&nbsp;</td>
  <td class=xl72>&nbsp;</td>
  <td class=xl73>&nbsp;</td>
  <td class=xl74>&nbsp;</td>
  <td class=xl73>&nbsp;</td>
  <td class=xl72>&nbsp;</td>
  <td class=xl24></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 class=xl58 style='height:5.1pt'></td>
  <td colspan=2 class=xl33 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td colspan=5 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td class=xl24></td>
  <td class=xl59></td>
  <td class=xl70></td>
  <td class=xl68></td>
  <td class=xl70></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
<tr height=17 style='height:12.75pt'>
  <td height=17 class=xl58 style='height:12.75pt'></td>
  <td colspan=2 class=xl33 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td colspan=5 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td class=xl24></td>
  <td class=xl59></td>
  <td class=xl67>Total:</td>
  <td class=xl68></td>
  <td class=xl70 align=right x:num="985" x:fmla="=SUM(O21:O23)"><% Response.Write(FormatCurrency(Total)) %></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
<%
      MySQL="SELECT * FROM CodePostaux WHERE PostalCode LIKE MID('" & ClientRS.fields("CodePostalLivraison") & "',1,3)"       
      Set CodePostalRS=MyConn.Execute(MySQL)
%>
<tr height=17 style='height:12.75pt'>
  <td colspan=11 height=17 class=xl35 style='height:12.75pt'>(<% Response.Write(CodePostalRS.fields("KM")) %>Km X 0.35$) +
  (<% Response.Write(Items) %> Items X 0.10$)</td>
  <td class=xl59></td>
  <td class=xl67>Livraison:</td>
  <td class=xl68></td>
  <td class=xl70 align=right x:num="17"><% Response.Write(FormatCurrency((CodePostalRS.fields("KM")*.35)+(Items*.1))) %></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
<%
      IF Total < 1000 THEN
            Rabais=0
      ELSE
            Rabais=((CodePostalRS.fields("KM")*.35)+(Items*.1))*-1
      END IF
%>
 <tr height=17 style='height:12.75pt'>
  <td colspan=11 height=17 class=xl87 style='height:12.75pt'>Livraison gratuite
  pour les commandes de 1000$ et plus</td>
  <td class=xl59></td>
  <td class=xl67>Rabais:</td>
  <td class=xl68></td>
  <td class=xl70 align=right x:num="0"><% Response.Write(FormatCurrency(Rabais)) %></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>

<%
      Total2=Total+(CodePostalRS.fields("KM")*.35)+(Items*.1)+Rabais
%>
<tr height=17 style='height:12.75pt'>
  <td height=17 class=xl58 style='height:12.75pt'></td>
  <td colspan=2 class=xl33 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td colspan=5 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td class=xl24></td>
  <td class=xl59></td>
  <td class=xl67>Total:</td>
  <td class=xl68></td>
  <td class=xl70 align=right x:num="1002" x:fmla="=SUM(O26:O28)"><% Response.Write(FormatCurrency(Total2)) %></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
<%
      TPS=Total2*.07
      TVQ=(Total2+(Total2*.07))*.075
      Total3=Total2+TPS+TVQ
%>
<tr height=17 style='height:12.75pt'>
  <td colspan=11 height=17 class=xl75 style='height:12.75pt'>T.P.S. # 143523959
  (7.00%)</td>
  <td class=xl59></td>
  <td class=xl67>T.P.S.</td>
  <td class=xl68></td>
  <td class=xl70 align=right x:num="70.14" x:fmla="=O29*0.07"><% Response.Write(FormatCurrency(TPS)) %></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
 <tr height=17 style='height:12.75pt'>
  <td colspan=11 height=17 class=xl75 style='height:12.75pt'>T.V.Q. #
  1023461303 (7.50%)</td>
  <td class=xl59></td>
  <td class=xl67>T.V.Q.</td>
  <td class=xl68></td>
  <td class=xl70 align=right x:num="80.410499999999999"
  x:fmla="=(O29+O30)*0.075"><% Response.Write(FormatCurrency(TVQ)) %></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
 <tr height=6 style='mso-height-source:userset;height:5.1pt'>
  <td height=6 colspan=11 class=xl75 style='height:5.1pt;mso-ignore:colspan'></td>
  <td class=xl59></td>
  <td class=xl67></td>
  <td class=xl68></td>
  <td class=xl70></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
 <tr height=19 style='height:14.25pt'>
  <td height=19 class=xl58 style='height:14.25pt'></td>
  <td colspan=2 class=xl33 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td colspan=5 style='mso-ignore:colspan'></td>
  <td class=xl58></td>
  <td class=xl24></td>
  <td class=xl59></td>
  <td class=xl76>Total:</td>
  <td class=xl77>&nbsp;</td>
  <td class=xl78 align=right x:num="1152.5505000000001" x:fmla="=SUM(O29:O31)"><% Response.Write(FormatCurrency(Total3)) %></td>
  <td class=xl59></td>
  <td class=xl24></td>
 </tr>
 
 <![if supportMisalignedColumns]>
 <tr height=0 style='display:none'>
  <td width=6 style='width:5pt'></td>
  <td width=15 style='width:11pt'></td>
  <td width=70 style='width:53pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=253 style='width:190pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=13 style='width:10pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=67 style='width:50pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=65 style='width:49pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=82 style='width:62pt'></td>
  <td width=6 style='width:5pt'></td>
  <td width=48 style='width:36pt'></td>
 </tr>
 <![endif]>
</table>

</body>

</html>
0
Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

 
LVL 22

Expert Comment

by:neeraj523
ID: 11910175
i m wokring on ur code..

can u also provide me your mdb file,.. it will allow me to reproduce the error at my end..

neeraj523
0
 

Author Comment

by:Valadas2
ID: 11910227
I just send you the mdp file by e-mail, thanks for your support.

Time to go to bed for me, I hope I will still sleep, I stopped smoking yesterday and these buttons are driving me crazy.
0
 

Author Comment

by:Valadas2
ID: 11929097
It was too long to find the problem, I restarted the whole page using notepad instead of and excel export.

Problem Solved!!!

Thank you anyway.
0

Featured Post

Announcing the Most Valuable Experts of 2016

MVEs are more concerned with the satisfaction of those they help than with the considerable points they can earn. They are the types of people you feel privileged to call colleagues. Join us in honoring this amazing group of Experts.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Classic ASP - x-editable save to SQL 3 97
Group by correlation 4 58
classic asp checkbox uncheck and check 2 63
Diminish Pop-up  in 3 seconds 7 24
I recently decide that I needed a way to make my pages scream on the net.   While searching around how I can accomplish this I stumbled across a great article that stated "minimize the server requests." I got to thinking, hey, I use more than one…
This demonstration started out as a follow up to some recently posted questions on the subject of logging in: http://www.experts-exchange.com/Programming/Languages/Scripting/JavaScript/Q_28634665.html and http://www.experts-exchange.com/Programming/…
Two types of users will appreciate AOMEI Backupper Pro: 1 - Those with PCIe drives (and haven't found cloning software that works on them). 2 - Those who want a fast clone of their boot drive (no re-boots needed) and it can clone your drive wh…
This video shows how to quickly and easily add an email signature for all users on Exchange 2016. The resulting signature is applied on a server level by Exchange Online. The email signature template has been downloaded from: www.mail-signatures…

825 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question