Still new to code behind so i'm not sure what the problem is (i'm using
visualStudio.ne t for the first time) like my last question i'll bet this has
a quick answer. thanks
kes
here is the error: and please for give the excessive text
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.NullRefe renceException: Object reference not set
to an instance of an object.
Source Error:
Line 56: conTyp.Open()
Line 57: dtrTyp = cmdSelectTyp.Ex ecuteReader()
Line 58: dGrdTyp.DataSou rce = dtrTyp
Line 59: dGrdTyp.DataBin d()
Line 60: dtrTyp.Close()
Source File: E:\WebSites\Dam arStone\damarSt one\typ.aspx.vb Line: 58
Stack Trace:
[NullReferenceEx ception: Object reference not set to an instance of an
object.]
damarStone.WebF orm1.BindDataGr id() in
E:\WebSites\Dam arStone\damarSt one\typ.aspx.vb :58
damarStone.WebF orm1.Page_Load( Object sender, EventArgs e) in
E:\WebSites\Dam arStone\damarSt one\typ.aspx.vb :35
System.Web.UI.C ontrol.OnLoad(E ventArgs e) +67
System.Web.UI.C ontrol.LoadRecu rsive() +35
System.Web.UI.P age.ProcessRequ estMain() +750
********
and the pages:
********
typ.aspx.vb:
Imports System.Data.Ole Db
Imports System.Web.UI
Imports System.Web.UI.W ebControls
Imports System.Web.UI.H tmlControls
Public Class WebForm1
Inherits System.Web.UI.P age
Protected WithEvents dGrdTyp As System.Web.UI.W ebControls.Data Grid
Public thsSitePath As String
#Region " Web Form Designer Generated Code "
'This call is required by the Web Form Designer.
<System.Diagnos tics.DebuggerSt epThrough()> Private Sub
InitializeCompo nent()
End Sub
Protected WithEvents lblUser As System.Web.UI.W ebControls.Labe l
Protected WithEvents lblStatus As System.Web.UI.W ebControls.Labe l
Protected WithEvents DataGrid1 As System.Web.UI.W ebControls.Data Grid
Protected WithEvents lnkToHome As System.Web.UI.W ebControls.Link Button
'NOTE: The following placeholder declaration is required by the Web Form
Designer.
'Do not delete or move it.
Private designerPlaceho lderDeclaration As System.Object
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeCompo nent()
End Sub
#End Region
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArg s) Handles MyBase.Load
'Put user code to initialize the page here
Call Get_location()
Call BindDataGrid()
End Sub
Private Sub Get_location()
Dim thsUri As Uri
Dim thsHost As String
thsUri = Request.Url
thsHost = thsUri.Host
If (thsHost = "www.damarstone .com") Then
thsSitePath = "c:\websites\da mar"
Else
thsSitePath = "e:\websites\da marstone\"
End If
lblUser.Text = thsSitePath
End Sub
Private Sub BindDataGrid()
Dim conTyp As OleDbConnection
Dim cmdSelectTyp As OleDbCommand
Dim dtrTyp As OleDbDataReader
lnkToHome.Text = "me"
conTyp = New OleDbConnection ("PROVIDER=Micr osoft.Jet.OLEDB .4.0;DATA
Source=" & thsSitePath & "db\damarstone. mdb")
cmdSelectTyp = New OleDbCommand("S ELECT t.typID, t.typName,
t.typeDesc FROM typ t ORDER BY t.typName;", conTyp)
conTyp.Open()
dtrTyp = cmdSelectTyp.Ex ecuteReader()
dGrdTyp.DataSou rce = dtrTyp
dGrdTyp.DataBin d()
dtrTyp.Close()
conTyp.Close()
End Sub
End Class
***********
typ.aspx:
<%@ Page Language="vb" AutoEventWireup ="false" Codebehind="typ .aspx.vb"
Inherits="damar Stone.WebForm1" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>WebForm1 </title>
<meta content="Micros oft Visual Studio .NET 7.1" name="GENERATOR ">
<meta content="Visual Basic .NET 7.1" name="CODE_LANG UAGE">
<meta content="JavaSc ript" name="vs_defaul tClientScript">
<meta content="http://schemas.microso ft.com/intellisense/ie5"
name="vs_target Schema">
</HEAD>
<body MS_POSITIONING= "GridLayout ">
<form id="Form1" method="post" runat="server">
<asp:Label id="lblUser" runat="server" Font-Size="X-Small">Current
Action</asp:Label><br>
<asp:Label id="lblStatus" runat="server" Font-Size="XX-Small"
Width="240px">O n the main stone types page</asp:Label><br>
<asp:LinkButt on id="lnkToHome" runat="server"> Home</asp:LinkButton> <br>
<asp:DataGrid id="DataGrid1" style="" runat="server" >
<Columns>
<asp:HyperLinkC olumn DataNavigateUrl Field="typID"
DataNavigateUrl FormatString="S labs.aspx?TypID ={0}"
DataTextField=" TypName" HeaderText="Sel ect Stone" runat="server" />
</Columns>
</asp:DataGrid></form>
</body>
</HTML>
