以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  查询  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=55870)

--  作者:Liangcai
--  发布时间:2014/8/25 14:24:00
--  查询

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目11.zip

缴费信息减去退费信息   如下


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140825141808.png
图片点击可在新窗口打开查看


求代码?谢谢!

[此贴子已经被作者于2014-8-25 14:24:54编辑过]

--  作者:Bin
--  发布时间:2014/8/25 14:28:00
--  
没看懂你的需求.
--  作者:Liangcai
--  发布时间:2014/8/25 14:32:00
--  
查询没有退学费的学生信息
[此贴子已经被作者于2014-8-25 14:35:40编辑过]

--  作者:Bin
--  发布时间:2014/8/25 14:40:00
--  
利用SQL语句 select * from {缴学费信息} WHERE 学期+学生编号 not in (select 学期+学生编号 from {退费信息})
--  作者:有点甜
--  发布时间:2014/8/25 14:40:00
--  
Dim xq As String = e.Form.Controls("学期").Text
If xq > "" Then
    e.Form.controls("Table1").Table.Fill("select * from {学生基本信息} a inner join {缴学费信息} b on a.学生编号 = b.学生编号 where 缴费项目 = \'学费\' and 学期 = \'" & xq & "\' and b.学生编号 not in (select 学生编号 from {退费信息} where 学期 = \'" & xq & "\')", "数据库", True)
Else
    e.Form.controls("Table1").Table.Fill("Select * from {学生基本信息} a inner join {缴学费信息} b on a.学生编号 = b.学生编号 where 缴费项目 = \'学费\' and b.学生编号 not in (select 学生编号 from {退费信息})", "数据库", True)
End If

--  作者:Bin
--  发布时间:2014/8/25 14:44:00
--  
用4楼语句生成查询表,简便快捷.
--  作者:Liangcai
--  发布时间:2014/8/25 14:49:00
--  
谢谢有点甜老师
--  作者:Liangcai
--  发布时间:2014/8/25 14:51:00
--  
谢谢