Dim
cmd As new SQLCommand
cmd.ConnectionName =
"数据源名称"
Dim dt As
DataTable
cmd.CommandText =
"S elect [_Identify],折扣 From
{订单} Where 数量 >=
500"
dt = cmd.ExecuteReader(True)
'记得将参数设置为True
我主要想生成dt来用，但在全局代码定义不了 Dim cmd As new SQLCommand
[此贴子已经被作者于2024/8/12 8:54:24编辑过]
和在哪定义SQLCommand没有什么关系。反而和在计划里不停加载数据有关
那我想在全局代码就加载成datatable,分别在其他地方直接使用这个datatable，应该在哪写，怎么写？
因为涉及好多表，所以程序开始设计时是要用的表才通过Dim cmd As new SQLCommand加载的
那也不能放到计划管理中啊。自己都知道要用到才添加，那什么时候用到？如果某个窗口用到，那就窗口打开前执行添加；其实窗口用的还不如使用sqltable。
请问老师如下做代码会使运行变慢吗？If Forms("主窗口").Opened Then
If Network.Ping(GetConfigValue("ip", "")) Then
Else
Return
End If
System.Threading.Thread.Sleep(1000)
Dim dr As DataRow
dr = DataTables("flopening").SQLFind("计算机名称='" & System.Net.Dns.GetHostName & "'")
If dr IsNot Nothing Then '如果找到的话
If FileisOpened(dr("nf")) = False Then
If FileOpened(dr("nf")) = False Then
DataTables("flopening").SQLDeleteFor ("计算机名称='" & System.Net.Dns.GetHostName & "' and nf='" & dr("nf") & "'")
End If
End If
End If
End I
下面代码会使整个程序停止1秒，没看懂有任何用处。
System.Threading.Thread.Sleep(1000)
其它代码正常应该不会慢，除非表格数据非常多（几千万上亿行）然后没有做任何优化
[此贴子已经被作者于2024/8/12 20:04:24编辑过]
是放在计划管理的，因为程序运行一段时间后，慢到死机一样，所以要排除问题