- 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=33401)
-- 发布时间：2013/5/17 13:34:00
-- 请高手帮忙
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目8.zip |
请高手帮忙：教工标准工资是固定的，教工奖励工资每月都不一样，有的人有，有的人没有，每月只要输入教工奖励工资，点击按钮就可以生成教工工资。
-- 发布时间：2013/5/17 14:26:00
--
Dim YM,SQL As String
YM = "2013-04" \'自定义月份
SQL ="Select a.教工编号, a.教工姓名,\'" & YM & "\' As 月份,基本工资,奖励工资,(iif(奖励工资 Is null,0,奖励工资)+基本工资) As 实领工资"
SQL+ =" From{教工标准工资} a Left join (Select * From{教工奖励工资} where 月份 = \'" & YM & "\') b On a.教工编号 = b.教工编号"
DataTables("教工奖励工资").Save
DataTables("教工工资").FIll(SQL,"",True)
MainTable = Tables("教工工资")
-- 发布时间：2013/5/17 14:28:00
--
.
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目8.table |
-- 发布时间：2013/5/17 14:29:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目8.zip |
-- 发布时间：2013/5/18 11:56:00
--
谢谢