Написал и отработал класс для работы в Windows application с MS Sql 2000. Перенес его на ASP.net Web application, но сыпется ошибки при компиляции проекта. Запустил SQL Profiler и он не показал ни одного обращения к БД (не было ни авторизации, ни подключения к БД), хотя при работе с Windows application полный порядок. В чем ошибка?

Server Error in '/Report' Application.
--------------------------------------------------------------------------------

Object reference not set to an instance of an object.
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.NullReferenceException: Object reference not set to an instance of an object.

Source Error:


Line 57: "WHERE b.ppacksUKEY = 0 " & _
Line 58: "ORDER BY iName;")
Line 59: Do While DB.DR.Read()
Line 60: DropDownList1.Items.Add(DB.DR("iName"))
Line 61: Loop


Source File: C:\Inetpub\Report\Start.aspx.vb Line: 59

Stack Trace:


[NullReferenceException: Object reference not set to an instance of an object.]
Report.WebForm1.Page_Load(Object sender, EventArgs e) in C:\Inetpub\Report\Start.aspx.vb:59
System.EventHandler.Invoke(Object sender, EventArgs e) +0
System.Web.UI.Control.OnLoad(EventArgs e)
System.Web.UI.Control.LoadRecursive()
System.Web.UI.Page.ProcessRequestMain()




--------------------------------------------------------------------------------
Version Information: Microsoft .NET Framework Version:1.1.4322.2032; ASP.NET Version:1.1.4322.2032

Это класс по работе с ado.net

' Классы
Dim DB As New SqlDB

' Загрузка приложения
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' Открываю БД (1 раз)
DB.OpenDB()
' Загрузка в комбобокс видов продукции
DB.SQLcommand("SELECT iName " & _
"FROM [dbo].[bindings] b " & _
"LEFT JOIN [Przd].[dbo].[Packs_] p " & _
"ON b.packsUKEY=p.UKEY " & _
"WHERE b.ppacksUKEY = 0 " & _
"ORDER BY iName;")
Do While DB.DR.Read()
DropDownList1.Items.Add(DB.DR("iName"))
Loop
DB.SQLclose()
End Sub
....

' SqlDB
Public Conn As SqlConnection
Public DR As SqlDataReader
Public DA As SqlDataAdapter

' Открытие БД
Public Sub OpenDB()
' Достаю параметры из Web.config
Dim SQLServer As String = System.Configuration.ConfigurationSettings. _
AppSettings("nServer")
Dim SQLDBase As String = System.Configuration.ConfigurationSettings. _
AppSettings("nDB")
Try
Conn = New SqlConnection
Conn.ConnectionString = "Data Source=" & SQLServer & ";Database=" & SQLDBase & ";Integrated Security=SSPI"
Conn.Open()
Catch myException As Exception
Errors(myException.Message)
End Try
End Sub

' Выполнение запроса
Public Sub SQLcommand(ByVal strSQL As String)
Try
' Выполняю запрос
Dim Comm As SqlCommand
Comm = New SqlCommand
Comm.Connection = Conn
Comm.CommandText = strSQL
DR = Comm.ExecuteReader
Comm = Nothing
Catch myException As Exception
Errors(myException.Message)
End Try
End Sub

....

Класс отлично работает в Windows application