主题：导入数据

帮忙看下代码哪出错了

谢谢各位了

With e.Form.Controls("dt_ptkc_日期")
If .Value IsNot Nothing Then
 Dim cmd As New SQLCommand
       Dim dt As DataTable
        cmd.C
        cmd.CommandText = "Select * FROM {ptkc} WHERE 日期 >= '" & e.Form.Controls("dt_ptkc_日期").Value() & "'"
        dt = cmd.ExecuteReader()

  Dim f As New Filler
   f.SourceTable = DataTables("ptkc") 

   f.SourceCols = "ylmc,ylph,kcgs,kc,ylxxID" 

   f.DataTable = DataTables("盘头_盘点") 

   f.DataCols = "ylmc,ph,kcgs,kczl,ylxxID" 

   f.Fill()
End If
End With

就是导的时候还是会把全部的数据导进去，不会把我筛选的日期那几列导进去

筛选日期是可以筛选出来的  那我试下

能否帮我改下 谢谢

现在是说ptkc对象名不存在  但表我又重新导了还是不行

不知道到底哪里出了错  ptkc是个视图

各位高手能否帮忙改下  小妹我不胜感激  谢谢谢谢

f.SourceTable = DataTables("ptkc")   就是指定数据来源表

ptkc是个盘头库存表 也是个视图