首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 网站开发 > ASP >

××××××问一个简单有关问题,×××××

2012-02-16 
急问一个简单问题,在线等formACTION chk_order.asp method post id bookfm name bookfm fi

××××××急问一个简单问题,在线等×××××××
<form   ACTION= "chk_order.asp "     method= "post "   id= "bookfm "   name= "bookfm ">
<fieldset>
<span   style= "font-size:14px;color:#666; "> <%=rs( "name ")%> </span> 's   order
<div> <dl   style= "line-height:22px;text-indent:2em;   ">
<dt>
Particulars: <br> <%=strList%> &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <input   type= "hidden "     name= "content "   value= " <%=strList%> "> <input   type= "hidden "     name= "content1 "   value= " <%=strList1%> ">
</dt>
<dt> Subtotal:£ <span   style= "color:#FF0000   "> <%=total%> </span> <input   type= "hidden "     name= "subprice "   value= " <%=total%> ">
</dt>
 
</dl>


Your   requests:
<input   type= "hidden "     name= "date "   value= " <%=Now()%> ">
input   type= "hidden "     name= "realname "   value= <%=rs( "name ")%>   >
<input   type= "hidden "     name= "depart "   value= <%=rs( "depart ")%>   >
<input   type= "hidden "     name= "youbian "   value= <%=rs( "youbian ")%>   >
<input   type= "hidden "     name= "tel "   value= <%=rs( "tel ")%>   > <br>
<textarea   name= "want "   cols= "40 "   rows= "6 "> </textarea> <br>
<input   type= "radio "   name= 'hah '   value= "I   need   delivery "   checked> I   need   delivery <br>
<input   type= "radio "   name= 'hah '   value= "I   want   to   pick   up   it   myself "> I   want   to   pick   up   it   myself
            <br>
<input     type= "button "   name= "Submit "   value= "OK! "   class= "buttom "   onClick= 'submit() '/>
<input     name= "按钮 "   type= "button "   class= "buttom "   onClick= "window.close() "   value= "Afresh "/>

</div>
</fieldset>
</form>

<%  
if   Session   ( "currentuser ")= " "   Or   IsNull(Session   ( "currentuser "))   then

Response.Write( " <script   language=JavaScript>   alert( 'Please   log   in! ') </script> ")

Response.Write( " <script   language=JavaScript> location.href= 'temp.asp ' </script> ")

Response.Write( " <script   language=JavaScript> "+ "window.close() "+ " </script> ")

else

sql= "select   *   from   t_user   where   loginname   =   ' "+   Session   ( "currentuser ")   +   " ' "


Set   rs   =   Server.CreateObject( "adodb.recordset ")
rs.Open   sql,conn,1,1

strList   =   " <table   width=100%   border=0   cellspacing=4   cellpadding=0> "
strlist1= " <table   width=100%   border=0   cellspacing=0   cellpadding=0> "
Set   rs1   =   Server.CreateObject( "adodb.recordset ")
total   =   0
sql   =   "select   sum(a.foodcount)   as   [amount],a.foodID,b.entitle,b.title,   b.price   from   t_OrderTmp   a   inner   join   t_Foods   b   on   a.foodID=b.ID   where   a.SessionID= ' "   +   Session.SessionID   +   " '   group   by   a.foodID,b.entitle,b.price,   b.title   "  
'response.write   sql
'response.end
rs1.Open   sql   ,   conn,   1,1  

Do   While   Not   rs1.EOF
strList   =   strList   &   " <tr> <td> "   &   rs1( "foodID ")   &   "( "   &   rs1( "entitle ")   &   ") </td> <td   align=right>   £ "   &   rs1( "price ")   &   "     X   "   &   rs1( "amount ")       &   "   </td> </tr>     "
strList1   =   strList1   & " <tr> <td> "     &   rs1( "foodID ")   &   "-- "   &       rs1( "entitle ")   &   "   "   &   rs1( "title ")   &   " </td> <td   align=right>   £ "   &   rs1( "price ")   &   "     X   "   &   rs1( "amount ")       &   "   </td> </tr>     "
total   =   total   +   rs1( "amount ")*rs1( "price ")
rs1.movenext
Loop
rs1.close:Set   rs1=nothing
strList   =   strList   & " </table> "
strList1   =   strList1   & " </table> "
  %>

程序摆出来看起来有点乱,是个表单,问题是这样的,我现在加一组单选按钮(2个),怎么他选中的单选按钮的value做为字符串,传到strlist和strlist1中去,一边是javascript,一边是ASP,怎么连起来呀?

[解决办法]
看8懂~
[解决办法]
提交的时候把把选中的radio值放进hidden里面,接收后组合就行了
[解决办法]
木有明白

热点排行