| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1564 人关注过本帖
标题:为符合查询条件的所有信息插入发票号(已解决,想知道的朋友可以学一下咯)
取消只看楼主 加入收藏
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
结帖率:68.57%
收藏
 问题点数:0 回复次数:4 
为符合查询条件的所有信息插入发票号(已解决,想知道的朋友可以学一下咯)
各老师:
    如符合查询条件的结果有下表
单号  公司代码  货物价格  货物名称  数量
01      A        105        G       5
02      B        112        H       3
03      C        120        I       8
........
假设我要为符合查询条件的所有信息开一张发票,发票号为20080603。
在以上信息下有个输入框,现我在此输入框中输入发票号后,点击输入框旁边的“开票”按钮,系统会自动将我输入的发票号保存到所有符合查询条件的各条信息中去。请问各位老师,怎么实现?太急了,望各老师帮帮忙!
=============================================================================================
已通过!太感谢了老师:
但是还有个问题我弄了一天了还是没弄好!
就是在查询结果的每条信息前加一个复选框,选中的信息才插入发票号,没选中的没插入,我弄了好几天都没弄好,参考8楼老师的代码我做如下修改,但达不到效果?怎么回事?
============================================================
已解决!代码如下:

<%
if request.form("Submit")="开票" then
fapiao=Trim(request.form("fapiao"))
id=request.form("id")
if id<>"" and not isnull(id) then
  conn.execute "update xiaoshou set fapiao='"&fapiao&"' where id in ("&id&")"
response.redirect Request.ServerVariables("HTTP_REFERER")
end if
end if
%>
<table border="1" width="100%" cellspacing="0" cellpadding="0" style="border-collapse:collapse;" bordercolor="#C0C0C0">
<tr height="20" align="center">
  <td>选择</td>
    <td>单号</td>
    <td>公司代码</td>
    <td>货物价格</td>
    <td>货物名称</td>
    <td>数量</td>
</tr>
<form method="post">
<%
Gname=request.form("Gname")
Set rs=server.createobject("adodb.recordset")
rs.open "select id,Number,Comm,Price,Uname,shuliang from xiaoshou where Gname='"&Gname&"' order by id desc",conn,1,1
Set id=rs("id")
Set number=rs("number")
Set Comm=rs("Comm")
Set Price=rs("Price")
Set Uname=rs("Uname")
Set shuliang=rs("shuliang")
do while not rs.eof
%>
<input type="hidden" name="id" value="<%=id%>" />//多了这行,呵呵!
<tr height="20" align="center">
  <td><input name="id" type="checkbox" id="id" value="<%=cstr(rs("id"))%>"></td>
    <td><%=number%></td>
    <td><%=Comm%></td>
    <td><%=Price%></td>
    <td><%=Uname%></td>
    <td><%=shuliang%></td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
<tr height="20" align="center">
<td ><input name="chkAll" type="checkbox" id="chkAll"  onclick=CheckAll(this.form) value="checkbox">
  全选</td>
<td colspan="6"><input type="text" name="fapiao" /> <input type="Submit" name="Submit" value="开票" /></td>
</tr>
</form>
<SCRIPT language=javascript>
//全选功能
function CheckAll(form)
  {
  for (var i=0;i<form.elements.length;i++)
    {
    var e = form.elements[i];
    if (e.Name != "chkAll")
       e.checked = form.chkAll.checked;
    }
  }
</SCRIPT>
</table>

[[it] 本帖最后由 anjincheng 于 2008-6-14 20:57 编辑 [/it]]
搜索更多相关主题的帖子: 发票 条件 查询 
2008-06-03 21:55
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
感谢老师:
    发票号的字段在表中是有的,假设表名为:xiaoshou
详细的代码怎么写呀?各老师的想法我能理解,但详细的代码我不会写,望老师帮忙!感谢!

我是农家的孩子,我有农家孩子的本色!
2008-06-04 11:03
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
老师们:
    很急用,望帮帮忙给段代码!感谢!

我是农家的孩子,我有农家孩子的本色!
2008-06-04 11:58
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
感谢老师们!

我是农家的孩子,我有农家孩子的本色!
2008-06-04 17:45
anjincheng
Rank: 2
等 级:论坛游民
威 望:5
帖 子:728
专家分:31
注 册:2005-7-27
收藏
得分:0 
已通过!太感谢了老师:
但是还有个问题我弄了一天了还是没弄好!
就是在查询结果的每条信息前加一个复选框,选中的信息才插入发票号,没选中的没插入,我弄了好几天都没弄好,参考8楼老师的代码我做如下修改,但达不到效果?怎么回事?

<%
if request.form("Submit")="开票" then
fapiao=Trim(request.form("fapiao"))
id=request.form("id")
if id<>"" and not isnull(id) then
  conn.execute "update xiaoshou set fapiao='"&fapiao&"' where id in ("&id&")"
response.redirect Request.ServerVariables("HTTP_REFERER")
end if
end if
%>
<table border="1" width="100%" cellspacing="0" cellpadding="0" style="border-collapse:collapse;" bordercolor="#C0C0C0">
<tr height="20" align="center">
  <td>选择</td>
    <td>单号</td>
    <td>公司代码</td>
    <td>货物价格</td>
    <td>货物名称</td>
    <td>数量</td>
</tr>
<form method="post">
<%
Gname=request.form("Gname")
Set rs=server.createobject("adodb.recordset")
rs.open "select id,Number,Comm,Price,Uname,shuliang from xiaoshou where Gname='"&Gname&"' order by id desc",conn,1,1
Set id=rs("id")
Set number=rs("number")
Set Comm=rs("Comm")
Set Price=rs("Price")
Set Uname=rs("Uname")
Set shuliang=rs("shuliang")
do while not rs.eof
%>
<input type="hidden" name="id" value="<%=id%>" />
<tr height="20" align="center">
  <td><input name="id" type="checkbox" id="id" value="<%=cstr(rs("id"))%>"></td>
    <td><%=number%></td>
    <td><%=Comm%></td>
    <td><%=Price%></td>
    <td><%=Uname%></td>
    <td><%=shuliang%></td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
<tr height="20" align="center">
<td ><input name="chkAll" type="checkbox" id="chkAll"  onclick=CheckAll(this.form) value="checkbox">
  全选</td>
<td colspan="6"><input type="text" name="fapiao" /> <input type="Submit" name="Submit" value="开票" /></td>
</tr>
</form>
<SCRIPT language=javascript>
//全选功能
function CheckAll(form)
  {
  for (var i=0;i<form.elements.length;i++)
    {
    var e = form.elements[i];
    if (e.Name != "chkAll")
       e.checked = form.chkAll.checked;
    }
  }
</SCRIPT>
</table>

[[it] 本帖最后由 anjincheng 于 2008-6-14 19:42 编辑 [/it]]

我是农家的孩子,我有农家孩子的本色!
2008-06-14 18:37
快速回复:为符合查询条件的所有信息插入发票号(已解决,想知道的朋友可以学一下 ...
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.026425 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved