в 15:30, 26 мая 2010

2010-05-26T15:30:47Z

Admin: 1 версия

2010-05-26T11:50:41Z

1 версия

Новая страница

==Read data from OleDbConnection (VB.net)==



<source lang="csharp">
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.Oledb" %>
<script language="vb" runat="server">
Sub Page_Load()
Dim strConnection as String = "Provider=Microsoft.Jet.OLEDB.4.0;"
strConnection += "Data Source=Northwind.mdb"
data_src.text = strConnection
Dim strSQL as string = "SELECT FirstName, LastName FROM Employees"
Dim strResultsHolder as string
Dim objConnection as New OledbConnection(strConnection)
Dim objCommand as New OledbCommand(strSQL, objConnection)
Dim objDataReader as OledbDataReader
try
objConnection.Open()
con_open.text="Connection opened successfully.<br />"
objDataReader = objCommand.ExecuteREader()
Do While objDataReader.Read()=True
strResultsHolder +=objDataREader("FirstName")
strResultsHolder +=" "
strResultsHolder +=objDataREader("LastName")
strResultsHolder +="<br>"
Loop
objDataReader.Close()
objConnection.Close()
con_close.text="Connection closed.<br>"
divListEmployees.innerHTML = strResultsHolder
catch e as Exception
con_open.text="Connection failed to open successfully.<br>"
con_close.text=e.ToString()
end try
end Sub
</script>
<html>
<body>
<h4>Reading data from the connection
<asp:label id="data_src" runat="server"/> with the DataReader object.</h4>
<asp:label id="con_open" runat="server"/><br>
<div id="divListEmployees" runat="server">list will go here</div>
<asp:label id="con_close" runat="server"/><br>
</body>
</html>

</source>

==Reading data from the OleDbConnection in C#==



<source lang="csharp">
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<script Language="c#" runat="server">
void Page_Load()
{
string strConnection = "Provider=Microsoft.Jet.OleDb.4.0;";
strConnection += @"Data Source="+MapPath("EmployeeDatabase.mdb");
data_src.Text = strConnection;
string strSQL = "SELECT FirstName, LastName FROM Employee";
DataSet objDataSet = new DataSet();
OleDbConnection objConnection = new OleDbConnection(strConnection);
OleDbDataAdapter objAdapter = new OleDbDataAdapter(strSQL, objConnection);
objAdapter.Fill(objDataSet, "Employees");
DataView objDataView = new DataView(objDataSet.Tables["Employees"]);
dgNameList.DataSource=objDataView;
dgNameList.DataBind();
}
</script>
<html>
<body>
<h4>Reading data from the connection
<asp:label id="data_src" runat="server"/> to the DataGrid control.</h4>
<asp:datagrid id="dgNameList" runat="server" /><br />
</body>
</html>

</source>

<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>

==Try to connect to access database through OleDbConnection (VB.net)==



<source lang="csharp">
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.Oledb" %>
<script language="VB" runat="server">
Sub Page_Load()
Dim strConnection as String = "Provider=Microsoft.Jet.OLEDB.4.0;"
strConnection += "Data Source=C:\NonExistent.mdb"
data_src.text = strConnection
Dim objConnection as New OledbConnection(strConnection)
try
objConnection.Open()
con_open.text="Connection opened successfully.<br />"
objConnection.Close()
con_close.text="Connection closed.<br />"
catch e as Exception
con_open.text="Connection failed to open.<br />"
con_close.text=e.ToString()
end try
end Sub
</script>
<html>
<body>
<h4>Testing the data connection
<asp:label id="data_src" runat="server"/></h4>
<asp:label id="con_open" runat="server"/><br />
<asp:label id="con_close" runat="server"/><br />
</body>
</html>

</source>

==Working with Transactions with OleDbConnection (VB.net)==



<source lang="csharp">
<%@ Page Language=VB Debug=true %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OLEDB" %>
<script runat=server>
Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
Dim DBConn as OleDbConnection
Dim DBDelete As New OleDbCommand
Dim DBTrans As OleDbTransaction
DBConn = New OleDbConnection( _
"PROVIDER=Microsoft.Jet.OLEDB.4.0;" _
& "DATA SOURCE=" _
& Server.MapPath("EmployeeDatabase.mdb;"))
DBConn.Open()
DBTrans = DBConn.BeginTransaction()
DBDelete.Connection = DBConn
DBDelete.Transaction = DBTrans
DBDelete.rumandText = "Delete From Employee " _
& "Where ID = 1"
DBDelete.ExecuteNonQuery()
DBDelete.rumandText = "Delete From Employee " _
& "Where ID = 2"
DBDelete.ExecuteNonQuery()
DBTrans.RollBack()
lblMessage.Text = "No action was taken."
"DBTrans.rumit()
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Working with Transactions with an Access Database</TITLE>
</HEAD>
<Body LEFTMARGIN="40">
<form runat="server">
<BR><BR>
<asp:label
id="lblMessage"
runat="Server"
/>
</form>
</BODY>
</HTML>

</source>

<A href="http://www.nfex.ru/Code/ASPDownload/EmployeeDatabase.zip">EmployeeDatabase.zip( 10 k)</a>

← Предыдущая	Версия 15:30, 26 мая 2010
(нет различий)

ASP.Net/ADO.net Database/OleDbConnection - История изменений

в 15:30, 26 мая 2010

Admin: 1 версия