以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]临时表用SQLfind  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=159271)

--  作者:blsu33
--  发布时间:2020/12/19 16:54:00
--  [求助]临时表用SQLfind
老师,
  临时表不能使用Sqlfind?

例如 
Dim tb2 As WinForm.Table = e.Form.Controls("Table2")
Dim tb3 As WinForm.Table = e.Form.Controls("Table3")
tb2.Table.DataTable.LoadFilter="timebegin=\'" & Format(Date.now(), "yyyy-MM-dd") &"\'"
tb2.Table.DataTable.Load()
If tb2.Table.Rows.Count>0 Then
    Dim dt As DataTable=tb2.Table.DataTable
    Dim dt1 As DataTable=tb3.Table.DataTable
    Dim dr As DataRow= dt1.find("timebegin=\'" & Format(Date.now(), "yyyy-MM-dd") &"\'")
    Dim drs As List (of DataRow)=dt.sqlSelect("timebegin=\'" & Format(Date.now(), "yyyy-MM-dd") &"\'")
    If dr Is Nothing Then
        Dim dr1 As DataRow = dt1.AddNew()
        dr1("timebegin") = Date.now()
        For Each dr2 As DataRow In drs
            dr1(dr2("Valueid")) = dr2("idvalue")
        Next
    Else
        For Each dr3 As DataRow In drs
            dr(dr3("Valueid")) = dr3("idvalue")
        Next
    End If
End If

不想加载数据进来,怎么写?


--  作者:有点蓝
--  发布时间:2020/12/19 16:56:00
--  
这个临时表是怎么生成的?
--  作者:blsu33
--  发布时间:2020/12/19 16:58:00
--  
用SQLfind 就会显示错误,临时表不能使用SQLSELECT查询后台数据
--  作者:blsu33
--  发布时间:2020/12/19 17:03:00
--  
fill 进来的
--  作者:有点蓝
--  发布时间:2020/12/19 17:15:00
--  
fill的是单表的我测试没有问题,如果是复杂的sql有可能不行,可以考虑把sql放到数据库作成视图使用
--  作者:blsu33
--  发布时间:2020/12/19 17:17:00
--  
老师,
计划任务里面用写多线程吗?

--  作者:blsu33
--  发布时间:2020/12/19 17:18:00
--  
感觉计划任务的时间间隔过小的时候,代码系统就不动了。


--  作者:有点蓝
--  发布时间:2020/12/19 17:32:00
--  
计划任务并不是异步的,如果处理费时一样会影响主线程的,可以考虑在计划使用异步函数