Neej... Det var vist ikke helt det jeg mente, så prøver lige at forklare det igen:
Jeg har to arraylist ( 1 & 2)
Araylist 1, er den jeg ittererer på i min repeater.
Araylist 1 værdier er araylist2 elementer
Dvs. Araylist1(0) = araylist2 element
Araylist1(1) = araylist2 element
Araylist1(2) = araylist2 element
osv....
Når jeg så gennemløber araylist1 i min repeater, så vil jeg hver gang stå med et araylist2 element. Hele dette element, ønsker jeg så at sende.....
Det er lidt svært at forklare, så du får lige hele min kode. Problemet ligger der, hvor jeg har skrevet BEMÆRK!!!
------ Kode ---------------
<%@ Page Language="VB" Debug="true"%>
<%@ Register TagPrefix="MYCONTROL" TagName="myPanel" Src="ascx\panel.ascx" %>
<script runat="server">
dim drawArray As New ArrayList()
dim lineArray As New ArrayList()
dim numberArray as New ArrayList()
dim linepics as integer = 0
dim count1, count2, count3 as integer
sub Page_Load(obj as object, e as eventargs)
drawArray.Add(New Machine("machine1", "storage", "false", "0,0", "0"))
drawArray.Add(New Machine("machine2", "machine", "false", "1,0", "0,1"))
drawArray.Add(New Machine("machine3", "machine", "false", "2,0", "0,1"))
drawArray.Add(New Machine("machine4", "machine", "false", "2,1", "0,1"))
drawArray.Add(New Machine("machine5", "goods", "false", "3,0", "-1"))
myRepeater1.DataSource = drawArray
myRepeater1.DataBind()
For count1 = 0 to (drawArray.count()-1)
dim tempMachine as Machine = drawArray(count1)
dim tempPlace as String = tempMachine.Posision
dim StringArray() as String = tempPlace.ToString().Split(Convert.ToChar(","))
dim lineNumber as integer = cInt(StringArray(0))
if (lineNumber>linepics) then
linepics = lineNumber
end if
Next
For count2 = 0 to linepics
dim myArray as New ArrayList()
For count3 = 0 to (drawArray.count()-1)
dim tempMachine as Machine = drawArray(count3)
dim StringArray() as String = tempMachine.Posision.ToString().Split(Convert.ToChar(","))
dim lineNumber as integer = cInt(StringArray(0))
If lineNumber = count2 then
myArray.add(tempMachine.lines)
End If
Next
lineArray.add( myArray )
numberArray.add ( count2 )
Next
myRepeater2.DataSource = numberArray
myRepeater2.DataBind()
end sub
Public Class Machine
private myName as String
private myType as String
private myMarked as String
private myPosision as String
private myLines as String
Public Sub New(newName as String, newType as String, newMarked as String, newPosision as String, newLines as String)
Me.myName = newName
Me.myType = newType
Me.myMarked = newMarked
Me.myPosision = newPosision
Me.myLines = newLines
End Sub
Public ReadOnly Property Name() As String
Get
Return myName
End Get
End Property
Public ReadOnly Property Type() As String
Get
Return myType
End Get
End Property
Public ReadOnly Property Marked() As String
Get
Return myMarked
End Get
End Property
Public ReadOnly Property Posision() As String
Get
Return myPosision
End Get
End Property
Public ReadOnly Property Lines() As String
Get
Return myLines
End Get
End Property
End Class
</script>
<html>
<head>
</head>
<body>
<form runat="server">
<asp:Repeater id="myRepeater1" runat="server">
<HeaderTemplate>
<!--Header-->
</HeaderTemplate>
<ItemTemplate>
<MYCONTROL:myPanel id="panel" runat="server"
marked='<%#DataBinder.Eval(Container.DataItem, "marked") %>'
type='<%#DataBinder.Eval(Container.DataItem, "type") %>'
name='<%#DataBinder.Eval(Container.DataItem, "name") %>'
posision='<%#DataBinder.Eval(Container.DataItem, "posision") %>'>
</MYCONTROL:myPanel>
</ItemTemplate>
<FooterTemplate>
<!--Footer-->
</FooterTemplate>
</asp:Repeater>
<asp:Repeater id="myRepeater2" runat="server">
<HeaderTemplate>
<!--Header-->
</HeaderTemplate>
<ItemTemplate>
<% Session("Arraylist") = <%# Container.DataItem %> BEMÆRK!!!!!!!!
<img src="drawline.aspx" border="0" />
<% Session.abandon %>
</ItemTemplate>
<FooterTemplate>
<!--Footer-->
</FooterTemplate>
</asp:Repeater>
</form>
</body>
</html>
