将 SQL 语句添加到 ADODB 连接
Adding SQL statements to ADODB connections
我正在尝试从 mysql 服务器中提取一些数据,并使用 GROUP_CONCAT 函数计算某个变量的百分位数。我想增加 group_concat_max_len 到我的 sql 查询的长度,当我使用我的数据资源管理器时,这是在我的查询之前添加 SET @@session.group_concat_max_len = 1000000;
的简单语句。我不确定该怎么做。我试过了
connectionText = "Driver={MySQL ODBC 3.51 Driver};Server=" & Server_Name & ";Database=" & Database_Name & _
";Uid=" & User_ID & ";Pwd=" & Password & ";"
Dim cnn As New ADODB.Connection
cnn.Open connectionText
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
cmd.CommandText = "SET @@session.group_concat_max_len = 1000000;"
cmd.ActiveConnection = cnn
Set rs = New ADODB.Recordset
rs.Open sqlquery, cnn, adOpenForwardOnly,adLockReadOnly, adCmdText
但这并没有应用我需要的设置。 TIA.
发现我正在尝试对连接而不是数据库执行命令。它已使用
修复
CommandText = "SET @@session.group_concat_max_len = 1000000;"
cnn.Open connectionText
cnn.Execute (CommandText)
我正在尝试从 mysql 服务器中提取一些数据,并使用 GROUP_CONCAT 函数计算某个变量的百分位数。我想增加 group_concat_max_len 到我的 sql 查询的长度,当我使用我的数据资源管理器时,这是在我的查询之前添加 SET @@session.group_concat_max_len = 1000000;
的简单语句。我不确定该怎么做。我试过了
connectionText = "Driver={MySQL ODBC 3.51 Driver};Server=" & Server_Name & ";Database=" & Database_Name & _
";Uid=" & User_ID & ";Pwd=" & Password & ";"
Dim cnn As New ADODB.Connection
cnn.Open connectionText
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
cmd.CommandText = "SET @@session.group_concat_max_len = 1000000;"
cmd.ActiveConnection = cnn
Set rs = New ADODB.Recordset
rs.Open sqlquery, cnn, adOpenForwardOnly,adLockReadOnly, adCmdText
但这并没有应用我需要的设置。 TIA.
发现我正在尝试对连接而不是数据库执行命令。它已使用
修复CommandText = "SET @@session.group_concat_max_len = 1000000;"
cnn.Open connectionText
cnn.Execute (CommandText)