奇怪的未将对象引用设置到对象的实例？

focusonline 2004-10-28 10:02:58

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Not IsPostBack Then
Dim Conn As SqlConnection
Dim Cmd As SqlCommand
Dim DA As New SqlDataAdapter
Dim DS As DataSet
Conn = New SqlConnection(ConfigurationSettings.AppSettings("strConnection"))
Conn.Open()
Cmd = New SqlCommand("SelectChat_Custom_Menu", Conn)
Cmd.CommandType = CommandType.StoredProcedure
DA.SelectCommand = Cmd
DS = New DataSet
DA.Fill(DS)
With objRepeater
.DataSource = DS.Tables(0).DefaultView
.DataBind()
End With
DS.Tables(0).Clear()
DS.Clear()
Conn.Close()
End If
End Sub

“/”应用程序中的服务器错误。
--------------------------------------------------------------------------------

未将对象引用设置到对象的实例。
说明: 执行当前 Web 请求期间，出现未处理的异常。请检查堆栈跟踪信息，以了解有关该错误以及代码中导致错误的出处的详细信息。

异常详细信息: System.NullReferenceException: 未将对象引用设置到对象的实例。

源错误:

行 28： DA.Fill(DS)
行 29： With objRepeater
行 30： .DataSource = DS.Tables(0).DefaultView
行 31： .DataBind()
行 32： End With

...全文

243 23 打赏收藏转发到动态举报

写回复

用AI写文章

23 条回复

切换为时间正序

请发表友善的回复…

发表回复

focusonline 2004-10-29

打赏
举报

<ASP:REPEATER ID="objReeater"←■
应该为objRepeater
够笨的吧？

wangyongli 2004-10-29

打赏
举报

什么原因？

luaiping 2004-10-29

打赏
举报

什么原因？

luaiping 2004-10-28

打赏
举报

可以单步调试吗？看看到底是哪一行报错

focusonline 2004-10-28

打赏
举报

上面是.aspx文件

focusonline 2004-10-28

打赏
举报

pinnacle897 2004-10-28

打赏
举报

找objRepeater的问题,aspx中.

cym110_78 2004-10-28

打赏
举报

我顶

focusonline 2004-10-28

打赏
举报

to: luaiping(风起云涌)
刚才见到你的回答我也改成两行了，但还是那个问题

focusonline 2004-10-28

打赏
举报

to: luaiping(风起云涌)
DS = New DataSet
VB.NET里面要不要加DS = New DataSet（）？
以前这样写过，写一行也成，两行两成，应该不是这里的问题

focusonline 2004-10-28

打赏
举报

Response.Write(DS.Tables(0).GetType.ToString)
Response.End()
显示结果：
System.Data.DataTable

luaiping 2004-10-28

打赏
举报

DS = New DataSet
VB.NET里面要不要加DS = New DataSet（）？

focusonline 2004-10-28

打赏
举报

to:net_lover(孟子E章)
先打印出来
DS.Tables.Count看是否是0
结果是1

孟子E章 2004-10-28

打赏
举报

先打印出来
DS.Tables.Count看是否是0

focusonline 2004-10-28

打赏
举报

Dim Conn As SqlConnection
Dim Cmd As SqlCommand
Dim DA As New SqlDataAdapter■■■
这里已经定义了啊？

luaiping 2004-10-28

打赏
举报

Dim DA As New SqlDataAdapter
没有实例化

focusonline 2004-10-28

打赏
举报

to:net_lover(孟子E章)
DS就不对吧
以前在别的代码中这样用就没有问题啊？

focusonline 2004-10-28

打赏
举报

运行dbo."SelectChat_Custom_Menu".

UserID UserName small IsOnline
------ -------------------- -------------------------------------------------- --------
1 测试 9 0
没有更多的结果。
(返回 1 行)
@RETURN_VALUE = 0
完成 dbo."SelectChat_Custom_Menu" 运行。

focusonline 2004-10-28