<%response.Buffer=true%>
<%
code=Request.QueryString("code")
code1=Request.QueryString("code1")
price=Request.QueryString("pr")
'response.Write code &"code..."
'response.Write code1 &"code1..."
'response.Write price &"price..."
session("number")=Request.QueryString("icode")
'response.Write session("number") &"number...."
'response.Write session("number")
if Request.QueryString("opt")="delete" then
keycode=Request.QueryString("keycode")
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql="delete * from temp_order1 where sno1="& keycode &""
rs1.open sql,conn,1,2
end if
%>
<%
dim rs4
qty=Request.Form("qty")
price=price
Set rs4 = Server.CreateObject("ADODB.Recordset")
sql="select * from mas_product where prod_no='"& session("number") &"'"
'response.Write sql
rs4.open sql,conn,1,2
if not rs4.eof then
name=rs4("desc")
weight=rs4("NetWt")
end if
%>
<%
if session("number")<>"" then
session("cartCreated")="create"
end if
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql="select max(sno1) from order_quantity"
if rs1.state=1 then rs.close
rs1.open sql,conn,1,2
if not rs1.eof then
if isnull(rs1(0))=true then
sno=1
else
sno=rs1(0)+1
end if
end if
%>
<%
Set rs = Server.CreateObject("ADODB.Recordset")
if session("number")<>"" then
sql="select * from order_quantity "
rs.open sql,conn,1,2
'if rs.eof then
rs.addnew
rs("sno1")=sno
rs("Order_productid")=session("number")
rs("price")=price
rs("Quntity")=qty
rs("weight")=weight
rs("name")=name
rs.update
end if
'end if
%>
<%
Set rs1 = Server.CreateObject("ADODB.Recordset")
sql="select max(sno1) from temp_order1 "
if rs1.state=1 then rs.close
rs1.open sql,conn,1,2
if not rs1.eof then
if isnull(rs1(0))=true then
sno=1
else
sno=rs1(0)+1
end if
end if
Set rs = Server.CreateObject("ADODB.Recordset")
if session("number")<>"" then
sql="select * from temp_order1 "
if rs.state=1 then rs.close
rs.open sql,conn,1,2
rs.addnew
rs("sno1")=sno
'rs("Order_id")=sno
rs("Order_productid")=session("number")
rs("price")=price
rs("Quntity")=qty
rs("weight")=weight
rs("name")=name
rs("sessionid")=session("sid")
rs.update
end if
session("number")=""
%>
<%
set rst=server.CreateObject("adodb.recordset")
sqlt="select count(Order_productid) as tot from temp_order1"
if rst.state=1 then rst.close
rst.open sqlt,conn,1,2
if not rst.eof then
session("tot")=rst(0)
end if
%>
Ayushi
