Advertisement

Multiple trees inside for next loop error

Moderators: Calcifer, slothy

Multiple trees inside for next loop error

Postby dralphs » Fri Aug 03, 2007 2:33 pm

Hello Batalf and others,

First, thank you VERY much for this awesome script, it is going to help me a lot!

I'm running into an odd error.

I am trying to draw dynamic trees inside a for next loop. There might be 1 tree, there might be 7, the number of trees will be dynamic according to values in a database query.

I am finding that I can manually draw 2 or more trees, but if I try to put the tree code in a dynamic loop and dynamically name the trees and <LI>'s and such, it gives the following error:

'thisNode.style' is null or not an object...

I know this has to do with the expand function and the presence of a parentnode.

Here's a bit of my code, and I hope this is enough to determine the problem. I have not changed the .JS files at all, just this .ASP file.

Thank you in advance for your help!

Sincerely,

David Ralphs
dralphs@davidralphs.com
Dallas, TX, USA

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">

<%
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=SQLOLEDB.1;Data Source=UTX001DST01;User ID=research;Password=software05;Initial Catalog=research"
%>

<html>
<head>
<meta http-equiv="content-type" content="text/html;charset=iso-8859-1">
<title>Folder tree with Drag and Drop capabilities</title>



<script type="text/javascript" src="js/ajax.js"></script>
<!--
<script type="text/javascript" src="js/context-menu.js"></script><!-- IMPORTANT! INCLUDE THE context-menu.js FILE BEFORE drag-drop-folder-tree.js -->


<script type="text/javascript" src="js/drag-drop-folder-tree.js">

/************************************************************************************************************
(C) www.dhtmlgoodies.com, July 2006

Update log:


This is a script from www.dhtmlgoodies.com. You will find this and a lot of other scripts at our website.

Terms of use:
You are free to use this script as long as the copyright message is kept intact.

For more detailed license information, see http://www.dhtmlgoodies.com/index.html?page=termsOfUse

Thank you!

www.dhtmlgoodies.com
Alf Magne Kalleland

************************************************************************************************************/
</script>
<link rel="stylesheet" href="css/drag-drop-folder-tree.css" type="text/css"></link>
<link rel="stylesheet" href="css/context-menu.css" type="text/css"></link>
<style type="text/css">
/* CSS for the demo */
img{
border:0px;
}
</style>
<script type="text/javascript">
//--------------------------------
// Save functions
//--------------------------------
var ajaxObjects = new Array();

// Use something like this if you want to save data by Ajax.
function saveMyTree()
{
saveString = treeObj.getNodeOrders();
var ajaxIndex = ajaxObjects.length;
ajaxObjects[ajaxIndex] = new sack();
var url = 'saveNodes.asp?saveString=' + saveString;
ajaxObjects[ajaxIndex].requestFile = url; // Specifying which file to get
ajaxObjects[ajaxIndex].onCompletion = function() { saveComplete(ajaxIndex); } ; // Specify function that will be executed after file has been found
ajaxObjects[ajaxIndex].runAJAX(); // Execute AJAX function
}
// Call this function if you want to save it by a form.
function saveMyTree_byForm()
{
var saveString = "";
var uls = TargetTree.getElementsByTagName('UL');
for(var no=0;no<uls.length;no++){ // LOoping through all <ul>
var lis = uls[no].getElementsByTagName('LI');
for(var no2=0;no2<lis.length;no2++){
if(saveString.length>0)saveString = saveString + "</option><option>";
/* saveString = saveString + uls[no].id + '|' + lis[no2].id; */
saveString = saveString + lis[no2].id;
}
}

document.myForm.elements['save2'].value = '<SELECT MULTIPLE NAME="RecToSave"> <option> ' + saveString.replace(/;/g,';</option>') + '</SELECT>';
document.getElementById('saveContent').innerHTML = '<SELECT MULTIPLE NAME="RecToSave"> <option> ' + saveString.replace(/;/g,';</option>') + '</SELECT>';
document.myForm.submit();
}

ie4 = ((navigator.appName == "Microsoft Internet Explorer") && (parseInt(navigator.appVersion) >= 4 ));

function hidetoggle( targetId ){
if (ie4){
target = document.all( targetId );
target.style.display = "none";
}
}

function showtoggle( targetId ){
if (ie4){
target = document.all( targetId );
target.style.display = "";
}
}
</script>

</head>
<body>
<BR><BR>

<!--A-->
<!--A-->

<BR><BR>
<%

MSQL = "SELECT COUNT(*) AS DrugCnt "_
& "FROM dbo.Pharmacy_DefDrugInfo "_
& "WHERE (StudyNum = '00001') AND (StudyArm = 'Arm A') AND (VisitLabel = 'Cycle') AND (VisitNumber = '02')"

Set oRS = oConn.Execute(MSQL)
If Not oRS.EOF Then
DrugCnt = ""
DrugCnt = oRS("DrugCnt")
End If
oRS.Close

If DrugCnt > 1 Then
%>
<TABLE BORDER="1">
<TR>
<%
MSQL = "SELECT D.DrugName, D.Strength, L.DosageForm "_
& "FROM dbo.Pharmacy_DefDrugInfo D INNER JOIN "_
& "dbo.LU_DOSAGEFORMS L ON D.DosageForm = L.DosageID "_
& "WHERE (D.StudyNum = '00001') AND (D.StudyArm = 'Arm A') AND (D.VisitLabel = 'Cycle') AND (D.VisitNumber = '02') "_
& "ORDER BY D.DrugName, D.Strength"
Set oRS = oConn.Execute(MSQL)
If Not oRS.EOF Then
Do While Not oRS.EOF
RecCnt = RecCnt + 1
If RecCnt > 1 Then
HideText = HideText & "hidetoggle('DIV" & RecCnt-1 & "');"
ShowText = "showtoggle('DIV" & RecCnt & "');"
Else
HideText = "hidetoggle('DIV" & RecCnt+1 & "');"
ShowText = "showtoggle('DIV" & RecCnt & "');"
End If
%>
<TD>
<A HREF="#" OnClick="<%=HideText%><%=ShowText%>"><IMG SRC="/images/<%=oRS("DosageForm")%>.gif" BORDER="0"><%=oRS("DrugName")%>&nbsp;<%=oRS("Strength")%></A>
</TD>
<%
oRS.MoveNext
Loop
oRS.Close
End If
%>
</TR>
</TABLE>
<%
End If

MSQL = "SELECT DrugID "_
& "FROM dbo.Pharmacy_DefDrugInfo D "_
& "WHERE (StudyNum = '00001') AND (StudyArm = 'Arm A') AND (VisitLabel = 'Cycle') AND (VisitNumber = '02') "_
& "ORDER BY DrugName, Strength desc;"
Set oRS = oConn.Execute(MSQL)
If Not oRS.EOF Then
DIM DrugIDArray()
Dim DrugIDArrayCount
Do While Not oRS.EOF
Response.write "<BR>" & oRS("DrugID")
DrugIDArrayCount = DrugIDArrayCount + 1
Redim Preserve DrugIDArray(DrugIDArrayCount)
DrugIDArray(DrugIDArrayCount)=oRS("DrugID")
oRS.MoveNext
Loop
oRS.Close
End If
%>
<TABLE>
<TR>
<TD>
<%
For Each item in DrugIDArray

DrugID = ""
DrugID = item
If DrugID <> "" Then


ItemCnt = ItemCnt + 1
ItemCnt = CInt(ItemCnt)
Response.write "<BR>ItemCnt" & ItemCnt

If ItemCnt > 1 Then
AcctUnit1 = ""
AcctUnit2 = ""
AcctUnit3 = ""
AcctUnit4 = ""
AcctUnit5 = ""
AcctUnit6 = ""
AcctUnit7 = ""

AcctUsed = 0
End If

MSQL = "SELECT DrugID, AcctUnit1, AcctUnit2, AcctUnit3, AcctUnit4, AcctUnit5, AcctUnit6, AcctUnit7 "_
& "FROM dbo.Pharmacy_DefDrugInfo "_
& "WHERE (DrugID = '" & DrugID & "')"
Set oRS = oConn.Execute(MSQL)
If Not oRS.EOF Then
AcctUnit1 = oRS("AcctUnit1")
AcctUnit2 = oRS("AcctUnit2")
AcctUnit3 = oRS("AcctUnit3")
AcctUnit4 = oRS("AcctUnit4")
AcctUnit5 = oRS("AcctUnit5")
AcctUnit6 = oRS("AcctUnit6")
AcctUnit7 = oRS("AcctUnit7")
oRS.Close
End If

If AcctUnit1 <> "" Then
AcctUsed = AcctUsed + 1
MSQL = "SELECT * "_
& "FROM dbo.LU_DOSAGEFORMS "_
& "WHERE (DosageID = '" & AcctUnit1 & "')"
Set oRS = oConn.Execute(MSQL)
AcctUnitText1 = oRS("DosageForm")
oRS.Close
End If

If AcctUnit2 <> "" Then
AcctUsed = AcctUsed + 1
MSQL = "SELECT * "_
& "FROM dbo.LU_DOSAGEFORMS "_
& "WHERE (DosageID = '" & AcctUnit2 & "')"
Set oRS = oConn.Execute(MSQL)
AcctUnitText2 = oRS("DosageForm")
oRS.Close
End If

If AcctUnit3 <> "" Then
AcctUsed = AcctUsed + 1
MSQL = "SELECT * "_
& "FROM dbo.LU_DOSAGEFORMS "_
& "WHERE (DosageID = '" & AcctUnit3 & "')"
Set oRS = oConn.Execute(MSQL)
AcctUnitText3 = oRS("DosageForm")
oRS.Close
End If

If AcctUnit4 <> "" Then
AcctUsed = AcctUsed + 1
MSQL = "SELECT * "_
& "FROM dbo.LU_DOSAGEFORMS "_
& "WHERE (DosageID = '" & AcctUnit4 & "')"
Set oRS = oConn.Execute(MSQL)
AcctUnitText4 = oRS("DosageForm")
oRS.Close
End If

If AcctUnit5 <> "" Then
AcctUsed = AcctUsed + 1
MSQL = "SELECT * "_
& "FROM dbo.LU_DOSAGEFORMS "_
& "WHERE (DosageID = '" & AcctUnit5 & "')"
Set oRS = oConn.Execute(MSQL)
AcctUnitText5 = oRS("DosageForm")
oRS.Close
End If

If AcctUnit6 <> "" Then
AcctUsed = AcctUsed + 1
MSQL = "SELECT * "_
& "FROM dbo.LU_DOSAGEFORMS "_
& "WHERE (DosageID = '" & AcctUnit6 & "')"
Set oRS = oConn.Execute(MSQL)
AcctUnitText6 = oRS("DosageForm")
oRS.Close
End If

AcctUsed = Cint(AcctUsed)


If ItemCnt = 1 Then
StyleText = "border:1px #00315A solid; width:400px; height:350px; overflow:auto;"
Else
'StyleText = "display:none; border:1px #00315A solid; width:400px; height:350px; overflow:auto;"
StyleText = "border:1px #00315A solid; width:400px; height:350px; overflow:auto;"
End If
%>
<DIV ID="DIV<%=ItemCnt%>" NAME="NDIV<%=ItemCnt%>" Style="<%=StyleText%>">
<TABLE>
<TR VALIGN="TOP">
<TD>
<%
<UL id="Tree<%=DrugID%>" class="dhtmlgoodies_tree">
<li id="Node<%=DrugID%>" noDrag="true" noSiblings="true" noDelete="true" noRename="true"><a href="#"><B>Available Drugs</B></a>
<%
SQL = ""
SQL = "SELECT TOP 100 '33' AS OrderID, '4203' AS UPN, '9811' AS StudyNum, '5/14/1998' AS DateOn, DrugID, RecordID, GETDATE() AS DateDispensed, AcctUnit1, "_
& "AcctUnit2, AcctUnit3, AcctUnit4, AcctUnit5, AcctUnit6, AcctUnit7, AcctUnit8, 'RALPHDR' AS KEBy, GETDATE() AS KEDate "_
& "FROM dbo.Pharmacy_StockRecords "_
& "WHERE (DrugID = '" & DrugID & "') AND (ExpirationDate > GETDATE()) and OrderAssignment is null "_
& "ORDER BY AcctUnit8, AcctUnit7, AcctUnit6, AcctUnit5, AcctUnit4, AcctUnit3, AcctUnit2, AcctUnit1"
'response.write sql

If AcctUsed = 2 Then
Set oRS = oConn.Execute(SQL)
If Not oRS.EOF Then
'*** 2 accountability units used
%>
<!-- The beginning of the tree -->
<UL>
<%
AcctUnit0Count = 0
Do While Not oRS.EOF
AcctUnit2Count = AcctUnit2Count + 1
AcctUnit2 = ""
AcctUnit2 = oRS("AcctUnit2")
If AcctUnit2Count = 1 Then
%>
<!-- The beginning of the AcctUnit2 -->
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL> <!-- First AcctUnit2 -->
<!-- The beginning of the AcctUnit1 -->
<!-- First AcctUnit1 -->
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a></LI>
<%
Else
If AcctUnit2 <> OLDAcctUnit2 then 'Not same AcctUnit2, close out previous AcctUnit2 and draw a new AcctUnit2
%>
</UL>
</LI>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a></LI>
<%
Else 'In the same AcctUnit2, just draw a new AcctUnit1
If AcctUnit0Count = 0 Then 'Don't close out previous AcctUnit2, draw a new AcctUnit2
%>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a></LI>
<%
Else 'close out previous AcctUnit2, just draw a new AcctUnit2 and AcctUnit1
%>
</UL>
</LI>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a></LI>
<%
End If
End If
End If
ors.MoveNext
OLDAcctUnit1 = AcctUnit1
OLDAcctUnit2 = AcctUnit2
Loop
ors.Close
Set ors = Nothing
End If
End If

If AcctUsed = 3 Then
Set oRS = oConn.Execute(SQL)
If Not oRS.EOF Then
'*** 3 accountability units used
%>
<!-- The beginning of the tree -->
<UL>
<%
If ItemCnt > 1 Then
%>
<UL>
<UL>
<%
End If

Do While Not oRS.EOF
AcctUnit3Count = AcctUnit3Count + 1
AcctUnit2Count = AcctUnit2Count + 1
AcctUnit2 = ""
AcctUnit2 = oRS("AcctUnit2")
AcctUnit3 = ""
AcctUnit3 = oRS("AcctUnit3")
If AcctUnit3Count = 1 Then
%>
<!-- The beginning of the AcctUnit3 -->
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL> <!-- First AcctUnit3 -->
<!-- The beginning of the AcctUnit2 -->
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL> <!-- First AcctUnit2 -->
<!-- The beginning of the AcctUnit1 -->
<!-- First AcctUnit1 -->
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
Else
If AcctUnit3 <> OLDAcctUnit3 then 'Not same AcctUnit3, close out previous AcctUnit2 and AcctUnit3 and draw a new AcctUnit3
%>
</UL>
</LI>
</UL>
</LI>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<%
If AcctUnit2 <> OLDAcctUnit2 then 'Not same AcctUnit2, draw a new AcctUnit2 and AcctUnit1
%>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else 'In the same AcctUnit3, look for same AcctUnit2
If AcctUnit2 <> OLDAcctUnit2 then 'Not same AcctUnit2, close out previous AcctUnit2 and draw a new AcctUnit2 and AcctUnit1
%>
</UL>
</LI>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
Else 'In the same AcctUnit2 - just draw a new AcctUnit1
%>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
End If
End If
ors.MoveNext

OLDAcctUnit1 = AcctUnit1
OLDAcctUnit2 = AcctUnit2
OLDAcctUnit3 = AcctUnit3
Loop
ors.Close
Set ors = Nothing
End If
End If

If AcctUsed = 4 Then
Set oRS = oConn.Execute(SQL)
If Not oRS.EOF Then
'*** 4 accountability units used
%>
<!-- The beginning of the tree -->
<UL>
<%
Do While Not oRS.EOF
AcctUnit4Count = AcctUnit4Count + 1
AcctUnit3Count = AcctUnit3Count + 1
AcctUnit2Count = AcctUnit2Count + 1
AcctUnit2 = ""
AcctUnit2 = oRS("AcctUnit2")
AcctUnit3 = ""
AcctUnit3 = oRS("AcctUnit3")
AcctUnit4 = ""
AcctUnit4 = oRS("AcctUnit4")
If AcctUnit4Count = 1 Then
%>
<!-- The beginning of the AcctUnit4 -->
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL> <!-- First AcctUnit4 -->
<!-- The beginning of the AcctUnit3 -->
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL> <!-- First AcctUnit3 -->
<!-- The beginning of the AcctUnit2 -->
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL> <!-- First AcctUnit2 -->
<!-- The beginning of the AcctUnit1 -->
<!-- First AcctUnit1 -->
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
Else
If AcctUnit4 <> OLDAcctUnit4 then 'Not same AcctUnit4, close out previous AcctUnit4, AcctUnit3 and AcctUnit2 and draw a new AcctUnit4
%>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<%
If AcctUnit3 <> OLDAcctUnit3 then 'Not same AcctUnit3, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
If AcctUnit2 <> OLDAcctUnit2 then 'Not same AcctUnit2, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
%>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else
%>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else 'In the same AcctUnit4, look for same AcctUnit3
If AcctUnit3 <> OLDAcctUnit3 then 'Not same AcctUnit3, close out previous AcctUnit3 and draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
%>
</UL>
</LI>
</UL>
</LI>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
Else 'In the same AcctUnit3 - just draw a new AcctUnit1
%>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
End If
End If
ors.MoveNext
OLDAcctUnit1 = AcctUnit1
OLDAcctUnit2 = AcctUnit2
OLDAcctUnit3 = AcctUnit3
OLDAcctUnit4 = AcctUnit4
Loop
ors.Close
Set ors = Nothing
End If
End If


If AcctUsed = 5 Then
Set oRS = oConn.Execute(SQL)
If Not oRS.EOF Then
'*** 5 accountability units used
%>
<!-- The beginning of the tree -->
<UL>
<%
Do While Not oRS.EOF
AcctUnit5Count = AcctUnit5Count + 1
AcctUnit4Count = AcctUnit4Count + 1
AcctUnit3Count = AcctUnit3Count + 1
AcctUnit2Count = AcctUnit2Count + 1
AcctUnit2 = ""
AcctUnit2 = oRS("AcctUnit2")
AcctUnit3 = ""
AcctUnit3 = oRS("AcctUnit3")
AcctUnit4 = ""
AcctUnit4 = oRS("AcctUnit4")
AcctUnit5 = ""
AcctUnit5 = oRS("AcctUnit5")
If AcctUnit5Count = 1 Then
%>
<!-- The beginning of the AcctUnit5 -->
<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL> <!-- First AcctUnit5 -->
<!-- The beginning of the AcctUnit4 -->
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL> <!-- First AcctUnit4 -->
<!-- The beginning of the AcctUnit3 -->
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL> <!-- First AcctUnit3 -->
<!-- The beginning of the AcctUnit2 -->
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL> <!-- First AcctUnit2 -->
<!-- The beginning of the AcctUnit1 -->
<!-- First AcctUnit1 -->
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
Else
If AcctUnit5 <> OLDAcctUnit5 then 'Not same AcctUnit4, close out previous AcctUnit4, AcctUnit3 and AcctUnit2 and draw a new AcctUnit4
%>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL>
<%
If AcctUnit4 <> OLDAcctUnit4 then 'Not same AcctUnit3, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
If AcctUnit3 <> OLDAcctUnit3 then 'Not same AcctUnit2, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
If AcctUnit2 <> OLDAcctUnit2 then 'Not same AcctUnit2, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
%>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else

%>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else
%>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else 'In the same AcctUnit4, look for same AcctUnit3
If AcctUnit4 <> OLDAcctUnit4 then 'Not same AcctUnit3, close out previous AcctUnit3 and draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
%>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
Else 'In the same AcctUnit3 - just draw a new AcctUnit1
%>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
End If
End If
ors.MoveNext
OLDAcctUnit1 = AcctUnit1
OLDAcctUnit2 = AcctUnit2
OLDAcctUnit3 = AcctUnit3
OLDAcctUnit4 = AcctUnit4
OLDAcctUnit5 = AcctUnit5
Loop
ors.Close
Set ors = Nothing
End If
End If

If AcctUsed = 6 Then
Set oRS = oConn.Execute(SQL)
If Not oRS.EOF Then
'*** 6 accountability units used
%>
<!-- The beginning of the tree -->
<UL>
<%
Do While Not oRS.EOF
AcctUnit6Count = AcctUnit6Count + 1
AcctUnit5Count = AcctUnit5Count + 1
AcctUnit4Count = AcctUnit4Count + 1
AcctUnit3Count = AcctUnit3Count + 1
AcctUnit2Count = AcctUnit2Count + 1
AcctUnit2 = ""
AcctUnit2 = oRS("AcctUnit2")
AcctUnit3 = ""
AcctUnit3 = oRS("AcctUnit3")
AcctUnit4 = ""
AcctUnit4 = oRS("AcctUnit4")
AcctUnit5 = ""
AcctUnit5 = oRS("AcctUnit5")
AcctUnit6 = ""
AcctUnit6 = oRS("AcctUnit6")
If AcctUnit6Count = 1 Then
%>
<!-- The beginning of the AcctUnit6 -->
<li class="<%=AcctUnitText6%>.gif" id="Tree<%=DrugID%>AcctUnit6Count<%=AcctUnit6Count%>"><a href="#"><%=AcctUnitText6%>&nbsp;<%=oRS("AcctUnit6")%></a>
<UL> <!-- First AcctUnit6 -->
<!-- The beginning of the AcctUnit5 -->
<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL> <!-- First AcctUnit5 -->
<!-- The beginning of the AcctUnit4 -->
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL> <!-- First AcctUnit4 -->
<!-- The beginning of the AcctUnit3 -->
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL> <!-- First AcctUnit3 -->
<!-- The beginning of the AcctUnit2 -->
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL> <!-- First AcctUnit2 -->
<!-- The beginning of the AcctUnit1 -->
<!-- First AcctUnit1 -->
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
Else
If AcctUnit6 <> OLDAcctUnit6 then 'Not same AcctUnit4, close out previous AcctUnit4, AcctUnit3 and AcctUnit2 and draw a new AcctUnit4
%>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
<li class="<%=AcctUnitText6%>.gif" id="Tree<%=DrugID%>AcctUnit6Count<%=AcctUnit6Count%>"><a href="#"><%=AcctUnitText6%>&nbsp;<%=oRS("AcctUnit6")%></a>
<UL>
<%
If AcctUnit5 <> OLDAcctUnit5 then 'Not same AcctUnit3, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
If AcctUnit4 <> OLDAcctUnit4 then 'Not same AcctUnit3, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
If AcctUnit3 <> OLDAcctUnit3 then 'Not same AcctUnit2, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
If AcctUnit2 <> OLDAcctUnit2 then 'Not same AcctUnit2, draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
%>
<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else
%>
<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else

%>

<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else
%>

<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%></a>
<UL>
<li class="<%=AcctUnitText1%>.gif" id="<%=oRS("RecordID")%>"><a href="#"><%=AcctUnitText1%>&nbsp;<%=oRS("AcctUnit1")%>&nbsp;from&nbsp;<%=AcctUnitText2%>&nbsp;<%=oRS("AcctUnit2")%>&nbsp;from&nbsp;<%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a></LI>
<%
End If
Else 'In the same AcctUnit4, look for same AcctUnit3
If AcctUnit5 <> OLDAcctUnit5 then 'Not same AcctUnit3, close out previous AcctUnit3 and draw a new AcctUnit3 and AcctUnit2 and AcctUnit1
%>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
</UL>
</LI>
<li class="<%=AcctUnitText5%>.gif" id="Tree<%=DrugID%>AcctUnit5Count<%=AcctUnit5Count%>"><a href="#"><%=AcctUnitText5%>&nbsp;<%=oRS("AcctUnit5")%></a>
<UL>
<li class="<%=AcctUnitText4%>.gif" id="Tree<%=DrugID%>AcctUnit4Count<%=AcctUnit4Count%>"><a href="#"><%=AcctUnitText4%>&nbsp;<%=oRS("AcctUnit4")%></a>
<UL>
<li class="<%=AcctUnitText3%>.gif" id="Tree<%=DrugID%>AcctUnit3Count<%=AcctUnit3Count%>"><a href="#"><%=AcctUnitText3%>&nbsp;<%=oRS("AcctUnit3")%></a>
<UL>
<li class="<%=AcctUnitText2%>.gif" id="Tree<%=DrugID%>AcctUnit2Count<%=AcctUnit2Count%>"><a href="#"><%=Acct
dralphs
 
Posts: 1
Joined: Thu Aug 02, 2007 10:05 pm

Return to Folder tree questions

Who is online

Users browsing this forum: No registered users and 2 guests

cron