VB.Net程序（Windows服务）

Question

我有一个用vb.net编写的程序（VS2008，窗口服务），我缩短了代码，使其变得简单，如下所示：

    strSQLEquip = "INSERT INTO xxx..."
    strSQLEquip2 = "UPDATE xxx..."
    strSQLEquip3 = "UPDATE yyy..."

    If Condition = true Then
        Try
            Command = DB.GetSqlStringCommand(strSQLEquip)
            DB.AddInParameter(Command, "@EQUIPMENT_TYPE", DbType.String, PISAlarms.PISAlarm.EquipmentType)
            DB.AddInParameter(Command, "@EQUIPMENT_ID", DbType.String, stopID)
            DB.AddInParameter(Command, "@ALARM_TYPE", DbType.String, PISAlarms.AlarmsType.TypeDOOR)
            DB.AddInParameter(Command, "@TRIGGER_DATETIME", DbType.String, CurrDataTime)
            DB.ExecuteNonQuery(Command)

            Command.Connection.Close()
        Catch ex As Exception

        End Try
    Else
        Try
            Command = DB.GetSqlStringCommand(strSQLEquip2)
            DB.AddInParameter(Command, "@EQUIPMENT_TYPE", DbType.String, PISAlarms.PISAlarm.EquipmentType)
            DB.AddInParameter(Command, "@EQUIPMENT_ID", DbType.String, stopID)
            DB.AddInParameter(Command, "@ALARM_TYPE", DbType.String, PISAlarms.AlarmsType.TypeDOOR)
            DB.ExecuteNonQuery(Command)

            Command = DB.GetSqlStringCommand(strSQLEquip3)
            DB.AddInParameter(Command, "@EQUIPMENT_TYPE", DbType.String, PISAlarms.PISAlarm.EquipmentType)
            DB.AddInParameter(Command, "@EQUIPMENT_ID", DbType.String, stopID)
            DB.AddInParameter(Command, "@ALARM_TYPE", DbType.String, PISAlarms.AlarmsType.TypeDOOR)
            DB.ExecuteNonQuery(Command)

            Command.Connection.Close()
        Catch ex As Exception

        End Try
    End If

在服务器Windows服务中运行时，该服务保持关闭状态，我在日志文件“服务器超时”中收到错误。 如果删除“ strSQLEquip3”的部分，则意味着程序仅运行“ strSQLEquip”和“ strSQLEquip2”，它不会出现错误。