You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
743 B
16 lines
743 B
<%@ Page Language="VB" ASPCOMPAT="TRUE" Debug="true"%>
|
|
<%@ Import Namespace="obout_ASPTreeView_2_NET" %>
|
|
<%@ Import Namespace="System.Data.OleDb" %>
|
|
|
|
<script language="VB" runat="server">
|
|
Public Sub Page_Load(sender As object, e As EventArgs)
|
|
Dim oTree As New obout_ASPTreeView_2_NET.Tree()
|
|
Dim oConn As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath("../App_Data/AddressBook.mdb"))
|
|
oConn.Open()
|
|
|
|
oTree.AddRootNode("Address Book", "folder.gif")
|
|
|
|
Dim sQuery As String = "SELECT DepartmentID, DepartmentName FROM Departments ORDER BY DepartmentName ASC"
|
|
Dim oCommand As OleDbCommand = New OleDbCommand(sQuery)
|
|
oCommand.Connection = oConn
|