|
|
|
asp checkbox ถามเรื่องการส่งข้อมูลไปแสดงอีกหน้าครับ................... |
|
|
|
|
|
|
|
ตรง check box ก็ใสค่า ของรายการนั้นๆ เวลา submit ไป มันก็จะเป็น xxx,xxx แบบนี้คับ คุณสามารถให้ For each ได้ เช่น
For Each item in Request("XXX")
Next
ก็ได้แล้วครับ
|
|
|
|
|
Date :
2012-01-24 16:04:04 |
By :
diysms |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
ทำได้แล้วครับแต่ว่ามันไม่ต่อเนื่องออกมาตามภาพนี้ครับ
แล้วนี้ code ครับ
Code (ASP)
<table width="615" border="1" cellpadding="0" cellspacing="0">
<tr bgcolor="#666666">
<td width="166" height="41"><div align="center" class="style17"><span class="style13">Customer</span></div></td>
<td width="91"><div align="center"><strong><span class="style14">Docnum</span></strong></div></td>
<td width="86"><div align="center"><strong><span class="style15">Post Date</span></strong></div></td>
<td width="262"><div align="center"><strong><span class="style16">Balance Due</span></strong></div></td>
</tr>
</table>
<%
dim chkVol
For Each chkVol in Request.Form("doc")
strSQL = " select distinct o.docnum,o.cardname,o.docdate,o.doctotal,r.objtype,r.address from oinv o inner join inv1 i on o.docentry=i.docentry inner join ocrd r on o.cardcode=r.cardcode "
strSQL = strSQL & " where o.docstatus='o' and o.docnum= '"&chkVol&"' "
''response.Write(strSQL)
Set objRec = Server.CreateObject("ADODB.Recordset")
objRec.Open strSQL, Conn, 1,3
%>
</p>
<table width="615" border="1" cellpadding="0" cellspacing="0">
<%
While Not objRec.EOF
if codeline<>objRec.Fields(2).Value then
codeline = objRec.Fields(2).Value
%>
<tr onMouseOver="show(this)" onMouseOut="move(this)" class="even">
<td width="191"><%=objRec.Fields(1).Value%></td>
<td width="100"><div align="center"><%=objRec.Fields(0).Value%></div></td>
<td width="88"><div align="center"><%=objRec.Fields(2).Value%></div></td>
<td width="294">
<div align="right"><font color="#CC3300">
</font> <%
response.write(formatnumber(objRec.Fields(3).Value))
pvsum=cdbl(pvsum)+cdbl(objRec.Fields(3).Value)
%></div></td>
</tr>
<%
else
%>
<%
End if
objRec.MoveNext
Wend
%>
</table>
<div align="center">
<%
Next
%>
<%
objRec.Close()
Conn.Close()
Set objRec = Nothing
Set Conn = Nothing
%>
ผมต้องแก้ไขไงครับให้มันไม่แยกกันครับ
ขอคำแนะนำด้วยครับ
ขอบคุณล่วงหน้าครับ
|
|
|
|
|
Date :
2012-01-25 10:13:52 |
By :
e_tawee |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Load balance : Server 03
|