If IsUseConnSupporter Then
      Dim strErrMsg As String
      Dim techSupporter As New [b]techSupport.techSupport[/b]
      If Not techSupporter.TestConn(DBOpProvider.ConnSqlServer.SQLClass.ConnStr, strErrMsg, Application.ProductName) Then
        MsgBox(strErrMsg, MsgBoxStyle.Exclamation + MsgBoxStyle.SystemModal)
        Application.Exit()
        End
      End If
    End If
techsupport是个什么类啊?看不懂,解释一下,谢谢!