高手帮我看看,我的代码错哪里了?我是放在afterload的 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 高手帮我看看,我的代码错哪里了?我是放在afterload的

共有3578人关注过本帖树形打印复制链接主题：高手帮我看看,我的代码错哪里了?我是放在afterload的

gdongf

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：67 积分：585 威望：0 精华：0 注册：2014/6/26 17:18:00

高手帮我看看,我的代码错哪里了?我是放在afterload的 发帖心情

Post By：2014/8/7 11:21:00 [显示全部帖子]

Dim filter As String
filter ="Select a.nid As 送货单号,a.nRelationID As 销售单号, a.nclientid As 客户编号,b.sName As 客户名称,b.sAddr As 客户地址,b.sPhone As 联系电话,a.dOrderDate As 购物日期,a.dDeliverDate As 送货日期,d.sName As 商品名称及规格型号 ,c.nNumber As 数量,f.sName As 购买商场,e.sName As 发货仓库 from RT_Deliver a,CV_Client b ,RT_DeliverItem c,CT_Merchandise d,CT_Dept e,CT_Dept f where a.nClientID=b.nID And a.nID=c.nDeliverID And c.nMerchandiseID=d.nID And e.nID=c.nStoreHouseID And f.nID = a.nShopID And nClientType =1 And a.nAccountID = " & _Accountid & " and convert(Char(8),a.dOrderDate,112) >= convert(char(8),getdate(),112)"
Tables("销售单据窗口_table1").Fill(filter,_name,True)