使用 vb.net 和 mysql 执行命令时遇到致命错误(在线)
fatal error encountered during command execution with vb.net and mysql (online)
我有一个使用 vb.net 和 mysql 构建的桌面应用程序,它运行良好,但昨天我在执行 select 命令时遇到问题:
dim xSql As String = "SELECT
p.ID,
p.TheName0,
(SELECT IFNULL(SUM(att.S_FinalAmount),0) From tbl_groups_classes_att att
INNER JOIN tbl_students st
ON st.ID = att.StudentID
INNER JOIN tbl_groups_classes cls
ON cls.ID = att.ClassID
WHERE st.ParentID = p.ID
and cls.TheDate BETWEEN @Date1 and @Date2
and att.TheStatus <> 'غائب'
) as CurrMost,
(SELECT IFNULL(SUM(att.S_FinalAmount),0) From tbl_groups_classes_att att
INNER JOIN tbl_students st
ON st.ID = att.StudentID
INNER JOIN tbl_groups_classes cls
ON cls.ID = att.ClassID
WHERE st.ParentID = p.ID and cls.TheDate< @Date1 and att.TheStatus <> 'غائب'
) as PrevMost,
(SELECT IFNULL(SUM(pay.TheAmount),0) From tbl_parents_payments pay Where p.ID = pay.ParentID
AND pay.TheDate BETWEEN @Date1 and @Date2
) as CurrMadf,
(SELECT IFNULL(SUM(pay.TheAmount),0) From tbl_parents_payments pay Where p.ID = pay.ParentID
AND pay.TheDate < @Date1
) as PrevMadf,
(SELECT CurrMost + PrevMost) as AllMost,
(SELECT CurrMadf + PrevMadf) as AllMadf,
(SELECT AllMost - AllMadf) AS FinalTotal
from tbl_parents p"
xDS = New Ds_Edsa
Dim xCMD4 As New MySqlCommand(xSql, Conn)
xCMD4.Parameters.Add("@Date1", MySqlDbType.Date).Value = CDate(xxFrom)
xCMD4.Parameters.Add("@Date2", MySqlDbType.Date).Value = CDate(xxTo)
xDadp = New MySqlDataAdapter(xCMD4)
xDadp.Fill(xDS.Tables("AllPar"))
问题仅出现在在线 mysql 托管中,但是当我 运行 在本地主机 (mysql) 上执行命令时,它正在运行!
之前一切都很好所以这是一个新问题
我得到的错误是(执行命令时遇到致命错误)
我认为你的 SQL 非常复杂,所以你应该知道你正在处理的记录数,我认为你应该将命令分开,将每个部分放在一个命令中,然后合并它们在数据集内的一个数据 table 中。
我有一个使用 vb.net 和 mysql 构建的桌面应用程序,它运行良好,但昨天我在执行 select 命令时遇到问题:
dim xSql As String = "SELECT
p.ID,
p.TheName0,
(SELECT IFNULL(SUM(att.S_FinalAmount),0) From tbl_groups_classes_att att
INNER JOIN tbl_students st
ON st.ID = att.StudentID
INNER JOIN tbl_groups_classes cls
ON cls.ID = att.ClassID
WHERE st.ParentID = p.ID
and cls.TheDate BETWEEN @Date1 and @Date2
and att.TheStatus <> 'غائب'
) as CurrMost,
(SELECT IFNULL(SUM(att.S_FinalAmount),0) From tbl_groups_classes_att att
INNER JOIN tbl_students st
ON st.ID = att.StudentID
INNER JOIN tbl_groups_classes cls
ON cls.ID = att.ClassID
WHERE st.ParentID = p.ID and cls.TheDate< @Date1 and att.TheStatus <> 'غائب'
) as PrevMost,
(SELECT IFNULL(SUM(pay.TheAmount),0) From tbl_parents_payments pay Where p.ID = pay.ParentID
AND pay.TheDate BETWEEN @Date1 and @Date2
) as CurrMadf,
(SELECT IFNULL(SUM(pay.TheAmount),0) From tbl_parents_payments pay Where p.ID = pay.ParentID
AND pay.TheDate < @Date1
) as PrevMadf,
(SELECT CurrMost + PrevMost) as AllMost,
(SELECT CurrMadf + PrevMadf) as AllMadf,
(SELECT AllMost - AllMadf) AS FinalTotal
from tbl_parents p"
xDS = New Ds_Edsa
Dim xCMD4 As New MySqlCommand(xSql, Conn)
xCMD4.Parameters.Add("@Date1", MySqlDbType.Date).Value = CDate(xxFrom)
xCMD4.Parameters.Add("@Date2", MySqlDbType.Date).Value = CDate(xxTo)
xDadp = New MySqlDataAdapter(xCMD4)
xDadp.Fill(xDS.Tables("AllPar"))
问题仅出现在在线 mysql 托管中,但是当我 运行 在本地主机 (mysql) 上执行命令时,它正在运行!
之前一切都很好所以这是一个新问题
我得到的错误是(执行命令时遇到致命错误)
我认为你的 SQL 非常复杂,所以你应该知道你正在处理的记录数,我认为你应该将命令分开,将每个部分放在一个命令中,然后合并它们在数据集内的一个数据 table 中。