cmd.CommandText = "Inse r t Into {大额资金支出备案登记表} ([大额资金支付备案编码],[部门编码],[部门名称],[用户编码],[用户姓名],[申报备案时间],[付款单位编码],[付款单位账户名称],[付款单位开户银行],[付款单位银行账号],[收款单位编码],[收款单位账户名称],[收款单位开户银行],[收款单位银行账号],[过会类型],[支付项目名称和内容],[支付性质],[需要提前支付时间],[提前支付理由],[本单位过会时间],[需要说明的其他问题],[局务会过会时间],[过会结果],[未通过原因],[审核结果],[审核未通过原因],[标志],[审核人],[审核时间],[会议结果填表人],[填表时间],[支付金额],[预计支付时间]) Values ('"
cmd.CommandText = cmd.CommandText & sbbabm & "','" & _Userdwbm & "','" & sbdwmc & "','" & _Useryhbm & "','" & sbr & "',isnull('" & sbbasj & "',# 1/1/1 0:00:00 #),'" & fkdwbm & "','" & fkdwzhmc & "','" & fkdwkhyh & "','" & fkdwzh & "','" & skdwbm & "','" & skdwzhmc & "','" & skdwkhyh & "','" & skdwzh & "','" & hylx & "','" & zfxmnr & "','" & zfxz & "',IsNull('" & tqzfsj & "',# 1/1/1 0:00:00 #),'" & tqzfly & "',IsNull('" & bdwghsj & "',# 1/1/1 0:00:00 #),'" & qt & "',isnull('" & ghsj & "',# 1/1/1 0:00:00 #),'" & ghjg & "','" & wghyy & "','" & shjg & "','" & wtgyy & "','" & bz & "','" & shr & "',isnull('" & shsj & "',# 1/1/1 0:00:00 #),'" & ghtbr & "',isnull('" & tbsj & "',# 1/1/1 0:00:00 #),'" & zfje & "',isnull('" & yjzfsj & "',# 1/1/1 0:00:00 #)"
msgbox(cmd.CommandText)
加好友 
发短信
Post By：2016/9/5 13:23:00 [显示全部帖子]
