Also ich habe das Problem dass dauernd folgender fehler angezeigt wird Helft mir bitte ich fang doch grad erst an :D
Fehler:
Beschreibung: Beim Ausführen der aktuellen Webanforderung ist ein unverarbeiteter Fehler aufgetreten. Überprüfen Sie die Stapelüberwachung, um weitere Informationen über diesen Fehler anzuzeigen und festzustellen, wo der Fehler im Code verursacht wurde.
Ausnahmedetails: System.NullReferenceException: Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.
Code:
<%@ Page Language="VB" debug="true"%>
<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="system.Data.Oledb"%>
<script runat="server">
'Globale Deklaration des Datareaders
Public dr as OledbDatareader
Sub Page_load(Sender as Object, E as eventargs)
Dim cn As OledbConnection
Dim strCn as String
Dim strProvider as String
Dim strDataSource as string
'Verbindungszeichenfolge definieren
strProvider="Provider=Microsoft.Jet.OLEDB.4.0;"
strDataSource="Datasource=" & _
Server.mappath("/daten.mdb")
StrCn= strProvider & strDatasource
'Connection Instanz mit Verbindungszeichenfolge erstellen
cn = new OledbConnection(strCn)
'Versuche Verbindung herzustellen
Try
cn.Open()
lblMsg.text = "Verbindung hergestellt.<BR>"
lblmsg.text +="Provider:" & strProvider & "<BR>"
lblmsg.text +="Datasource:" & strDatasource
Dim strSql as String
Dim cmd as OledbCommand
strSql = " select * From Artikel;"
strSql += "Order by Artikelnummer;"
cmd = New OleDbCommand(strSQL)
cmd.Connection = cn
dr= cmd.executeReader(CommandBehavior.CloseConnection)
Catch Excep as OledbException
lblmsg.text = "verbindung konnte nicht hergestellt werden!"
End Try
End Sub
'
</script>
<html>
<head>
</head>
<body>
<h1>Juhu die datenbank mit dem Datareader lesen</h1>
<form runat="server">
<asp:Label id="lblmsg" BackColor="White" runat="Server"></asp:label>
<br>
<table style="Width:100%" bgcolor="#c0c0ff">
<tbody>
<% Do While dr.Read() %>
<tr><td colspan="6" width="15%"><% =dr.GetValue(0) %></td>
<td width="10%"><% =dr.Item("Artikelnummer")%></td>
<td width="25%"><% = dr.GetString(2) %></td>
<td width="25%"><% =dr.Getvalue(3) %></td>
<td width="15%"><% = dr.Getvalue(4) %></td>
<td width="10%"><% =dr.GetValue(5) %></td></tr>
<% Loop %>
</tbody>
</table>
</form>
</body>
</html>
